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

Package: Inpatient Medications

Routine: PSGPLXR


Information

PSGPLXR ;BIR/MLM-EXECUTE PICK LIST XREFS ;28 FEB 96 / 2:45 PM

Source Information

Source file <PSGPLXR.m>

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Inpatient Medications 4 ^PS(53.5  DISPENSE DRUG  ORDER  PATIENT  

Entry Points

Name Comments DBIA/ICR reference
ENA(S1,ACT) ; Set A xref for Pick List # and Ward Group.
SET ; Gather data needed to update "AC","AU" xref
EN535(S1,ACT,XREF,FIELD,OLDV) ; Update "AC","AU" x-ref for 53.5 (PICK LIST FILE)
EN5351(S1,S2,ACT,XREF,FIELD,OLDV) ; Update "AC","AU" x-refs for 53.51 (PATIENT MULTIPLE)
ENABO(S1,XREF,ACT) ;Set AB/AO xref for Pick List, Ward Group, & Start date.
EN5352(S1,S2,S3,ACT,XREF,FIELD,OLDV)
SET2 ; if this is a "kill", see if a field and old value was passed in
EN5353(S1,S2,S3,S4,ACT,XREF,FIELD,OLDV)
SETVAR ;

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] SET+4
^PS(50.7 - [#50.7] SET+6
^PS(53.5 - [#53.5] EN535+1, EN5351+1, EN5351+4, EN5351+5*, EN5351+6, EN5352+2, EN5352+5, EN5352+6, EN5352+7*, EN5352+8
, EN5352+9, EN5353+4, EN5353+5, EN5353+6*, EN5353+7, SET+1, SET+3, SET+6, SET+8, ENABO+1
, ENABO+3*, ENABO+4*, ENABO+5!, ENA+1, ENA+3*, ENA+4!
^PS(55 - [#55] SET+8
^PSDRUG - [#50] SET+8

Label References

Name Line Occurrences
EN5351 EN535+1
EN5352 EN5351+6
EN5353 EN5352+9
SET EN5351+2, EN5352+3, EN5353+2
SET2 SET+5, SET+7
SETVAR EN535+1, EN5351+1, EN5352+1, EN5353+1

Naked Globals

Name Field # of Occurrence
^( EN5352+8!, EN5353+7!
^("NO DISPENSE DRUG" EN5352+6!, EN5353+5!
^("NO ORDERS" EN5351+4!, EN5352+5!, EN5353+4!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT EN535~, EN535+1, EN5351~, EN5351+5, EN5351+6, EN5352~, EN5352+7, EN5352+9, EN5353~, EN5353+6
, SET2+1, ENABO~, ENABO+2, ENA~, ENA+3
AT EN5351+1~, EN5351+3, EN5351+4, EN5351+5, EN5352+1~, EN5352+4, EN5352+5, EN5352+6, EN5352+7, EN5352+8
, EN5353+1~, EN5353+3, EN5353+4, EN5353+5, EN5353+6, EN5353+7, SET+2*
FIELD EN535~, EN535+1, EN5351~, EN5351+6, EN5352~, EN5352+9, EN5353~, SET2+1, SET2+2, SETVAR+1*
ND EN5351+1~, EN5352+1~, EN5353+1~, SET+1*, SET+2, SET+3, SET+4
OLDV EN535~, EN535+1, EN5351~, EN5351+6, EN5352~, EN5352+9, EN5353~, SET2+1, SET2+2, SETVAR+1*
ON EN5351+1~, EN5352+1~, EN5353+1~, SET+6*, SET+8
PD EN5351+1~, EN5352+1~, EN5352+4, EN5352+6, EN5352+7, EN5352+8, EN5353+1~, EN5353+3, EN5353+5, EN5353+6
, EN5353+7, SET+6*
PDD EN5351+1~, EN5352+1~, EN5353+1~, EN5353+3, EN5353+6, EN5353+7, SET+8*
PL EN5351+1~, EN5351+3, EN5351+4, EN5351+5, EN5352+1~, EN5352+4, EN5352+5, EN5352+6, EN5352+7, EN5352+8
, EN5353+1~, EN5353+3, EN5353+4, EN5353+5, EN5353+6, EN5353+7, SET+1*
PT EN5351+1~, EN5351+3, EN5351+4, EN5351+5, EN5352+1~, EN5352+4, EN5352+5, EN5352+6, EN5352+7, EN5352+8
, EN5353+1~, EN5353+3, EN5353+4, EN5353+5, EN5353+6, EN5353+7, SET+4*
RB EN5351+1~, EN5351+3, EN5351+4, EN5351+5, EN5352+1~, EN5352+5, EN5352+6, EN5352+7, EN5352+8, EN5353+1~
, EN5353+4, EN5353+5, EN5353+6, EN5353+7, SET+4*
S1 EN535~, EN535+1, EN5351~, EN5351+1, EN5351+6, EN5352~, EN5352+2, EN5352+9, EN5353~, SET+1
, SET+3, SET+6, SET+8, ENABO~, ENABO+1, ENABO+3, ENABO+4, ENABO+5, ENA~, ENA+1
, ENA+3, ENA+4
S2 EN535+1*, EN5351~, EN5351+1, EN5351+6, EN5352~, EN5352+2, EN5352+9, EN5353~, SET+1, SET+3
, SET+4, SET+6, SET+8
S3 EN5351+1*, EN5351+5, EN5351+6*, EN5352~, EN5352+2, EN5352+9, EN5353~, SET+5, SET+6, SET+8
S4 EN5352+2*, EN5352+9*, EN5353~, SET+7, SET+8
ST EN5351+1~, EN5352+1~, EN5352+4, EN5352+6, EN5352+7, EN5352+8, EN5353+1~, EN5353+3, EN5353+5, EN5353+6
, EN5353+7, SET+6*
U SET+2, SET+3, SET+4, SET+6, SET+8, ENABO+3, ENABO+4, ENABO+5, ENA+3, ENA+4
UP EN5351+1~, EN5352+1~, EN5352+7, EN5352+8, EN5353+1~, EN5353+6, EN5353+7, SET+6*
UP1 EN5351+1~, EN5351+5, EN5352+1~, EN5353+1~, SET+2*
WD EN5351+1~, EN5351+3, EN5351+4, EN5351+5, EN5352+1~, EN5352+4, EN5352+5, EN5352+6, EN5352+7, EN5352+8
, EN5353+1~, EN5353+3, EN5353+4, EN5353+5, EN5353+6, EN5353+7, SET+2*
X EN5351+1~, EN5352+1~, EN5353+1~, SET+1*, SET+2, SET+3*, SET+4, SET+6*, SET+8*, ENABO+1~*
, ENABO+3, ENABO+4, ENABO+5, ENA+1~*, ENA+2, ENA+3, ENA+4
XREF EN535~, EN535+1, EN5351~, EN5351+4, EN5351+5, EN5351+6, EN5352~, EN5352+5, EN5352+6, EN5352+7
, EN5352+8, EN5352+9, EN5353~, EN5353+4, EN5353+5, EN5353+6, EN5353+7, SET2+1, ENABO~, ENABO+3
, ENABO+4, ENABO+5
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All