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: VPRSDAOR

Package: Virtual Patient Record

Routine: VPRSDAOR


Information

VPRSDAOR ;SLC/MKB -- SDA Order utilities ;7/29/22 14:11

Source Information

Source file <VPRSDAOR.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 $$FIND1^DIC  $$EXTERNAL^DILFD  $$GET1^DIQ  
Order Entry Results Reporting 1 EN^ORQ1  

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: 3

Package Total Caller Graph
VA FileMan 2 ^DDE  ITEM  
Virtual Patient Record 1 VPRSDAP  

Entry Points

Name Comments DBIA/ICR reference
ORDERS(DG) ; -- get orders by Display Group
; Query called from GET^DDE, returns DLIST(#)=ien
; Expects context variables DFN, DSTRT, DSTOP, DMAX
RX(ORIFN) ; -- is order really a med? (non-PS order in display group)
BB(ORIFN) ; -- return 1 or 0, if order is for Blood Bank
NONORD ; -- get other orders: not Lab, Rad, or Med
; Query called from GET^DDE, returns DLIST(#)=ien
; Expects context variables DFN, DSTRT, DSTOP, DMAX
ORPKG ; -- get list of pkgs to exclude
OR1(ORIFN) ; -- define basic variables for any order [ID Action]
; Returns OR0, OR3, OR6, OR8, ORDAD, and ORSIG to Order entities
WP(ORIFN,ID) ; -- return a WP value from an order response as a string
ORDG(DG) ; -- return ien^name^VA100.98 for a DG abbreviation
LASTACT(ORIFN) ; -- return DA of current or last order action
ORSIG(ORIFN) ; -- return string of signature data from Order Action as
; Signature Status (#4) ^ Signed By (#5) ^ D/T Signed (#6), or
; Signature Status (#4) ^ ^ Release D/T (#16) if not e-signed
FLAGS(IFN,LIST) ; -- returns 1 or 0, if any flags are active [VPRSDAOR]
; Can also return .LIST(DA) of actions w/flag nodes

External References

Name Field # of Occurrence
$$FIND1^DIC ORPKG+3
$$EXTERNAL^DILFD ORSIG+15
$$GET1^DIQ RX+2
EN^ORQ1 ORDERS+8, NONORD+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
100.008 EXTERNAL^DILFD
^DIC(9.4 - [#9.4] FIND1^DIC,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] ORDERS+11, ORDERS+12, RX+2, BB+2, NONORD+10, NONORD+11, OR1+3, WP+2, WP+3, LASTACT+2
, LASTACT+3, ORSIG+4, ORSIG+8, ORSIG+11, FLAGS+4
^ORD(100.98 - [#100.98] ORDERS+5, BB+2, NONORD+5, ORDG+1, ORDG+2
^TMP("ORR" ORDERS+9, ORDERS+18!, NONORD+8, NONORD+14!

Label References

Name Line Occurrences
$$BB ORDERS+16
$$ORSIG OR1+5
$$RX ORDERS+15
ORPKG NONORD+5

Naked Globals

Name Field # of Occurrence
^( ORDERS+9, NONORD+8, WP+3, ORSIG+8, FLAGS+4
^(3 OR1+3, FLAGS+4
^(4 ORDERS+12
^(6 OR1+3
^(8 OR1+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA WP+1~, WP+2*, WP+3
>> DFN ORDERS+8, NONORD+7
DG ORDERS~, ORDERS+5*, ORDERS+7, ORDERS+15, ORDERS+16, BB+1~, BB+2*, BB+3, ORDG~, ORDG+1
>> DLIST( ORDERS+17*, NONORD+13*
>> DMAX ORDERS+9, NONORD+8
>> DSTOP ORDERS+8, NONORD+7
>> DSTRT ORDERS+8, NONORD+7
I WP+1~, WP+3*, ORSIG+3~, ORSIG+8*, FLAGS+2~, FLAGS+4*, FLAGS+5
ID WP~, WP+2
IFN FLAGS~, FLAGS+3*, FLAGS+4, FLAGS+5
LIST FLAGS~, FLAGS+3!
LIST( FLAGS+5*
NMSP ORPKG+1~, ORPKG+2*, ORPKG+3
>> OR0 OR1+3*
>> OR3 OR1+3*, OR1+4
>> OR6 OR1+3*
>> OR8 OR1+3*
>> ORDAD OR1+4*, ORSIG+10, ORSIG+11
ORDER ORDERS+4~, ORDERS+9*, ORDERS+10, ORDERS+11, ORDERS+12*, ORDERS+15, ORDERS+16, ORDERS+17, NONORD+4~, NONORD+8*
, NONORD+9, NONORD+10, NONORD+11, NONORD+13
ORDG ORDERS+4~, ORDERS+5*, ORDERS+8, NONORD+4~, NONORD+5*, NONORD+7
ORIFN RX~, RX+2, BB~, BB+2, OR1~, OR1+2*, OR1+3, OR1+5, WP~, WP+2
, WP+3, LASTACT~, LASTACT+1*, LASTACT+2, LASTACT+3, ORSIG~, ORSIG+4, ORSIG+8
ORIGVIEW ORDERS+4~, ORDERS+7*, NONORD+4~, NONORD+6*
ORKID ORDERS+4~, ORDERS+7*, ORDERS+8
ORLIST ORDERS+4~, ORDERS+9, NONORD+4~, NONORD+8
ORPKG NONORD+4~
ORPKG( NONORD+12, ORPKG+4*
>> ORSIG OR1+5*
PKG RX+1~, RX+2*, RX+3
U ORDERS+10, ORDERS+13, ORDERS+14, RX+2, BB+2, NONORD+9, NONORD+10, NONORD+11, OR1+4, ORDG+2
, LASTACT+2, ORSIG+5, ORSIG+7, ORSIG+9, ORSIG+10, ORSIG+12, ORSIG+14, ORSIG+15
VPRI ORDERS+4~, ORDERS+9*, NONORD+4~, NONORD+8*
VPRN ORDERS+4~, ORDERS+8*, ORDERS+9, ORDERS+17*, NONORD+4~, NONORD+7*, NONORD+8, NONORD+13*
X RX+1~, RX+2*, BB+1~, BB+2*, NONORD+4~, NONORD+11*, NONORD+12, ORPKG+1~, ORPKG+3*, ORPKG+4
, WP+1~, WP+3*, WP+4, WP+5, WP+6, ORDG+1~*, ORDG+2, ORSIG+3~, ORSIG+8*, ORSIG+9
, ORSIG+11*, ORSIG+12, ORSIG+15*, FLAGS+2~, FLAGS+4*, FLAGS+6
X0 ORSIG+3~, ORSIG+4*, ORSIG+5, ORSIG+7, ORSIG+10, ORSIG+14
X3 ORDERS+4~, ORDERS+12*, ORDERS+13, ORDERS+14
X4 ORDERS+4~, ORDERS+12*, ORDERS+13
Y RX+1~*, RX+3*, RX+4, BB+1~*, BB+3*, BB+4, WP+1~*, WP+4*, WP+5*, WP+6*
, WP+7, ORDG+1~*, ORDG+2*, ORDG+3, LASTACT+1~, LASTACT+2*, LASTACT+3*, LASTACT+4, ORSIG+3~*, ORSIG+5*
, ORSIG+7, ORSIG+9*, ORSIG+10, ORSIG+12*, ORSIG+14*, ORSIG+15*, ORSIG+16, FLAGS+2~*, FLAGS+6*, FLAGS+7
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