Routine: PSALOG3

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

PSALOG3 ;BIR/LTL-Post Drug Procurement History - CONT'D;7/23/97

Source Information

Source file <PSALOG3.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
VA FileMan	2	COMMA^%DTC ^DIR
IFCAP	1	($$DESCR,$$INVNAME)^PRCPUX1
Kernel	1	$$S^%ZTLOAD

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
Drug Accountability	1	PSALOG2

Entry Points

Name	Comments	DBIA/ICR reference
LOOP2
HEADER2

External References

Name	Field # of Occurrence
COMMA^%DTC	LOOP2+5
$$S^%ZTLOAD	HEADER2+1
^DIR	LOOP2+6, HEADER2
$$DESCR^PRCPUX1	LOOP2+3
$$INVNAME^PRCPUX1	LOOP2+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?53,X,"(",$E($$INVNAME^PRCPUX1($P($G(^TMP("PSAC",$J,+PSA(33),PSA(55))),U,2)),1,20),")",! Line Location: LOOP2+5
Function Call: WRITE	Prompt: ! Line Location: LOOP2+6
Function Call: WRITE	Prompt: !!,"Task #",$G(ZTSK),", ",$G(ZTDESC)," was stopped by ",$P($G(^VA(200,+$G(DUZ),0)),U),"." Line Location: HEADER2+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HEADER2+2
Function Call: WRITE	Prompt: !,"High Cost Items Over $",PSA(44),?57,"TOTAL $",?75,"PSAPG:",PSAPG,!,PSALN Line Location: HEADER2+2
Routine Call	DIR Line Location: LOOP2+6 HEADER2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PSAC"	LOOP2+2, LOOP2+3, LOOP2+4, LOOP2+5, LOOP2+7!
^VA(200 - [#200]	HEADER2+1

Label References

Name	Line Occurrences
HEADER2	LOOP2, LOOP2+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	HEADER2!
DIR("A"	LOOP2+6*
DIR(0	LOOP2+6, HEADER2
DUZ	HEADER2+1
IOF	HEADER2+2
IOSL	LOOP2+2
IOST	LOOP2+6, HEADER2
>> PSA(33	LOOP2+1, LOOP2+2, LOOP2+3, LOOP2+4, LOOP2+5
>> PSA(44	LOOP2+2, HEADER2+2
>> PSA(55	LOOP2+1, LOOP2+2, LOOP2+3, LOOP2+4, LOOP2+5
>> PSALN	HEADER2+2
>> PSAOUT	LOOP2+2, LOOP2+6, LOOP2+7, HEADER2, HEADER2+1*
>> PSAPG	LOOP2, HEADER2, HEADER2+2
U	LOOP2+2, LOOP2+3, LOOP2+4, LOOP2+5, HEADER2+1
>> X	LOOP2+4*, LOOP2+5
>> X2	LOOP2+4*
>> Y	HEADER2
>> ZTDESC	HEADER2+1
>> ZTSK	HEADER2+1