Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: VPRDPSOR

Package: Virtual Patient Record

Routine: VPRDPSOR


Information

VPRDPSOR ;SLC/MKB -- Medication extract by order ;8/2/11 15:29

Source Information

Source file <VPRDPSOR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Virtual Patient Record 4 ($$FAC,$$PROVSPC)^VPRD  (NDF,XML)^VPRDPS  IV^VPRDPSI  RX^VPRDPSO  
Order Entry Results Reporting 3 (GETDLG1,GETORDER)^ORCD  EN^ORQ1  ($$OI,$$PKGID,$$VALUE,EN)^ORX8  
Pharmacy Data Management 2 ZERO^PSS50P7  ALL^PSS51P2  
Outpatient Pharmacy 1 OEL^PSOORRL  
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Virtual Patient Record 2 VPRDJ05  VPRDPS  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,BEG,END,MAX,ORIFN) ; -- find a patient's orders
EN1(IFN,MED) ; -- return an order in MED("attribute")=value [from EN]
ENA ; get order responses
ENQ ; finish
IV() ; -- Return 1 or 0, if order is for IV/infusion
DOSE(N) ; --add dosage data from VPRESP(ID,N) [instance N]
LASTPROV(IFN) ; -- return last provider who took action on order IFN
STRING(IFN,ID) ; -- return text value as a string
STATUS(X) ; -- return HITSP status for 100.01 #X
RESP(ORIFN,RESP) ; -- return order responses [internal form]
GETCLS() ; p18 added package check
RX(ORIFN) ; -- is order really a med? (non-PS order in display group)

External References

