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,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

External References

Name Field # of Occurrence
$$GET1^DIQ GETCLS+1, GETCLS+4
GETDLG1^ORCD RESP+2
GETORDER^ORCD RESP+3
EN^ORQ1 EN+12
$$OI^ORX8 ENA+1
$$PKGID^ORX8 EN1+4, ENA+18
EN^ORX8 EN1+10
OEL^PSOORRL EN1+20, ENA+18
ZERO^PSS50P7 ENA+2
ALL^PSS51P2 DOSE+4
$$FAC^VPRD EN1+19
$$PROVSPC^VPRD EN1+11, EN1+12
NDF^VPRDPS ENA+21, ENQ+1
XML^VPRDPS EN+6, EN+20
IV^VPRDPSI EN1+21
RX^VPRDPSO EN1+7

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] GETCLS+2, GETCLS+3
^OR(100 - [#100] EN+16, EN1+3, EN1+18, ENA+9, ENA+11, ENA+13, LASTPROV+2, STRING+2, STRING+3, STRING+4
^ORD(100.98 - [#100.98] EN+11
^SC - [#44] EN1+15, EN1+17
^TMP("ORR" EN+14, EN+22!
^TMP("PS" ENA+6, ENA+18, ENQ+2, ENQ+4!, IV+4
^TMP("VPROR" EN+13!, EN+15, EN+18, EN+21*, EN+22!
^TMP($J EN+22!, 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+6
$$IV EN1+21
$$LASTPROV EN1+12
$$STATUS EN1+14
EN1 EN+6, EN+19
ENQ ENA+8
RESP ENA+5, ENA+12

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BEG EN~, EN+2*, EN+12
CLS EN1+2~, EN1+6*, EN1+7, EN1+8, EN1+9, EN1+16, EN1+20, EN1+22, 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+18*
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+20, 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+12
>> FILTER("vaType" EN+10
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+7, EN1+8, EN1+10, EN1+12, EN1+18, EN1+20~, 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+15*, EN1+17, EN1+19
MAX EN~, EN+2*, EN+14
MED EN1~, EN1+2!, EN1+7
MED("IMO" EN1+17*
MED("currentProvider" EN1+12*
MED("daysSupply" ENA+25*
MED("dose" ENA+9*, ENA+13*, ENA+14*, ENA+15, ENA+23*
MED("facility" EN1+19*
MED("fillsAllowed" ENA+27*
MED("form" ENA+3*
MED("id" EN1+7*, EN1+8*
MED("location" EN1+15*
MED("medID" EN1+9*
MED("name" ENA+1*
MED("orderID" EN1+8*
MED("ordered" EN1+11*
MED("orderingProvider" EN1+11*
MED("parent" EN1+18*
MED("pharmacist" ENQ+3*
MED("ptInstructions" ENA+28*
MED("quantity" ENA+24*
MED("routing" ENA+26*
MED("sig" ENA+7*
MED("start" EN1+13*
MED("status" EN1+14*
MED("stop" EN1+13*, ENA+19*
MED("supply" ENA+4*
MED("type" EN1+22*, EN1+23*
MED("vaStatus" EN1+14*
MED("vaType" EN1+8*, EN1+23*
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+12
ORDIALOG EN+3~, RESP+2*
ORDIALOG( RESP+5, RESP+6
ORDUZ EN1+1~
ORIFN EN~, EN+6, EN+9~, EN+14*, EN+15*, EN+16, EN+18*, EN+19, EN+21, RESP~
, RESP+3
ORL EN1+1~, EN1+15
ORLIST EN+9~, EN+14
ORNP EN1+1~, EN1+11
ORODT EN1+1~, EN1+11
ORPCL EN1+1~, IV+3
ORPK EN1+1~, EN1+4*, EN1+5, EN1+7, EN1+9, EN1+19, EN1+20, EN1+23, ENA+8, ENA+18*
, IV+1
ORPV EN1+1~
ORSTOP EN1+1~, EN1+13, ENA+9, ENA+15*, ENA+19
ORSTRT EN1+1~, EN1+13, ENA+9
ORSTS EN1+1~, EN1+14
ORTO EN1+1~, IV+2
ORTX EN1+1~
ORUPCHUK EN1+1~
ORUPCHUK( EN1+10
ORVP EN+9~, EN+11*, EN+12, EN1+1~
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+17, EN+18, EN1+11, EN1+12, EN1+14, EN1+15, EN1+17, EN1+18, 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
VPRCNT EN+9~, EN+13*, EN+14, EN+21*
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+19!, EN+20
VPRN EN+9~, EN+13*, EN+14*
W RESP+1~, RESP+9*
X EN1+2~, EN1+5*, EN1+6, EN1+10*, EN1+12*, EN1+18*, 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
X3 EN+9~, EN+16*, EN+17, EN+18
X4 EN+9~, EN+16*, EN+17
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
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