Routine: PSAWARD

Package	Total	Call Graph
VA Fileman	5	^DIC FILE^DICN ^DIE ^DIK ^DIR

Package	Total	Caller Graph
Drug Accountability	1	PSAENT

Entry Points

External References

Name	Field # of Occurrence
^DIC	MUL+9
FILE^DICN	ALL, LOOP+9
^DIE	QUIT
^DIK	MUL+13
^DIR	MUL+5, MUL+8, MUL+12, MUL+17, LOOP+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!?5,"For the purpose of collecting Unit Dose and IV dispensing data,",!,"any ward at which such dispensing might ever occur should be added." Line Location: PSAWARD+5
Function Call: WRITE	Prompt: !,"The ONLY reason to NOT add a ward would be if the dispensing at that ward",!,"should NOT update ",$G(PSALOCN),"." Line Location: PSAWARD+6
Function Call: WRITE	Prompt: !!,"There is NO harm in adding inactive wards." Line Location: PSAWARD+7
Function Call: WRITE	Prompt: !!,PSALOCN," is linked to " Line Location: ALL+0
Function Call: WRITE	Prompt: ".",! Line Location: ALL+2
Function Call: WRITE	Prompt: !! Condition for execution: $X+10>IOM Line Location: MUL+3
Function Call: WRITE	Prompt: $P($G(^DIC(42,+PSA(3),0)),U),$S($O(^PSD(58.8,+PSALOC,3,+PSA(3))):", ",1:".") Line Location: MUL+3
Function Call: WRITE	Prompt: !,$G(PSAW(1))," deleted." Line Location: MUL+13
Function Call: WRITE	Prompt: !,PSA,?10,$P($G(^DIC(42,PSAW,0)),U) Line Location: LOOP+0
Function Call: WRITE	Prompt: ?40,"*INACTIVE*" Condition for execution: $D(^DIC(42,+PSAW,"I")) Line Location: LOOP+0
Function Call: WRITE	Prompt: !!,"Sorry, you've already added all the wards that you can." Line Location: LOOP+1
Function Call: WRITE	Prompt: "." Line Location: LOOP+9
Function Call: WRITE	Prompt: @IOF Line Location: LOOP+10
Function Call: WRITE	Prompt: ! Line Location: QUIT+0
Routine Call	DIE Line Location: QUIT
Routine Call	DIC Line Location: MUL+9
Routine Call	DIR Line Location: MUL+5 MUL+8 MUL+12 MUL+17 LOOP+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSD(58.8 - [#58.8]	Classic Fileman Calls
^PS(59.7 - [#59.7]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	ALL, ALL+1, ALL+2, MUL+3, MUL+9, LOOP, LOOP+3
^PS(59.7 - [#59.7]	QUIT
^PSD(58.8 - [#58.8]	PSAWARD+8, ALL, MUL, MUL+3, LOOP, LOOP+3

Label References

Name	Line Occurrences
ALL	MUL+18
LOOP	LOOP+10
MUL	LOOP+11
QUIT	ALL+5, MUL, LOOP+1, LOOP+4, LOOP+7

Naked Globals

Name	Field # of Occurrence
^(0	PSAWARD+8*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
D0	PSAWARD+4~
D1	PSAWARD+4~
DA	PSAWARD+4~, ALL, MUL+13, MUL+14!, LOOP+9, QUIT!
DA(1	ALL, MUL+9, MUL+13, LOOP+8
DD	ALL!, LOOP+9!
DIC	PSAWARD+4~, ALL, MUL+9, MUL+13, MUL+14!, LOOP+8*, LOOP+11!
DIC("A"	MUL+9*
DIC(0	ALL, MUL+9, LOOP+8*
DIE	PSAWARD+4~, QUIT*!
DIK	MUL+13*, MUL+14!
DINUM	ALL, ALL+4!, LOOP+9!
DIR	PSAWARD+4~, MUL+5!, MUL+8!, MUL+17!, LOOP+7!
DIR("?"	MUL+4, MUL+7, MUL+8, MUL+11, MUL+16, MUL+17, LOOP+6*
DIR("A"	MUL+4, MUL+6, MUL+10, MUL+15, LOOP+7*
DIR("B"	MUL+4, MUL+11
DIR(0	MUL+4, MUL+6, MUL+10, MUL+15, LOOP+7*
DIRUT	PSAWARD+4~, MUL+8, MUL+9, MUL+17, LOOP+7, QUIT
DLAYGO	PSAWARD+4~
DO	ALL!, LOOP+9!
DR	PSAWARD+4~, QUIT*
DTOUT	PSAWARD+4~
DUOUT	PSAWARD+4~
IOF	PSAWARD+5, LOOP+10
IOM	ALL+3, MUL+3
PSA	MUL+19, LOOP, LOOP+1, LOOP+2, LOOP+4, LOOP+7, LOOP+9, LOOP+10, LOOP+11!
PSA(1	LOOP+9!
PSA(2	ALL, ALL+5, MUL+18, MUL+19, LOOP, LOOP+5*
PSA(3	ALL, ALL+1, ALL+2, MUL+1, MUL+3, MUL+19, LOOP+4, LOOP+7, LOOP+10*
PSAB	LOOP+9*, LOOP+10!
>> PSAC	LOOP+7*, LOOP+9
PSADR	PSAWARD+4~, LOOP+11!
PSADR(	LOOP*, LOOP+2, LOOP+7, LOOP+9
>> PSALOC	PSAWARD+8, ALL, MUL, MUL+3, MUL+9, MUL+13, LOOP+8
>> PSALOCN	PSAWARD+6, ALL, MUL+2, MUL+9, MUL+11, LOOP+7
PSAOUT	PSAWARD+4~, MUL, MUL+5, MUL+8, MUL+9, MUL+12, MUL+14, MUL+17, LOOP+9, QUIT*
PSAOUT(1	MUL+8*, MUL+14
PSAW	PSAWARD+4~, MUL+9, MUL+13, MUL+14!, MUL+19, LOOP*, LOOP+3
PSAW(1	MUL+9, MUL+10, MUL+13, LOOP+3
PSAW(2	LOOP+3*, LOOP+5, LOOP+10
U	ALL+1, MUL+3, MUL+9, LOOP
X	PSAWARD+4~, ALL, LOOP+9
Y	PSAWARD+4~, MUL+5, MUL+8, MUL+9, MUL+12, MUL+18, LOOP+7, QUIT

Customize PDF page

Package: Drug Accountability

Routine: PSAWARD

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: