Routine: SROCODE

Package	Total	Call Graph
Pharmacy Data Management	4	DATA^PSS50 DIC^PSSDI (END,ENS)^PSSGIU DRG^PSSHUIDG
Surgery	2	MSG^SRHLMFN ^SRSKILL
VA Fileman	1	^DIR

Package	Total	Caller Graph
Surgery	1	SROCODE

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This drug is already flagged for SURGERY." Line Location: SROIU+3
Function Call: WRITE	Prompt: !! Line Location: SROIU+4
Function Call: WRITE	Prompt: @IOF Line Location: DONE+0
Routine Call	DIR Line Location: SROIU+3 SROIU+4

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	FLAG+1, FLAG+5, OFF+1, OFF+6
^TMP($J	SROIU+1, SROIU+2!, OFF+4!

Name	Field # of Occurrence
DIR	SROIU+3!, SROIU+4!
DIR("A"	SROIU+3, SROIU+4
DIR(0	SROIU+3, SROIU+4
FEC	FLAG+3~, OFF+3~, OFF+4
IOF	DONE
PSIUDA	FLAG, FLAG+5, FLAG+6!, OFF, OFF+6, OFF+7!
PSIUX	FLAG, FLAG+6!, OFF, OFF+7!
REC	FLAG+3~, OFF+3~, OFF+4
SRENT	FLAG+3~, OFF+3~, OFF+4
SROIRX	1+1*, DONE!, FLAG+3
>> SROIUDA	1+1*, SROIU, SROIU+1, SROIU+2, FLAG, FLAG+3, OFF, OFF+3, OFF+4
>> SROIUT	SROIU+2*
>> SROIUX	1+1*, SROIU, SROIU+2, FLAG, OFF
>> SROIUY	SROIU+2*, SROIU+3
SRRX	SROIU+1~*, SROIU+2
SRTBL	FLAG+3~, OFF+3~, OFF+4
SRTEST	1~*, 1+1
SRTEST("A"	1*
SRTEST(0	1*
U	FLAG+3, OFF+4
>> X	FLAG+1, FLAG+5, OFF+1, OFF+6
>> Y	1+1, SROIU+3, SROIU+4

Information