Print Page as PDF
Allergy Order Check Filing ICR (6072)

Allergy Order Check Filing    ICR (6072)

Name Value
NUMBER 6072
IA # 6072
DATE CREATED 2014/07/09
CUSTODIAL PACKAGE OUTPATIENT PHARMACY
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PSONEWOA
NAME Allergy Order Check Filing
GENERAL DESCRIPTION
This DBIA provides the DAOC^PSONEWOA routine call for
Inpatient Medications to make to Outpatient Pharmacy. It takes the ^TMP global
input data sent in from Inpatient Medications that contains allergy order
check data and creates an entry in the ORDER CHECK INSTANCES File (#100.05),
by invoking SAVEOC^OROCAPI1.
STATUS Active
KEYWORDS Allergy
DURATION Till Otherwise Agreed
ID PSONEWOA
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION
DAOC
Input: ^TMP("PSODAOC",$J,"ALLERGY") contains allergy
order check data as follows:
Note: 'ctr' represents counter, where multiple entries can exist.


^TMP("PSODOAC",$J,"ALLERGY",ctr,4,ctr,0 )= p1^p2^p3^p4^p5^p6^p7
where  p1 = Reactant
p2 = Causative Agent
p3 = Location Type
p4 = Remote Location
p5 = Origination Date/Time
p6 = Observed or Historical
p7 = Severity

^TMP("PSODAOC",$J,"ALLERGY",ctr,4,ctr,1,ctr,0) = VA Drug Class

^TMP("PSODAOC",$J,"ALLERGY",ctr,4,ctr,2,ctr,0) = Drug Ingredient

^TMP("PSODAOC",$J,"ALLERGY",ctr,4,ctr,3,ctr,0) = Sign/Sympton

^TMP("PSODAOC",$J,"ALLERGY",ctr,"ALLERGY DD",5,ctr,0) = Dispense Drug

^TMP("PSODAOC",$J,"ALLERGY",ctr,"INTERVENTION") = Intervention

^TMP("PSODAOC",$J,"ALLERGY","ALLERGY PKG")=p1^p2^p3^p4
where p1 = "IP"
p2 = Action + package. For example 'RENEW UD' or 'COPY IV'
p3 = Pharmacy Order Number
p4 = Computerized Patient Record System (CPRS) Order Number

^TMP("PSODAOC",$J,"ALLERGY","PROVR") = Override Reason


Output: An entry will be created in the ORDER CHECK INSTANCES File (#100.05).
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE SUBSCRIBING DETAILS
INPATIENT MEDICATIONS
Inpatient Medications will pass allergy order check
data to Outpatient Pharmacy and Outpatient Pharmacy will call Computerized
Patient Record System (CPRS) to store that allergy order check data in the
ORDER CHECK INSTANCES File (#100.05).
CREATOR WHITLEY,HAL
DBA Comments
5/20/16-MM:  Ron Ruzbacki asked to be added as an editor to
ICR #5366, 6071 and 6072 to update the ICRs for MOCHA UFT Enhancements 2 (ME2)
project which is close to release.  Removed Hal Whitley as editor and added
Ron.

11/14/17-MM:  Activated ICR #6072 for PSJ*5*281 and PSO*7*411 were released on
5/24/16.  On 9/27/17, Ron said 6072 has been re-worked and approved my Mai
(representing Inpatient).

A search in PATVEE development account found the following references for this
ICR:

ICR #6072 and PSONEWOA are referenced in:

PSJNEWOC.INT PSJNEWOC+5  ;External reference to DAOC^PSONEWOA is supported by
DBIA 6072 VF2+3       D DAOC^PSONEWOA DAOC+5      D DAOC^PSONEWOA

PSONEWOC.INT ACT+5       I $D(^TMP("PSODAOC",$J,"ALLERGY")) S PSOZH="Order
Allergy" D DAOC^PSONEWOA ;drug allergies
DATE ACTIVATED 2017/11/14
DATE/TIME EDITED
DATE/TIME EDITED ACTION AT THE REQUEST OF WITH CONCURRENCE OF
2017/11/14 11:45 APPROVED RUZBACKI,RON VO,MAI
Generated from AUG 12, 2020@ IA Listing Descriptions