Routine: PSIVOD

Package	Total	Call Graph
Inpatient Medications	14	ENQL^PSGLW $$ENACTION^PSGOE1 Q^PSIV (ENSTOP,ENT)^PSIVCAL OC^PSIVOC DEL55^PSIVORE2 NEW55^PSIVORFB $$GTPCI^PSIVUTL WP^PSJAC (,RESTORE)^PSJHVARS $$HIDDEN^PSJLMUTL $$CHKSCHD^PSJMISC2 SETOC^PSJNEWOC $$DATE^PSJUTL2
List Manager	2	EN^VALM (FULL,PAUSE)^VALM1
Order Entry Results Reporting	1	ULK^ORX2
Registration	1	INP^VADPT
VA FileMan	1	YN^DICN

Package

Total

Call Graph

ENQL^PSGLW $$ENACTION^PSGOE1 Q^PSIV (ENSTOP,ENT)^PSIVCAL OC^PSIVOC DEL55^PSIVORE2 NEW55^PSIVORFB $$GTPCI^PSIVUTL
WP^PSJAC (,RESTORE)^PSJHVARS $$HIDDEN^PSJLMUTL $$CHKSCHD^PSJMISC2 SETOC^PSJNEWOC $$DATE^PSJUTL2

List Manager

EN^VALM (FULL,PAUSE)^VALM1

Order Entry Results Reporting

ULK^ORX2

Registration

INP^VADPT

VA FileMan

YN^DICN

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Inpatient Medications	1	PSJOE

Name	Comments	DBIA/ICR reference
COPY(DFN,OLDON)	;Ask to enter new order.
Q	; Kill and exit.
INMED	;
ULK	;
HK	;Queue job to print MAR labels generated for this patient.
SPSOL
CH	;

Name

Comments

DBIA/ICR reference

COPY(DFN,OLDON)

;Ask to enter new order.

; Kill and exit.

INMED

;

ULK

;

;Queue job to print MAR labels generated for this patient.

SPSOL

;

Name	Field # of Occurrence
YN^DICN	COPY+7
ULK^ORX2	ULK+2
ENQL^PSGLW	HK+3
$$ENACTION^PSGOE1	Q+5
Q^PSIV	Q+1
ENSTOP^PSIVCAL	COPY+17
ENT^PSIVCAL	COPY+17
OC^PSIVOC	COPY+20
DEL55^PSIVORE2	INMED+3
NEW55^PSIVORFB	COPY+21
$$GTPCI^PSIVUTL	COPY+9
WP^PSJAC	HK+3
^PSJHVARS	COPY+2
RESTORE^PSJHVARS	Q+6
$$HIDDEN^PSJLMUTL	COPY+2
$$CHKSCHD^PSJMISC2	COPY+15
SETOC^PSJNEWOC	INMED+8
$$DATE^PSJUTL2	COPY+11, Q+4
INP^VADPT	HK+3
EN^VALM	COPY+22, INMED+6
FULL^VALM1	COPY+6, COPY+24, COPY+31, INMED+11
PAUSE^VALM1	COPY+4, COPY+15, COPY+24, COPY+31, INMED+11

Name

Field # of Occurrence

COPY+7

ULK+2

HK+3

Q+5

Q+1

COPY+17

COPY+17

COPY+20

INMED+3

COPY+21

COPY+9

HK+3

COPY+2

Q+6

COPY+2

COPY+15

INMED+8

COPY+11, Q+4

HK+3

COPY+22, INMED+6

COPY+6, COPY+24, COPY+31, INMED+11

PAUSE^VALM1

