Routine: PSDTRVR1

Package	Total	Call Graph
VA Fileman	2	NOW^%DTC ^DIR
Kernel	1	^%ZISC

Package

Total

Call Graph

NOW^%DTC ^DIR

Package	Total	Caller Graph
Controlled Substances	1	PSDTRVR

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
PRINT	;print transfer between vaults by date
START	;compile data
DONE
HDR	;header for log
END	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?10,"** NO TRANSFER BETWEEN VAULTS DATA FOR THIS REPORT **" Line Location: PRINT+3
Function Call: WRITE	Prompt: @IOF Line Location: DONE+0
Function Call: WRITE	Prompt: ! Line Location: DONE+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?15,"TRANSFER CS DRUGS BETWEEN DISP SITES REPORT",?70,"Page: ",PG Line Location: HDR+2
Function Call: WRITE	Prompt: !,?15,"TRANSACTIONS FOR PERIOD ",$P(PSDATE,"^")," TO ",$P(PSDATE,"^",2) Line Location: HDR+3
Function Call: WRITE	Prompt: !,?15,"PRINTED ",RPDT,!!,?2,"=> DRUG",!!,"DATE/TIME TRANSFERRED",?28,"QUANTITY",?40,"TRANSFERRED BY",!,LN,! Line Location: HDR+5
Routine Call	DIR Line Location: DONE+1 HDR+1

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRINT+2, PRINT+7
^PSD(58.8 - [#58.8]	START+2, START+7
^PSD(58.81 - [#58.81]	START+3, START+4, START+5
^PSDRUG - [#50]	START+6
^TMP("PSDTRVR"	START+1!, START+9*, PRINT+3, PRINT+4, PRINT+6, END+3!
^VA(200 - [#200]	START+8

Name	Line Occurrences
DONE	PRINT+3
HDR	PRINT+3, PRINT+4, PRINT+5

Name	Field # of Occurrence
^(0	START+6, START+7, START+8

Name	Field # of Occurrence
%	PRINT+2, END+1!
%DT	END+1!
%H	END+1!
%I	END+1!
%ZIS	END+1!
ASK	PRINT+9, END+1!
CNT	END+1!
DA	END+1!, HDR+1!
DIC	END+1!
DIR	DONE+1!, END+1!, HDR+1!
DIR("A"	DONE+1*
DIR(0	DONE+1, HDR+1
DIROUT	END+1!
DIRUT	DONE+1!, END+1!
DTOUT	END+1!
DUOUT	END+1!
IOF	DONE, HDR+2
IOSL	PRINT+4, PRINT+5
IOST	DONE, DONE+1, HDR+1
JJ	START+2, PRINT+4, PRINT+6, END+1!, HDR+4
KK	PRINT+4*, PRINT+6, END+1!
LL	PRINT+4*, PRINT+6, PRINT+7, END+1!
LN	PRINT+2!*, END+1!, HDR+5
NODE	START+5, START+8, PRINT+6, PRINT+8, END+1!
OK	END+1!
PG	PRINT+1, END+2!, HDR+1, HDR+2
PHARM	START+8*, END+2!
PHARMN	START+8*, START+9, END+2!
POP	END+2!
PSD	START+3*, START+4, START+9, END+2!
PSDA	START+4*, START+5, END+2!
PSDATE	END+2!, HDR+3
PSDED	START+3, END+2!
PSDOUT	START+1, PRINT+1, PRINT+4, PRINT+5, DONE+1, END+2!, HDR+1*
PSDR	START+3*, START+4, START+6, END+2!
PSDRN	START+6*, START+9, END+2!
PSDS	START+2, START+3, START+4, START+7, END+2!
PSDS(	START+2*, START+3
PSDSD	START+3, END+2!
PSDSN	START+7*, START+9, END+2!
PSDT	PRINT+7*, PRINT+8, END+2!
QTY	START+8, START+9, PRINT+6, PRINT+8, END+2!
RPDT	PRINT+2*, END+2!, HDR+5
SITE	END+2!
SITE(	START+2
SITEN	END+2!
TYP	START+2*, END+2!
X	END+2!
Y	PRINT+2, PRINT+7, END+2!, HDR+1
ZTDESC	END+2!
ZTDTH	END+2!
>> ZTQUEUED	END+3
>> ZTREQ	END+3*
ZTRTN	END+2!
ZTSAVE	END+2!
ZTSK	END+2!

Information