Routine: SRONAN

Customize PDF page

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

Information

SRONAN ;B'HAM ISC/MAM - ANNUAL REPORT FOR NON-O.R. PROCEDURES ; [ 09/22/98 11:34 AM ]

Source Information

Source file <SRONAN.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Surgery	3	^SRONAN1 DATE^SROUTL ^SRSKILL

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
Surgery	1	SRONOP-ANNUAL

Entry Points

Name	Comments	DBIA/ICR reference
DATE
EN	; entry when queued
END

External References

Name	Field # of Occurrence
^%ZIS	DATE+1
^%ZISC	END
^%ZTLOAD	DATE+2
^SRONAN1	EN+2
DATE^SROUTL	DATE
^SRSKILL	END+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,"Annual Report of Non-O.R. Procedures",! Line Location: SRONAN+2
Function Call: WRITE	Prompt: ! Line Location: DATE+1
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: END+1
Function Call: WRITE	Prompt: @IOF Line Location: END+2
Routine Call	%ZIS Line Location: DATE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EN+1
^TMP("SR"	EN+3!

Label References

Name	Line Occurrences
END	DATE, DATE+1, DATE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DATE+1!*
%ZIS("A"	DATE+1*
DTIME	END+1
IO	EN+1
IO("Q"	DATE+1!, DATE+2!
IOF	SRONAN+2, EN+3, END+2
IOP	DATE+1!
IOST	EN+3, END+1
POP	DATE+1!
>> SRED	DATE, EN+1*
SRFRTO	EN+1~*
>> SRINST	EN+1*
>> SRSD	DATE, EN+1*
>> SRSITE("SITE"	EN+1
>> SRSOUT	SRONAN+2, DATE, DATE+1, DATE+2*, END+1
>> X	END+1*
>> Y	EN+1*
>> ZTDESC	DATE+2*
>> ZTQUEUED	EN+3
>> ZTREQ	EN+3*
>> ZTRTN	DATE+2*
>> ZTSAVE("SRED"	DATE+2*
>> ZTSAVE("SRSD"	DATE+2*
>> ZTSAVE("SRSITE*"	DATE+2*
>> ZTSTOP	EN+3