Routine: PSJCOM

Package	Total	Call Graph
Inpatient Medications	5	$$ENDTC^PSGMI ENWALL^PSGNE3 $$DDOK^PSGOE2 (DOSECHK,SETVAR)^PSJDOSE $$GETDUR^PSJLIVMD
VA Fileman	3	NOW^%DTC %XY^%RCR ^DIR
Registration	1	PAUSE^VALM1
Text Integration Utility	1	MAIN^TIUEDIT

Package

Total

Call Graph

Inpatient Medications

$$ENDTC^PSGMI ENWALL^PSGNE3 $$DDOK^PSGOE2 (DOSECHK,SETVAR)^PSJDOSE $$GETDUR^PSJLIVMD

VA Fileman

NOW^%DTC %XY^%RCR ^DIR

Registration

PAUSE^VALM1

Text Integration Utility

MAIN^TIUEDIT

Package	Total	Caller Graph
Inpatient Medications	4	PSGOEE PSGOEF1 PSGOEV PSJCOMV

Package

Total

Caller Graph

Inpatient Medications

PSGOEE PSGOEF1 PSGOEV PSJCOMV

Name	Comments	DBIA/ICR reference
DDCHK	; dispense drug check
UPD	;
NEWNVAL(PSGALORD,PSGALC,PSGFLD,PSGOLD)
DONE	;
VFY	; change status, move to 55, and change label record
CONT()	;

External References

