Routine: PSJADT

Package	Total	Call Graph
Inpatient Medications	4	ENSET0^PSGNE3 (ENCV,ENKV)^PSGSETU (,ENDC)^PSJADT0 (ENDEL,ENHOLD,ENUW)^PSJADT1
Registration	1	(IN5,INP)^VADPT

Package	Total	Caller Graph
Inpatient Medications	1	PSJ OR PAT ADT
Registration	1	^DPT

Entry Points

Name	Comments	DBIA/ICR reference
END	; he be dead
LC	; is movement the latest one of its type?
TRN	;
DONE	;
ADM	; admit ; ********** old way ************************
DIS	; discharge

External References

Name	Field # of Occurrence
ENSET0^PSGNE3	DONE+1
ENCV^PSGSETU	PSJADT+9
ENKV^PSGSETU	DONE+4
^PSJADT0	TRN+8
ENDC^PSJADT0	TRN+12, TRN+13, DIS+1, ADM+6
ENDEL^PSJADT1	PSJADT+13
ENHOLD^PSJADT1	TRN+7, TRN+11
ENUW^PSJADT1	PSJADT+14, TRN+14
IN5^VADPT	TRN+4, DIS+1, ADM+6, LC+5, END+8
INP^VADPT	TRN+12, END+11

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	TRN+13
^PS(55 - [#55]	PSJADT+10, DONE+1, DONE+2
^PS(59.7 - [#59.7]	TRN+6, TRN+12, TRN+13
^UTILITY("DGPM"	PSJADT+13, PSJADT+15, PSJADT+16, TRN+2, ADM+5, LC+11

Label References

Name	Line Occurrences
ADM	PSJADT+18
DIS	PSJADT+17, END+11
DONE	PSJADT+14, PSJADT+19, TRN+3, TRN+6, TRN+10, TRN+12, TRN+13, END+11
LC	PSJADT+15, PSJADT+16, TRN+2
PSJADT	END+8

Naked Globals

Name	Field # of Occurrence
^(	PSJADT+15, PSJADT+16, TRN+2
^("A"	PSJADT+13, PSJADT+15, PSJADT+16, TRN+2
^("P"	PSJADT+15, PSJADT+16, TRN+2, LC+11
^(0	TRN+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AM	DONE+3!
D	END+1~
D0	END+1~
D1	END+1~
D2	END+1~
DA	DONE+3!, END+1~
DB	END+1~
DC	END+1~
DE	END+1~
>> DFN	PSJADT+10, PSJADT+13, END+1*
DG	END+1~
>> DGPMDA	PSJADT+13
>> DGPMP	PSJADT+13
>> DGQUIET	PSJADT+8, DONE+4
DH	END+1~
DI	END+1~
DIC	END+1~
DIE	DONE+3!, END+1~
DIG	END+1~
DIH	END+1~
DIK	END+1~
DIQ	END+1~
DIR	END+1~
DIS	DONE+3!
DIU	END+1~
DIV	END+1~
DIW	END+1~
DK	END+1~
DL	END+1~
DM	END+1~
DP	END+1~
DQ	END+1~
DR	DONE+3!, END+1~
DU	END+1~
DV	END+1~
DW	END+1~
FS	TRN+13*, DONE+3!
MR	END+1~
N	DONE+4!
NX	END+1~
ON	DONE+3!
ORIFN	DONE+3!
P	DONE+4!
P("NAT"	PSJADT+10*, DONE+4!
PS	DONE+4!
PSGAL	DONE+3!
PSGALO	TRN+8, TRN+11, TRN+12, TRN+13, DONE+3!, DIS+1, ADM+6
PSGALR	DONE+3!
>> PSGDT	LC+11
PSGOEHA	TRN+6, TRN+7, TRN+11, DONE+3!
>> PSGP	PSJADT+10*, DONE+1, DONE+2
PSGTOL	DONE+3!
PSGTOO	DONE+3!
PSGUOW	DONE+3!
PSIVLN	DONE+3!
PSIVNST	DONE+3!
PSIVREA	DONE+3!
PSIVRES	DONE+3!
PSJADTWD	PSJADT+10!, TRN+12, DONE+3!, DIS+1, ADM+6*
PSJAM	PSJADT+10, PSJADT+16, PSJADT+18, DONE+3!, ADM+5
PSJCF	PSJADT+10, PSJADT+13, PSJADT+14, PSJADT+19, DONE+3!, DIS+1, ADM+5, ADM+6
PSJDA	DONE+3!
PSJDCA	PSJADT+15, DONE+3!, DIS+1, END+9
PSJDD	PSJADT+15, DONE+3!, LC+11, END+8
PSJDEL	PSJADT+9~, PSJADT+13*, PSJADT+14
PSJDF	PSJADT+17, DONE+3!, DIS+1, END+9
PSJDM	PSJADT+10, PSJADT+15, PSJADT+17, DONE+3!
PSJFW	PSJADT+10, TRN+4, TRN+6, TRN+12, TRN+13, DONE+3!, DIS+1, ADM+6
PSJIVDCF	DONE+3!
PSJIVON	DONE+3!
>> PSJNKF	DONE+2*
PSJNOO	PSJADT+10*, DONE+4!
PSJPAD	TRN+4, TRN+7, TRN+11, DONE+3!, DIS+1, ADM+6*
PSJPDD	DONE+3!
PSJPIND	PSJADT+10, TRN+2, TRN+10, TRN+11, DONE+2, DONE+3!, DIS+1, ADM+5*
PSJPWD	DONE+3!
PSJPWDN	DONE+3!
PSJQUIET	PSJADT+8, PSJADT+13, PSJADT+14, DONE+4, END+8*, END+11!
PSJRSB	LC+4~
PSJRSB("X"	LC+4*, LC+6
PSJRSB("Y"	LC+4*, LC+8
PSJS	DONE+4!
PSJSYSL	PSJADT+9~
PSJSYSP	PSJADT+9~
PSJSYSP0	PSJADT+9~
PSJSYSU	PSJADT+9~
PSJSYSW	PSJADT+9~
PSJSYSW0	PSJADT+9~
PSJTM	PSJADT+10, TRN+2, TRN+3, DONE+4!
PSJTMT	PSJADT+10, TRN+2, TRN+3, TRN+6, TRN+7, TRN+8, TRN+10, TRN+11, TRN+12, DONE+4!
>> Q	PSJADT+15, PSJADT+16, TRN+1, TRN+2, LC+11
Q1	DONE+4!
Q2	DONE+4!
RZ	DONE+4!
ST	DONE+4!
TS	TRN+13*, DONE+4!
TSCN	DONE+4!
U	PSJADT+13, TRN+6
VA200	PSJADT+9~, PSJADT+10*
VAIN	PSJADT+9~, END+1~
VAIN(4	TRN+12, TRN+13
VAIP	PSJADT+9~, TRN+4!, DIS+1!, LC+5~, END+1~, END+8~
VAIP("D"	TRN+4, ADM+6, LC+5, END+8
VAIP("E"	DIS+1, ADM+6
VAIP(13	TRN+4, DIS+1, ADM+6, END+9
VAIP(14	ADM+6
VAIP(15	TRN+4
VAIP(17	DIS+1, ADM+6
VAIP(3	LC+5
X	PSJADT+9~, PSJADT+15, PSJADT+16, TRN+2, LC+4, LC+6, LC+7, LC+11, END+8
>> Y	PSJADT+15, PSJADT+16, TRN+1, LC+4, LC+5, LC+8, LC+11
Z	DONE+4!, LC+5*, LC+7

Customize PDF page

Package: Inpatient Medications

Routine: PSJADT

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: