Routine: SROALOG

Package	Total	Call Graph
Surgery	19	^SROALC ^SROALCS ^SROALEC ^SROALL ^SROALLS ^SROALM ^SROALMN ^SROALNC ^SROALSL ^SROALSS ^SROALST ^SROALT ^SROALTS ^SROANT ^SROANTS DATE^SROUTL $$INST^SROUTL0 $$SITE^SROVAR ^SRSKILL
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	3	^DIC $$GET1^DIQ ^DIR

Package

Total

Call Graph

^SROALC  ^SROALCS  ^SROALEC  ^SROALL  ^SROALLS  ^SROALM  ^SROALMN  ^SROALNC
^SROALSL  ^SROALSS  ^SROALST  ^SROALT  ^SROALTS  ^SROANT  ^SROANTS  DATE^SROUTL
$$INST^SROUTL0  $$SITE^SROVAR  ^SRSKILL

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

VA Fileman

^DIC $$GET1^DIQ ^DIR

Package	Total	Caller Graph
Surgery	1	SROA ASSESSMENT LIST

Package

Total

Caller Graph

Surgery

SROA ASSESSMENT LIST

Name	Comments	DBIA/ICR reference
EN	; entry when queued
END
SEL1
START
TYPE9	; select type of transmitted case
DATE
SEL	; select specialty
DSORT	; sort by op date or transmit date
TYPE3	; select type of eligible cases

External References

Name	Field # of Occurrence
^%ZIS	DATE+7
^%ZISC	END+2
^%ZTLOAD	DATE+8
^DIC	SEL1+3
$$GET1^DIQ	EN+3
^DIR	START+7, TYPE3+3, TYPE9+3, DSORT+3, SEL+3, SEL1+2
^SROALC	EN+5
^SROALCS	EN+5
^SROALEC	EN+11
^SROALL	EN+7, EN+8
^SROALLS	EN+7, EN+8
^SROALM	EN+9
^SROALMN	EN+10
^SROALNC	EN+12
^SROALSL	EN+13
^SROALSS	EN+14
^SROALST	EN+14
^SROALT	EN+6
^SROALTS	EN+6
^SROANT	EN+4
^SROANTS	EN+4
DATE^SROUTL	DATE+1
$$INST^SROUTL0	DATE+5
$$SITE^SROVAR	EN+3
^SRSKILL	END+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: START+0
Function Call: WRITE	Prompt: @IOF,!,"This report is designed to print to your terminal screen or a printer. When",!,"using a printer, a 132 column format is used.",! Line Location: DATE+6
Function Call: WRITE	Prompt: !!,"Press ENTER to continue " Line Location: END+0
Function Call: WRITE	Prompt: @IOF Line Location: END+2
Function Call: WRITE	Prompt: ! Line Location: TYPE3+1
Function Call: WRITE	Prompt: ! Line Location: TYPE9+1
Function Call: WRITE	Prompt: ! Line Location: DSORT+1
Function Call: WRITE	Prompt: ! Line Location: SEL+1
Function Call: WRITE	Prompt: ! Line Location: SEL1+0
Function Call: WRITE	Prompt: ! Line Location: SEL1+3
Routine Call	DIC Line Location: SEL1+3
Routine Call	DIR Line Location: START+7 TYPE3+3 TYPE9+3 DSORT+3 SEL+3 SEL1+2
Routine Call	%ZIS Line Location: DATE+7

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EN+1, EN+2
^TMP("SRA"	END+1!

Name	Line Occurrences
DSORT	DATE
END	START, START+7, DATE, DATE+1, DATE+2, DATE+3, DATE+4, DATE+5, DATE+7, DATE+8 , EN+4, EN+5, EN+6, EN+7, EN+8, EN+9, EN+10, EN+11, EN+12, EN+13
SEL	DATE+4
TYPE3	DATE+3
TYPE9	DATE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DATE+7!*
%ZIS("A"	DATE+7*
DIC	SEL1+3*!
DIC("A"	SEL1+3*
DIC("S"	SEL1+3*
DIC(0	SEL1+3*
DIR	START!, START+7!, TYPE3+1!, TYPE3+3!, TYPE9+1!, TYPE9+3!, DSORT+1!, DSORT+3!, SEL+1!, SEL+3! , SEL1!, SEL1+2!
DIR("?"	SEL+2, SEL1+1
DIR("A"	START, START+1, START+2, START+3, START+4, START+5, START+6, TYPE3+1, TYPE3+2, TYPE3+3 , TYPE9+1, TYPE9+2, TYPE9+3, DSORT+1, DSORT+2, SEL+1, SEL1*
DIR("B"	TYPE3+3, TYPE9+3, DSORT+2, SEL+1, SEL1*
DIR(0	START+7, TYPE3+3, TYPE9+3, DSORT+2, SEL+1, SEL1
DT	EN+2
DTIME	END
>> DTOUT	START+7, TYPE3+3, TYPE9+3, DSORT+3, SEL+3, SEL1+2
>> DUOUT	START+7, TYPE3+3, TYPE9+3, DSORT+3, SEL+3, SEL1+2
IO	EN+2
IO("Q"	DATE+7!, DATE+8!
IOF	START, DATE+6, END+1, END+2
IOP	DATE+7!
IOST	END, END+1
POP	DATE+7!
>> SRASP	SEL1+3*
SRAST	SROALOG+2, END+2!, TYPE3+4, TYPE9+4*
>> SRED	DATE+1, EN+1, EN+2*
>> SREPORT	START+8*, DATE, DATE+2, DATE+3, DATE+6, EN+4, EN+5, EN+6, EN+7, EN+8 , EN+9, EN+10, EN+11, EN+12, EN+13
>> SRFLG	SROALOG+2, SEL1+3
SRFRTO	EN+1~*
>> SRINST	DATE+5, EN+3
SRINSTP	DATE+5~*, EN+3
SRMNA	SROALOG+2!, EN+7*
>> SRPRINT	EN+2*
>> SRSD	DATE+1, EN+1, EN+2*
>> SRSOUT	SROALOG+2, START, START+7, DATE, DATE+1, DATE+2, DATE+3, DATE+4, DATE+7, END , TYPE3+3, TYPE9+3, DSORT+3, SEL+3, SEL1+2, SEL1+4*
>> SRSP	SROALOG+2, EN+4, EN+5, EN+6, EN+7, EN+8, EN+14, SEL1
SRSRT	SROALOG+2, END+2!, DSORT+4
SRTN	END+2!
>> X	START+8, END*
>> Y	START+7, EN+1, EN+2, TYPE3+4, TYPE9+4, DSORT+4, SEL+4, SEL1+3, SEL1+4
>> ZTDESC	DATE+9*
>> ZTQUEUED	END+1
>> ZTREQ	DATE+8, END+1
>> ZTRTN	DATE+9*
>> ZTSAVE("SRASP"	DATE+10*
>> ZTSAVE("SRAST"	DATE+10*
>> ZTSAVE("SRED"	DATE+10*
>> ZTSAVE("SREPORT"	DATE+10*
>> ZTSAVE("SRFLG"	DATE+10*
>> ZTSAVE("SRINSTP"	DATE+10*
>> ZTSAVE("SRSD"	DATE+10*
>> ZTSAVE("SRSP"	DATE+10*
>> ZTSAVE("SRSRT"	DATE+10*
>> ZTSTOP	END+1

Customize PDF page

Package: Surgery

Routine: SROALOG

Information

Source Information

Call Graph

Call Graph Total: 25

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

Local Variables

Legend: