VPRDPSI ;SLC/MKB -- Inpatient Pharmacy extract ;8/2/11 15:29
Source file <VPRDPSI.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Virtual Patient Record | 1 | VPRDPSOR |
Name | Comments | DBIA/ICR reference |
---|---|---|
IN(ID,MED) | ; -- return a medication in MED("attribute")=value
; [expects VPRN, OCL^PSOORRL data] |
|
IN1(ID,MED) | ; -- return a medication in MED("attribute")=value
; [expects OEL^PSOORRL data] |
|
IV1(ID,MED) | ; -- return an infusion in MED("attribute")=value
; [expects OEL^PSOORRL data] |
|
ORD | ; get rest of inpatient data from ORDER
|
|
ORDLOC | ; enter here for IV's
|
|
IV | ; -- add IV data to MED("attribute")=value
; [expects IFN, ORPK, OEL^PSOORRL data] |
|
IVQ | ; done
|
|
IVP | ; -- add IV products for ID,DFN
; [expects PS("A") & PS("B") data arrays from IV*/PSOORRL] |
|
IVLIM(X) | ; -- Return expanded version of IV Limit X
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | ORD+12 |
$$OI^ORX8 | ORD+1 |
$$VALUE^ORX8 | ORD+5, ORD+10, IV+11, IV+12, IV+13, IV+17 |
EN^ORX8 | ORDLOC+1 |
$$NAME^PSS50P7 | IVP+11, IVP+20 |
ZERO^PSS50P7 | ORD+3 |
ALL^PSS51P2 | IV+11 |
ZERO^PSS52P6 | IVP+6 |
ZERO^PSS52P7 | IVP+15 |
$$FAC^VPRD | IN+17, IN1+16, IV1+13, ORDLOC+6 |
$$STRING^VPRD | IN+14, IN1+14 |
NDF^VPRDPS | ORD+11, IVP+8, IVP+17 |
$$LOW^XLFSTR | IN+8, IN1+8 |
$$UP^XLFSTR | IVLIM+3 |
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^OR(100 - [#100] | IV+14 |
^ORD(101.43 - [#101.43] | IV+15 |
^SC - [#44] | IN1+18, IV1+15, ORDLOC+5 |
^TMP("PS" | IN1+3, IV1+3, IV+3, IV+4, IV+8, IVQ+1! |
^TMP("VPRPS" | IN+3 |
^TMP($J | ORD+4, ORD+13!, IV+12, IVQ+1!, IVP+5!, IVP+7, IVP+10, IVP+14!, IVP+16, IVP+19 , IVP+21! |
^VA(200 - [#200] | IV+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DOSE | IN+2~, IN+9*, IN+11, IN+12, IN1+2~, IN1+9*, IN1+11, IN1+12, ORD+5*, ORD+8* , ORD+9 |
DRUG | IN1+2~, ORD+6*, ORD+7*, ORD+10*, ORD+11, IVP+2~, IVP+7*, IVP+8, IVP+16*, IVP+17 |
I | IV+2~, IV+14*, IV+16, IV+20*, IVLIM+2~, IVLIM+5* |
ID | IN~, IN+4, IN1~, IN1+4, IV1~, IV1+4, IV+2~, IV+6* |
IEN | IVP+2~, IVP+7*, IVP+10, IVP+16*, IVP+19 |
>> IFN | IV+11, IV+12, IV+13, IV+14, IV+17 |
LOC | IN+2~, IN1+2~, IN1+18, IV1+2~, IV1+15, ORDLOC+4*, ORDLOC+5, ORDLOC+6 |
MED | IN~, IN+2!, IN1~, IN1+2!, IV1~, IV1+2! |
MED("IMO" | IN+16*, IN1+18*, IV1+15* |
MED("dose" | IN+11*, IN1+11*, IV1+9*, ORD+9*, IV+5*, IV+12* |
MED("facility" | IN+17*, IN1+16*, IV1+13*, ORDLOC+6* |
MED("form" | ORD+4* |
MED("ivLimit" | IV1+11*, IV+7*, IV+17* |
MED("location" | ORDLOC+5* |
MED("medID" | IN+4*, IN1+4*, IV1+4* |
MED("name" | IN+7*, IN1+7*, IV1+4*, ORD+2*, IV+4*, IV+15* |
MED("orderID" | ORDLOC+2* |
MED("ordered" | ORDLOC+3* |
MED("orderingProvider" | IN+15*, IN1+15*, IV1+12* |
MED("parent" | ORD+12* |
MED("pharmacist" | IV+9* |
MED("product" | IV+16*, IVP+8*, IVP+9*, IVP+11*, IVP+17*, IVP+18*, IVP+20* |
MED("rate" | IV1+10*, IV+6*, IV+13* |
MED("sig" | IN+12*, IN+14*, IN1+12*, IN1+14* |
MED("start" | IN+5*, IN1+5*, IV1+5* |
MED("status" | IN+8*, IN1+8*, IV1+8* |
MED("stop" | IN+6*, IN1+6*, IV1+6* |
MED("vaStatus" | IN+7*, IN1+7*, IV1+7* |
MED("vaType" | IN+4*, IN1+4*, IV1+4*, IV+3* |
N | IVP+2~*, IVP+8*, IVP+9, IVP+11, IVP+17*, IVP+18, IVP+20 |
NAME | IVP+2~, IVP+5*, IVP+6, IVP+8, IVP+14*, IVP+15, IVP+17 |
OI | IN+2~, IN1+2~, ORD+1*, ORD+2 |
ORDER | IN+2~, IN+18*, IN1+2~, IN1+17*, IV1+2~, IV1+14*, ORD+1, ORD+5, ORD+10, ORD+12 , ORDLOC+1, ORDLOC+2 |
>> ORPK | IV+3, IV+6 |
ORUPCHUK | ORDLOC+1~ |
ORUPCHUK("ORL" | ORDLOC+4 |
ORUPCHUK("ORODT" | ORDLOC+3 |
PS | IN+2~, IN+3*, IN1+2~, IN1+3*, IV1+2~, IV1+3*, IV+2~, IV+4* |
PS("A" | IVP+4, IVP+5, IVP+9 |
PS("B" | IVP+13, IVP+14, IVP+18 |
PS("CLINIC" | IN+16 |
PS("IVLIM" | IV1+11, IV+7 |
PS("MDR" | IN+10, IN1+10, IV1+9, IV+5 |
PS("P" | IN+15, IN1+15, IV1+12 |
PS("SCH" | IN+10, IN1+10, IV1+9, IV+5 |
PS("SIG" | IN+9, IN1+9 |
PS("SIO" | IN+12, IN+13, IN1+12, IN1+13 |
PS(0 | IN+3, IN1+3, IV1+3, IV+4 |
PS0 | IN+2~, IN+3*, IN+5, IN+6, IN+7, IN+8, IN+9, IN+18, IN1+2~, IN1+3* , IN1+5, IN1+6, IN1+7, IN1+8, IN1+9, IN1+17, IV1+2~, IV1+3*, IV1+4, IV1+5 , IV1+6, IV1+7, IV1+10, IV1+14, IV+2~, IV+4*, IV+6 |
PSOI | IN+2~, IN1+2~, ORD+1*, ORD+2, ORD+3, ORD+4 |
RTE | IN+2~, IN+10*, IN+11, IN+12, IN1+2~, IN1+10*, IN1+11, IN1+12, IV+2~, IV+11* , IV+12 |
SCH | IN+2~, IN+10*, IN+11, IN+12, IN1+2~, IN1+10*, IN1+11, IN1+12 |
SIO | IN+13~*, IN+14, IN1+13~*, IN1+14 |
U | IN+5, IN+6, IN+7, IN+8, IN+9, IN+10, IN+11, IN+18, IN1+5, IN1+6 , IN1+7, IN1+8, IN1+9, IN1+10, IN1+11, IN1+17, IN1+18, IV1+4, IV1+5, IV1+6 , IV1+7, IV1+9, IV1+10, IV1+14, IV1+15, ORD+1, ORD+2, ORD+4, ORD+9, ORDLOC+5 , IV+4, IV+5, IV+6, IV+8, IV+9, IV+12, IV+15, IV+16, IVP+5, IVP+8 , IVP+9, IVP+11, IVP+14, IVP+17, IVP+18, IVP+20 |
UNT | IVLIM+2~, IVLIM+5*, IVLIM+6, IVLIM+7, IVLIM+8, IVLIM+9, IVLIM+10, IVLIM+11 |
UNTS | IN+2~, IN1+2~ |
VAL | IVLIM+2~, IVLIM+5*, IVLIM+6, IVLIM+7, IVLIM+8, IVLIM+9, IVLIM+10, IVLIM+11 |
VPI | IVP+2~, IVP+4*, IVP+5, IVP+9, IVP+13*, IVP+14, IVP+18 |
>> VPRN | IN+3 |
X | IN+2~, IN+5*, IN+6*, IN+7*, IN+8, IN1+2~, IN1+5*, IN1+6*, IN1+7*, IN1+8 , IV1+2~, IV1+5*, IV1+6*, IV1+7*, IV1+8, IV1+11*, ORD+5*, ORD+6, ORD+7, ORD+8 , ORD+12*, IV+2~, IV+7*, IV+8*, IV+9, IV+14*, IV+15, IV+17*, IV+18*, IV+20* , IVP+2~, IVP+10*, IVP+11, IVP+19*, IVP+20, IVLIM~, IVLIM+1, IVLIM+3*, IVLIM+4*, IVLIM+5 |
X0 | IV+2~, IV+15*, IV+16 |
Y | IVLIM+2~, IVLIM+3*, IVLIM+6*, IVLIM+7*, IVLIM+8*, IVLIM+9*, IVLIM+10*, IVLIM+11*, IVLIM+12 |