COPY+4, COPY+15, COPY+24, COPY+31, INMED+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Do you want to copy this order" Line Location: COPY+7
Function Call: WRITE	Prompt: !!,"Order not copied." Line Location: COPY+15
Function Call: WRITE	Prompt: !!,"Order not copied" Line Location: COPY+24
Function Call: WRITE	Prompt: !!,"...copying..." Line Location: COPY+25
Function Call: WRITE	Prompt: !!?5,"You are finished with the new order.",!,"The following ACTION prompt is for the original order." Line Location: COPY+31
Function Call: WRITE	Prompt: !!,"Order not copied" Line Location: INMED+11
Function Call: WRITE	Prompt: !!?2,"Answer 'YES' to have a new, non-verified order created for this patient," Line Location: CH+1
Function Call: WRITE	Prompt: !,"using the information from this order. (The START and STOP dates will be",!,"recalculated.) Enter 'NO' (or '^') to stop now." Line Location: CH+2
Routine Call	VALM Line Location: COPY+22 INMED+6

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.45 - [#53.45]	Q+1
^PS(55 - [#55]	COPY+3, INMED+9, SPSOL
^VA(200 - [#200]	COPY+18

Name

Line Occurrences (* Changed, ! Killed)

^PS(53.45 - [#53.45]

Q+1

^PS(55 - [#55]

COPY+3, INMED+9, SPSOL

^VA(200 - [#200]

COPY+18

Name	Line Occurrences
CH	COPY+7
INMED	COPY+29
Q	COPY+3, COPY+8, COPY+15, COPY+20, COPY+23, INMED+10
ULK	INMED+9

Name

Line Occurrences

COPY+7

INMED

COPY+29

COPY+3, COPY+8, COPY+15, COPY+20, COPY+23, INMED+10

ULK

INMED+9

Name	Field # of Occurrence
^(	SPSOL
^(4	COPY+3

Name

Field # of Occurrence

SPSOL

^(4

COPY+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	COPY+1~, COPY+7*, COPY+8
DFN	COPY~, INMED+9, ULK+2, HK+1, HK+2~*, HK+4, SPSOL
DUZ	COPY+18, Q+1
FIL	Q+2!
I	COPY+1~, COPY+17*
I1	Q+2!
ND	Q+2!
>> ND2	COPY+17*
>> ND4	COPY+17*
OLDACT	COPY+10~*
OLDON	COPY~
OLDP	COPY+1~*, Q+7
ON	COPY+21~*
ON55	COPY+9, COPY+21~, INMED+2, INMED+3, INMED+8, INMED+9, SPSOL
ON55TMP	INMED+2~*, INMED+3
P	COPY+1, Q+7!*
P("CLRK"	COPY+18*
P("LF"	COPY+10*
P("LOG"	COPY+10, COPY+11
P("NAT"	COPY+10!, COPY+23, INMED+10
P("PON"	COPY+9*
P("PRNTON"	COPY+11*
P("RES"	COPY+9*
P(17	COPY+10, COPY+18
P(21	COPY+10, INMED+2, INMED+3*
P(9	COPY+14, COPY+16*
P21TMP	INMED+2~*, INMED+3
PC	Q+2!
PDM	Q+2!
>> PSGACT	COPY+10, Q+5
PSGCOPY	COPY+1~
PSGDT	COPY+11, Q+2!, Q+4
PSGID	Q+2!
PSGLMT	Q+2!
>> PSGOEAV	COPY+5*, COPY+18, COPY+29
>> PSGOP	HK+1, HK+2, HK+4*
PSGORD	COPY+3, COPY+9*, COPY+21~
PSGORQF	COPY+20~!
>> PSGP	COPY+3, Q+5
PSGSI	Q+2!
PSIVAC	COPY+9*, Q+2!
PSIVACEP	COPY+19!
PSIVCHG	COPY+10~, COPY+19, Q+2!, INMED+1
PSIVCOPY	COPY+1~, COPY+19, COPY+21, INMED+1*
PSIVOORD	COPY+1~, COPY+5*, Q+5
PSIVUP	COPY+9*, Q+2!
PSIVX	Q+2!
PSJACEPT	INMED+1!
PSJACNWP	HK+2~
PSJACPF	HK+2~, HK+3*
PSJAGYSV	Q+2!
PSJLSORX	ULK+1, ULK+2!
PSJNARC	Q+2!
>> PSJNEWOE	COPY+19*
>> PSJNKF	Q+1*
>> PSJOE	Q+1
PSJOLDNM	COPY+13~, COPY+15!, COPY+16!
PSJOLDNM("NEW_SCHD"	COPY+16
PSJOLDNM("ORD_SCHD"	COPY+14*
PSJOPC	Q+2!
PSJORD	COPY+5, COPY+9, COPY+21~, INMED+2
>> PSJORNAT	COPY+23
PSJPWD	HK+2~, HK+3*
PSJSYSL	HK+2~, HK+3
>> PSJSYSP0	COPY+5
>> PSJSYSU	COPY+5
PSJSYSW	HK+2~
PSJSYSW0	HK+2~
>> SPSOL	SPSOL*
U	COPY+3, COPY+5, HK+3, SPSOL
VAERR	HK+2~
VAIN	HK+2~
VAIN(4	HK+3
>> VALMBCK	COPY+19, Q+3, INMED+1*
X	ULK+2~*
XXX	SPSOL*, SPSOL+1!

Customize PDF page

Package: Inpatient Medications

Routine: PSIVOD

Information

Source Information

Call Graph

Call Graph Total: 19

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: