Routine: PSAMON1

Package	Total	Call Graph
Kernel	1	$$S^%ZTLOAD
VA Fileman	1	^DIR

Package	Total	Caller Graph
Drug Accountability	1	PSAMON

Entry Points

Name	Comments	DBIA/ICR reference
PRINT	;Prints totals report
HEADER	;prints header info
END
WRAPDRG	;Wraps the drug name if it is longer than 34 characters

Name	Field # of Occurrence
$$S^%ZTLOAD	HEADER+4
^DIR	END+2, HEADER+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"GRAND TOTAL",?36,$J(PSAGREC,6,0),?49,$J(PSAGDISP,6,0),?60,$J(PSAGADJ,6,0),?73,$J(PSAGTF,6,0),!,PSADLN,! Line Location: PRINT+8
Function Call: WRITE	Prompt: ! Line Location: END+1
Function Call: WRITE	Prompt: @IOF Line Location: END+3
Function Call: WRITE	Prompt: ! Line Location: HEADER+2
Function Call: WRITE	Prompt: !!,"Task #",$G(ZTSK),", ",$G(ZTDESC)," was stopped by ",$P($G(^VA(200,+$G(DUZ),0)),U),"." Line Location: HEADER+4
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+5
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+6
Function Call: WRITE	Prompt: ?20,"DRUG ACCOUNTABILITY/INVENTORY INTERFACE",?71,"PAGE: ",PSAPG Line Location: HEADER+8
Function Call: WRITE	Prompt: !?19,"MONTHLY SUMMARY TOTALS REPORT FOR "_PSAMONN Line Location: HEADER+9
Function Call: WRITE	Prompt: !!?36,"TOTAL",?48,"TOTAL",?60,"TOTAL",?72,"TOTAL" Line Location: HEADER+13
Function Call: WRITE	Prompt: !,"DRUG",?34,"RECEIVED",?46,"DISPENSED",?58,"ADJUSTED",?69,"TRANSFERRED",!,PSADLN Line Location: HEADER+14
Function Call: WRITE	Prompt: !,PSADRUG Line Location: WRAPDRG+1
Function Call: WRITE	Prompt: !,PSAPC1 Line Location: WRAPDRG+4
Routine Call	DIR Line Location: END+2 HEADER+3

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PSAG"	PRINT+2, PRINT+4, PRINT+7
^VA(200 - [#200]	HEADER+4

Name	Line Occurrences
HEADER	PRINT+1, PRINT+3, PRINT+8
WRAPDRG	PRINT+5

Name	Field # of Occurrence
DIR	END+2!, HEADER+3!
DIR("A"	END+2*
DIR(0	END+2, HEADER+3
>> DIRUT	END+2, HEADER+3
DUZ	HEADER+4
IOF	END+3, HEADER+5, HEADER+6
IOSL	PRINT+3, PRINT+8
IOST	END, HEADER+1, HEADER+5, HEADER+6, HEADER+7
>> PSADLN	PRINT+7, PRINT+8, HEADER+14
>> PSADRUG	PRINT+2*, PRINT+4, PRINT+7, WRAPDRG+1, WRAPDRG+2
>> PSAGADJ	PRINT+1, PRINT+4, PRINT+8
>> PSAGDISP	PRINT+1, PRINT+4, PRINT+8
>> PSAGREC	PRINT+1, PRINT+4, PRINT+8
>> PSAGTF	PRINT+1, PRINT+4, PRINT+8
>> PSALOC	HEADER+11*
>> PSALOCN	HEADER+11*, HEADER+12
>> PSAMENU(	HEADER+11
>> PSAMONN	HEADER+9
>> PSANODE	PRINT+4*, PRINT+6
>> PSAOUT	PRINT+2, PRINT+3, PRINT+8, END, END+2, HEADER+1, HEADER+3, HEADER+4*, HEADER+11
>> PSAPC	HEADER+10, WRAPDRG+2, WRAPDRG+3, WRAPDRG+4
>> PSAPC1	WRAPDRG+2, WRAPDRG+3, WRAPDRG+4*, WRAPDRG+5
>> PSAPCS	WRAPDRG+2*
>> PSAPG	PRINT+1, HEADER+1, HEADER+6, HEADER+7, HEADER+8
>> PSAPICK	HEADER+10*, HEADER+11
>> PSARPDT	HEADER+7
>> PSAS	END+1, HEADER+2
>> PSASEL	HEADER+10
>> PSASLN	PRINT+7
>> PSASS	END+1, HEADER+2
U	HEADER+4
>> ZTDESC	HEADER+4
>> ZTSK	HEADER+4