Name	Field # of Occurrence
NOW^%DTC	NEWNVAL+13, NEWNVAL+20
%XY^%RCR	UPD+11
^DIR	VFY+35, DONE+3, CONT+4
$$ENDTC^PSGMI	VFY+20, VFY+21
ENWALL^PSGNE3	UPD+14
$$DDOK^PSGOE2	DDCHK+3
DOSECHK^PSJDOSE	VFY+4
SETVAR^PSJDOSE	VFY+5
$$GETDUR^PSJLIVMD	VFY+23
MAIN^TIUEDIT	DONE+5
PAUSE^VALM1	VFY+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "." Line Location: UPD+9
Function Call: WRITE	Prompt: "." Line Location: UPD+11
Function Call: WRITE	Prompt: !!,PSJDOSE("WARN"),!,PSJDOSE("WARN1") Line Location: VFY+5
Function Call: WRITE	Prompt: !,"...a few moments, please..." Line Location: VFY+9
Function Call: WRITE	Prompt: "." Line Location: VFY+14
Function Call: WRITE	Prompt: "." Line Location: VFY+16
Function Call: WRITE	Prompt: "." Line Location: VFY+17
Function Call: WRITE	Prompt: !,"ORDER VERIFIED.",! Line Location: VFY+34
Function Call: WRITE	Prompt: ! Line Location: DONE+3
Function Call: WRITE	Prompt: $C(7),!!,"This order must have at least one valid, active dispense drug to be verified." Line Location: DDCHK+5
Function Call: WRITE	Prompt: ! Line Location: CONT+2
Routine Call	DIR Line Location: VFY+35 DONE+3 CONT+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.1 - [#53.1]	UPD+2, UPD+5, UPD+6, VFY+2
^PS(55 - [#55]	UPD+13, UPD+14
^TMP("PSJCOM"	UPD+2, UPD+4, UPD+5, UPD+6, UPD+7, UPD+8, UPD+12, UPD+14, UPD+15, VFY+2 , VFY+13, VFY+14, VFY+18, VFY+33, VFY+37, NEWNVAL+11, NEWNVAL+17
^TMP("PSJCOM2"	VFY+12, VFY+15, VFY+16, VFY+18, VFY+24, VFY+33, VFY+37, DDCHK+1, NEWNVAL+10, NEWNVAL+18 , NEWNVAL+24*

Name	Line Occurrences
$$CONT	VFY+5
DDCHK	VFY+8
DONE	VFY+8
NEWNVAL	UPD+16, VFY+17, VFY+20, VFY+21
VFY	UPD+17, UPD+18

Name	Field # of Occurrence
^(	NEWNVAL+11, NEWNVAL+18
^(0	UPD+4, NEWNVAL+11, NEWNVAL+18*
^(2	UPD+4, UPD+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	NEWNVAL+13, NEWNVAL+15, NEWNVAL+20, NEWNVAL+22
>> %X	UPD+11*
>> %Y	UPD+11*
CHK	VFY+8, DONE+1, DONE+2, DONE+6!, DDCHK+1, DDCHK+3, DDCHK+4
DA	DONE+6!
DIE	DONE+6!
DIR	VFY+35!, DONE+3~, CONT+1~, CONT+2!
DIR("A"	DONE+3, CONT+3
DIR("B"	DONE+3, CONT+3
DIR(0	VFY+35, DONE+3, CONT+3*
DIRUT	CONT+1~, CONT+2!
DP	DONE+6!
DR	DONE+6!
>> DRGF	DDCHK+1*, DDCHK+2, DDCHK+3
DUR	VFY+22~, VFY+23*, VFY+24
>> DURON	VFY+22*, VFY+23
DURORD	VFY+22~
DUZ	VFY+32, NEWNVAL+15, NEWNVAL+22
F	DONE+6!
ND	DONE+6!
>> ON	VFY+22
PSGAL	DONE+6!
PSGAL("N"	NEWNVAL+11, NEWNVAL+17, NEWNVAL+18, NEWNVAL+24
PSGALC	NEWNVAL~, NEWNVAL+15, NEWNVAL+22
PSGALFN	VFY+26!
PSGALORD	NEWNVAL~, NEWNVAL+10, NEWNVAL+11, NEWNVAL+17, NEWNVAL+18, NEWNVAL+24
>> PSGAT	UPD+15
>> PSGDO	UPD+15
>> PSGDT	UPD+14, VFY+32, NEWNVAL+13, NEWNVAL+20
>> PSGFD	UPD+4
PSGFLD	NEWNVAL~, NEWNVAL+15, NEWNVAL+22
>> PSGHSM	UPD+8
>> PSGND	UPD+12*
PSGODA	DONE+6!
>> PSGODDD(1	VFY+27
>> PSGOEAV	UPD+16, UPD+17, UPD+18
>> PSGOEEF(109	VFY+6*
>> PSGOEEWF	UPD+10*, UPD+11
>> PSGOHSM	UPD+8
PSGOLD	NEWNVAL~, NEWNVAL+14, NEWNVAL+15, NEWNVAL+21, NEWNVAL+22
>> PSGONF	VFY+27
>> PSGORD	UPD+2, UPD+4, UPD+5, UPD+6, UPD+7, UPD+8, UPD+12, UPD+14, UPD+15, UPD+16 , VFY+2, VFY+10, VFY+11, VFY+12, VFY+13, VFY+14, VFY+15, VFY+16, VFY+17, VFY+18 , VFY+20, VFY+21, VFY+22, VFY+24, VFY+28, VFY+33, VFY+37, DDCHK+1
>> PSGORDP	VFY+11*
>> PSGP	UPD+13, UPD+14, VFY+23, DONE+5
>> PSGPD	DDCHK+2*, DDCHK+3
>> PSGRDTX	VFY+23
PSGRFD	VFY+13, VFY+15, VFY+21*, VFY+26!
PSGRSD	VFY+13, VFY+15, VFY+19, VFY+20*, VFY+26!
>> PSGS0XT	UPD+15
>> PSGSCH	UPD+3, UPD+7
>> PSGSD	UPD+4
>> PSGSI	UPD+5, UPD+6
>> PSGSM	UPD+8
>> PSGST	UPD+3*, UPD+4
PSGX	VFY+13~, VFY+15~
>> PSJACEPT	VFY+5, VFY+7*
>> PSJCOM	UPD+1, VFY+1
PSJDOSE	VFY+3~, DONE+6!
PSJDOSE("WARN"	VFY+5
PSJDOSE("WARN1"	VFY+5
PSJDSFLG	VFY+3~, VFY+5
>> PSJOWALL	UPD+13*
>> PSJPRI	DONE+2
>> PSJRNF	UPD+18
>> PSJSPEED	VFY+34, VFY+35, DONE+2
>> PSJSYSP	UPD+11
>> PSJSYSU	UPD+16, UPD+17, VFY+17, VFY+28, VFY+29, VFY+32, DONE+2
PSJVAR	DONE+6!
>> Q	UPD+11, NEWNVAL+11, NEWNVAL+15, NEWNVAL+17, NEWNVAL+18, NEWNVAL+22*, NEWNVAL+24
>> QQ	NEWNVAL+11, NEWNVAL+18
>> TIUDA	DONE+5
U	UPD+5, UPD+6, UPD+12, UPD+14, UPD+15, VFY+13, VFY+15, VFY+23, VFY+29
>> VALMBCK	VFY+36, DONE+6
VND4	VFY+18, VFY+28, VFY+29, VFY+31, VFY+32, VFY+33, DONE+6!
X	UPD+12, UPD+14, VFY+27~*, VFY+28, DONE+6!
Y	DONE+4, CONT+1~, CONT+5

Customize PDF page

Package: Inpatient Medications

Routine: PSJCOM

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: