Routine: PSGPLXR

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Caller Graph
Entry Points
Global Variables Directly Accessed
Label References
Naked Globals
Local Variables

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

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

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

Customize PDF page

Package: Inpatient Medications

Routine: PSGPLXR

Caller Graph Total: 4