Name Field # of Occurrence
$$GET1^DIQ GETCLS+1, GETCLS+4, RX+2
GETDLG1^ORCD RESP+2
GETORDER^ORCD RESP+3
EN^ORQ1 EN+14
$$OI^ORX8 ENA+1
$$PKGID^ORX8 EN1+6, ENA+18
$$VALUE^ORX8 EN1+17
EN^ORX8 EN1+12
OEL^PSOORRL EN1+23, ENA+18
ZERO^PSS50P7 ENA+2
ALL^PSS51P2 DOSE+4
$$FAC^VPRD EN1+22
$$PROVSPC^VPRD EN1+13, EN1+14
NDF^VPRDPS ENA+21, ENQ+1
XML^VPRDPS EN+6, EN+22
IV^VPRDPSI EN1+24
RX^VPRDPSO EN1+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] GET1^DIQ
^DIC(9.4 - [#9.4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] GETCLS+2, GETCLS+3
^OR(100 - [#100] EN+18, EN1+3, EN1+4, EN1+21, ENA+9, ENA+11, ENA+13, LASTPROV+2, STRING+2, STRING+3
, STRING+4, RX+2
^ORD(100.98 - [#100.98] EN+11
^SC - [#44] EN1+18, EN1+20
^TMP("ORR" EN+16, EN+24!
^TMP("PS" ENA+6, ENA+18, ENQ+2, ENQ+4!, IV+4
^TMP("VPROR" EN+15!, EN+17, EN+20, EN+23*, EN+24!
^TMP($J EN+24!, ENA+3, ENA+4, ENQ+4!, DOSE+5, DOSE+7!
^VA(200 - [#200] ENQ+3, LASTPROV+5

Label References

Name Line Occurrences
$$DOSE ENA+9, ENA+13, ENA+23
$$GETCLS EN1+8
$$IV EN1+24
$$LASTPROV EN1+14
$$RX EN1+5
$$STATUS EN1+16
EN1 EN+6, EN+21
ENQ ENA+8
RESP ENA+5, ENA+12

Naked Globals

Name Field # of Occurrence
^( EN+16, LASTPROV+2, STRING+3, STRING+4
^(4 EN+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BEG EN~, EN+2*, EN+14
CLS EN1+2~, EN1+8*, EN1+9, EN1+10, EN1+11, EN1+19, EN1+23, EN1+25, ENA+7, ENA+8
ENA+18
CNT EN1+2~, ENA+11*, ENA+13*, ENA+14, ENA+15, ENA+21*, ENA+23*
CONJ ENA+10~*
CONJ( ENA+14
DA EN1+2~, ENA+11*, ENA+12, ENA+13, ENA+16, ENA+18, ENA+21*, STRING+1~, STRING+2*, STRING+3
, STRING+4
DAD EN+9~, EN+20*
DD ENA+10~, ENA+16*, ENA+20*, ENA+21*
DD( ENA+16*, ENA+20, ENA+21
DD(0 ENA+20
DFN EN~, EN+1*, EN+11, EN1+4, EN1+23, ENA+18
DOSE DOSE+1~, DOSE+2*, DOSE+3*, DOSE+5*, DOSE+6*, DOSE+8
DRUG EN1+2~, ENA+6*, ENA+16, ENA+20*, ENQ+1
END EN~, EN+2*, EN+14
>> FILTER("vaType" EN+10
>> FILTER("view" EN+12
I LASTPROV+1~, LASTPROV+2*, STRING+1~, STRING+3*, STRING+4*, RESP+1~, RESP+4*, RESP+5, RESP+6, RESP+7
, RESP+8
ID DOSE+1~, DOSE+6*, STRING~, STRING+2, RESP+1~, RESP+5*, RESP+8, RESP+10
IFN EN1~, EN1+3*, EN1+4, EN1+5, EN1+6, EN1+9, EN1+10, EN1+12, EN1+14, EN1+17
, EN1+21, EN1+23~, ENA+1, ENA+5, ENA+9, ENA+11, LASTPROV~, LASTPROV+2, STRING~, STRING+2
, STRING+3, STRING+4, GETCLS+1, GETCLS+4
J RESP+1~, RESP+7*, RESP+8, RESP+10
LOC EN1+2~, EN1+18*, EN1+20, EN1+22
MAX EN~, EN+2*, EN+16
MED EN1~, EN1+2!, EN1+9
MED("IMO" EN1+20*
MED("currentProvider" EN1+14*
MED("daysSupply" ENA+25*
MED("dose" ENA+9*, ENA+13*, ENA+14*, ENA+15, ENA+23*
MED("facility" EN1+22*
MED("fillsAllowed" ENA+27*
MED("form" ENA+3*
MED("id" EN1+9*, EN1+10*
MED("indication" EN1+17*
MED("location" EN1+18*
MED("medID" EN1+11*
MED("name" ENA+1*
MED("orderID" EN1+10*
MED("ordered" EN1+13*
MED("orderingProvider" EN1+13*
MED("parent" EN1+21*
MED("pharmacist" ENQ+3*
MED("ptInstructions" ENA+28*
MED("quantity" ENA+24*
MED("routing" ENA+26*
MED("sig" ENA+7*
MED("start" EN1+15*
MED("status" EN1+16*
MED("stop" EN1+15*, ENA+19*
MED("supply" ENA+4*
MED("type" EN1+25*, EN1+26*
MED("vaStatus" EN1+16*
MED("vaType" EN1+10*, EN1+26*
N DOSE~, DOSE+1*, DOSE+2, DOSE+3, DOSE+4, DOSE+6
OI EN1+2~, ENA+1*, ENA+2, ENA+3, ENA+4
ORDG EN+9~, EN+11*, EN+14
ORDIALOG EN+3~, RESP+2*
ORDIALOG( RESP+5, RESP+6
ORDUZ EN1+1~
ORFLG EN+9~, EN+12*, EN+13, EN+14
ORIFN EN~, EN+6, EN+9~, EN+16*, EN+17, EN+18, EN+20*, EN+21, EN+23, RESP~
, RESP+3, RX~, RX+2
ORL EN1+1~, EN1+18
ORLIST EN+9~, EN+16
ORNP EN1+1~, EN1+13
ORODT EN1+1~, EN1+13
ORPCL EN1+1~, IV+3
ORPK EN1+1~, EN1+6*, EN1+7, EN1+9, EN1+11, EN1+22, EN1+23, EN1+26, ENA+8, ENA+18*
, IV+1
ORPV EN1+1~
ORSTOP EN1+1~, EN1+15, ENA+9, ENA+15*, ENA+19
ORSTRT EN1+1~, EN1+15, ENA+9
ORSTS EN1+1~, EN1+16
ORTO EN1+1~, IV+2
ORTX EN1+1~
ORUPCHUK EN1+1~
ORUPCHUK( EN1+12
ORVP EN+9~, EN+11*, EN+14, EN1+1~
PKG RX+1~, RX+2*, RX+3
PKGIEN GETCLS+1~*, GETCLS+2, GETCLS+3
RESP RESP~
RESP( RESP+8*, RESP+10*
TYPE EN+9~, EN+10*, EN+11, RESP+1~, RESP+6*, RESP+8
U EN+19, EN+20, EN1+4, EN1+13, EN1+14, EN1+16, EN1+18, EN1+20, EN1+21, ENA+1
ENA+2, ENA+3, ENA+4, ENA+9, ENA+13, ENA+14, ENA+15, ENQ+2, ENQ+3, IV+2
, DOSE+3, DOSE+5, DOSE+6, LASTPROV+3, LASTPROV+4, LASTPROV+5, RESP+5, RESP+6, GETCLS+2, GETCLS+3
, RX+2
VPRCNT EN+9~, EN+15*, EN+16, EN+23*
VPRDLG RESP+1~
VPRDLG( RESP+4, RESP+7, RESP+8
VPRESP EN1+2~, ENA+5, ENA+12!
VPRESP( DOSE+6
VPRESP("CONJ" ENA+10
VPRESP("DOSE" DOSE+2
VPRESP("DRUG" ENA+6, ENA+16
VPRESP("INSTR" ENA+23, DOSE+3
VPRESP("PI" ENA+28
VPRESP("PICKUP" ENA+26
VPRESP("QTY" ENA+24
VPRESP("REFILLS" ENA+27
VPRESP("ROUTE" DOSE+4
VPRESP("SIG" ENA+7
VPRESP("SUPPLY" ENA+25
VPRITM EN+6, EN+9~, EN+21!, EN+22
VPRN EN+9~, EN+15*, EN+16*
W RESP+1~, RESP+9*
X EN1+2~, EN1+7*, EN1+8, EN1+12*, EN1+14*, EN1+17*, EN1+21*, ENQ+2*, ENQ+3, DOSE+1~
, DOSE+4*, DOSE+5, LASTPROV+1~, LASTPROV+2*, LASTPROV+3, LASTPROV+4, STRING+1~, STRING+4*, STRING+6, STATUS~
, STATUS+1*, STATUS+2, STATUS+3, STATUS+4, STATUS+5, STATUS+6, RESP+1~, RESP+8*, RESP+9, RX+1~
, RX+2*
X3 EN+9~, EN+18*, EN+19, EN+20
X4 EN+9~, EN+18*, EN+19
Y LASTPROV+1~*, LASTPROV+2, LASTPROV+3*, LASTPROV+4*, LASTPROV+5*, LASTPROV+6, STRING+1~, STRING+3*, STRING+5*, STRING+6*
, STRING+7, RESP+1~, RESP+9*, RESP+10, RX+1~*, RX+3*, RX+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All