Package	Total	Call Graph
Inpatient Medications	2	(,ENINIT,ENRSET,ENT)^PSIVWL1 $$ONE^PSJBCMA
Kernel	2	(T0,T1)^%ZOSV ^%ZTLOAD
VA FileMan	2	^%DT (,C,DW,NOW)^%DTC
Registration	1	INP^VADPT

Package	Total	Caller Graph
Inpatient Medications	4	PSIVCAL PSIVORE1 PSIVSP PSJI WARD
Kernel	1	^DIC(19
Pharmacy Data Management	1	PSSDDUT3

Name	Comments	DBIA/ICR reference
DEQ	;
Q
SETP
MAN1
MAN2
MAN3	;I P(4)=""!(P(4)'=PSIVT) S NOFLG=1 D NOW^%DTC S PSIVRUN=$E(%,1,12) K %,%I,%H D HDR^PSIVWL1 W !!,"**NO DATA FOUND FOR THIS REPORT!*" Q
QUE
ENP3	;
QSP
CHK
ENP4
ENT	;PSIVMIN=# of min. to add or sub, PSIVSD=date to add or sub from in FM format -- Answer ret. in 'Y'	ICR #2154 Status: Active Usage: Private

Name	Field # of Occurrence
^%DT	PSIVWL+6
^%DTC	ENP3+5
C^%DTC	ENT+3
DW^%DTC	ENP4+2
NOW^%DTC	DEQ+2
T0^%ZOSV	DEQ+3
T1^%ZOSV	DEQ+5
^%ZTLOAD	QUE+2
^PSIVWL1	PSIVWL+8
ENINIT^PSIVWL1	DEQ+4
ENRSET^PSIVWL1	PSIVWL+7
ENT^PSIVWL1	DEQ+6
$$ONE^PSJBCMA	SETP+2
INP^VADPT	MAN1

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: DTIME Line Location: PSIVWL+6
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: DEQ+2
Function Call: WRITE	Prompt: !!,"** WARNING --- WARD LIST NOT RUN, LABEL RUN IN PROGRESS **" Line Location: DEQ+2
Function Call: WRITE	Prompt: !!,"**NO DATA FOUND FOR THIS REPORT!*" Line Location: MAN3+0

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	MAN1
^PS(51.1 - [#51.1]	ENP4+3, ENP4+10
^PS(55 - [#55]	DEQ+2, DEQ+4, Q, SETP, SETP+3, MAN1, MAN2*, MAN2+2, MAN3+2

Name	Line Occurrences
CHK	ENP3+4
ENP3	MAN3+4
ENP4	ENP3+4
ENT	ENP3+5, ENP3+7
MAN1	DEQ+4
MAN2	MAN3+3, MAN3+4
MAN3	MAN1
PSIVWL	PSIVWL+6, PSIVWL+7
Q	PSIVWL+6, PSIVWL+8, PSIVWL+9, DEQ+2
QSP	ENP3+3, ENP3+4, ENP3+5
QUE	PSIVWL+9
SETP	MAN1

Name	Field # of Occurrence
>> %	DEQ+2
%DT	PSIVWL+6!*, Q!
%T	Q+1!
A	SETP+1~, SETP+3*
ADM	ENP4+1~, ENP4+7, ENP4+14
ADMSD	ENP4+1~, ENP4+6, ENP4+7, ENP4+13, ENP4+14
ADMTM	ENP4+1~, ENP4+7, ENP4+14
CD	MAN3+4*, ENP3+3, ENP3+6, ENP3+7, QSP!, ENP4, ENP4+2, ENP4+6, ENP4+7, ENP4+13 , ENP4+14, ENP4+17
D	Q+1!
DFN	Q+1!, SETP, SETP+2, SETP+3, MAN1*, MAN2, MAN2+2, MAN3+2
DIC	Q!
DT	PSIVWL+7
DTIME	PSIVWL+6
HOUR	ENT+1*, ENT+3, ENT+5!
HR	ENT+1, ENT+2, ENT+3*, ENT+5!
I	Q+1!, QUE*
IOF	DEQ+2, Q
ION	PSIVWL+9
MI	Q!, ENP4+17, ENT+1, ENT+2, ENT+3, ENT+5!
MIN	ENT+1*, ENT+2, ENT+5!
NOFLG	DEQ+3*, Q!, MAN1
O	ENT+5!
OD	MAN3+4*, ENP3+3, ENP3+5, ENP3+6, ENP3+7, QSP!, ENP4, ENP4+2, ENP4+6, ENP4+7 , ENP4+13, ENP4+14, ENP4+17
ODCDWD	ENP4+1~, ENP4+2*, ENP4+5, ENP4+6, ENP4+12, ENP4+13
ON	Q!, SETP, SETP+2, SETP+3, MAN1*, MAN2, MAN2+2, MAN3+2
P	Q+1!
P(	SETP*
P("NUMLBL"	QSP
P(11	ENP3+2, ENP3+3, ENP3+4, ENP3+5, CHK, ENP4+7, ENP4+14, ENP4+17
P(15	ENP3+2
P(17	MAN3+2, MAN3+3
P(2	MAN3+4, ENP3+2, ENP4
P(23	ENP3+4
P(3	MAN3+4, ENP3+2, ENP3+7, ENP4+17
P(4	MAN2, MAN3+1, MAN3+2, ENP3+3, ENP3+4
P(5	ENP3+4
P(7	QSP, ENP4+17
P(8	MAN2
P(9	SETP+2, ENP3+3, ENP4+3, ENP4+10
P9	ENP4+1~, ENP4+3, ENP4+4, ENP4+5, ENP4+6, ENP4+10, ENP4+11, ENP4+12, ENP4+13
PSCT	Q!
PSGCNT	Q!, MAN2, MAN2+2, MAN3+3, ENP3+2, QSP*
PSGSA	Q!, MAN2, MAN3+3, ENP3+2, ENP3+3, ENP3+6, ENP3+7, QSP, ENP4+7, ENP4+14* , ENP4+17*
PSIV	Q!
PSIV("NME"	MAN1*
PSIV1	DEQ+4*, Q+1!
PSIVCD	PSIVWL+8, Q+1!
PSIVCD(	MAN3+4
PSIVDT	PSIVWL+7*, Q!
PSIVDT1	DEQ+4*, Q!, MAN1
PSIVMI	ENP3+2, ENP3+5, ENP3+7, QSP!, ENP4+17
PSIVMIN	ENP3+5, ENP3+7, ENT+1, ENT+5!
PSIVMT	Q!
PSIVMT(	QUE
PSIVOD	PSIVWL+8, Q!
PSIVOD(	DEQ+4, MAN2, MAN3+2, MAN3+4
>> PSIVPR	PSIVWL+9, Q, QUE
PSIVRUN	Q!
PSIVSD	ENP3+2, ENP3+3, ENP3+5, ENP3+6, ENP3+7, QSP!, ENP4, ENP4+17*, ENT+1
>> PSIVSN	DEQ+2, Q, MAN2, MAN3+2
>> PSIVT	DEQ+4, MAN3+1, MAN3+4, QUE
PSIVX	ENP4+1~, ENP4+3, ENP4+4, ENP4+9, ENP4+10, ENP4+11, ENP4+16
PSJOK	DEQ+1~, SETP+3*, MAN1
PSJST	SETP+1~, SETP+2*, SETP+3
PSM	Q+1!
U	MAN1, MAN2, ENP4+2
VAERR	Q+1!
>> VAIN(4	MAN2
WRD	PSIVWL+6!
X	PSIVWL+6, Q+1!, SETP, QUE+1, ENP3+3, ENP3+5, ENP3+7, ENP4+2, ENP4+3, ENP4+4 , ENP4+5, ENP4+6, ENP4+10, ENP4+11, ENP4+12, ENP4+13, ENT+3
X1	ENP3+5, ENT+1, ENT+3, ENT+5!
X2	ENP3+5, ENT+1, ENT+3*, ENT+5!
>> XRTL	DEQ+3, DEQ+5
>> XRTN	DEQ+5*
Y	PSIVWL+6, PSIVWL+7, DEQ+2, Q+1!, SETP, ENP3+5, ENP3+6, ENP3+7, CHK, ENP4+17* , ENT+3*
Z	Q+1!
Z1	Q+1!
Z2	Q+1!
>> ZTDESC	QUE*
>> ZTIO	QUE*
>> ZTQUEUED	Q+1
>> ZTREQ	Q+1*
>> ZTRTN	QUE*
>> ZTSAVE(	QUE+1*
>> ZTSAVE("PSIVCD("""	QUE*
>> ZTSAVE("PSIVMT("""	QUE*
>> ZTSAVE("PSIVOD("""	QUE*
ZTSK	Q+1!, QUE+2

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Customize PDF page

Package: Inpatient Medications

Routine: PSIVWL

Call Graph Total: 7

Legends:

Package Component Superscript legend

Caller Graph Total: 6

Legend: