Routine: SROSCH2

Package	Total	Call Graph
Kernel	2	^%ZIS ^%ZTLOAD
Surgery	2	PRINT^SROBLOD (ASK,CON)^SROSCH1

Package

Total

Call Graph

Kernel

^%ZIS ^%ZTLOAD

Surgery

PRINT^SROBLOD (ASK,CON)^SROSCH1

Package	Total	Caller Graph
Surgery	2	SROSCH SROSCH1

Package

Total

Caller Graph

Surgery

SROSCH SROSCH1

Name	Comments	DBIA/ICR reference
DEVICE
QUEUE	; queue report to device
PRINT	; print variables
XRAY	; print x-rays

Name	Field # of Occurrence
^%ZIS	QUEUE+1
^%ZTLOAD	QUEUE+2
PRINT^SROBLOD	PRINT+7
ASK^SROSCH1	PRINT+1
CON^SROSCH1	PRINT+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,SRNM,?24,SROPD,?40,SRDIAG,?92,SRANES,?115,SRSUR,!,VA("PID"),?16,AGE,?24,SRSST,?40,SROPS(1),?92,SRAN1,?115,SRFST Line Location: PRINT+3
Function Call: WRITE	Prompt: !,SRSLOC,?24,SRSET Line Location: PRINT+4
Function Call: WRITE	Prompt: ?40,SROPS(2) Condition for execution: $D(SROPS(2)) Line Location: PRINT+4
Function Call: WRITE	Prompt: ?92,SRAN2,?115,SRATT Line Location: PRINT+4
Function Call: WRITE	Prompt: ?92,SRAN2,?115,SRATT Line Location: PRINT+4
Function Call: WRITE	Prompt: !,?40,SROPS(4) Line Location: PRINT+5
Function Call: WRITE	Prompt: !,?40,SROPS(5) Line Location: PRINT+5
Function Call: WRITE	Prompt: !,?40,SROPS(5) Line Location: PRINT+5
Function Call: WRITE	Prompt: !,"Case # "_SRTN Line Location: PRINT+7
Function Call: WRITE	Prompt: !,SRPREAD Line Location: PRINT+7
Function Call: WRITE	Prompt: ?24,"FROZEN SECTION TESTS REQUIRED",! Line Location: PRINT+11
Function Call: WRITE	Prompt: ?24,"PREOPERATIVE XRAYS: "_SRXRAY1 Line Location: XRAY+1
Function Call: WRITE	Prompt: " INTRAOPERATIVE X-RAYS REQUESTED" Condition for execution: SRXRAY2="Y" Line Location: XRAY+1
Function Call: WRITE	Prompt: " C-ARM REQUESTED" Condition for execution: SRXRAY2="C" Line Location: XRAY+1
Function Call: WRITE	Prompt: ! Line Location: XRAY+1
Function Call: WRITE	Prompt: ?24,"INTRAOPERATIVE X-RAYS REQUESTED",! Line Location: XRAY+2
Function Call: WRITE	Prompt: ?24,"C-ARM REQUESTED" Line Location: XRAY+3
Function Call: WRITE	Prompt: ! Line Location: XRAY+4
Routine Call	%ZIS Line Location: QUEUE+1

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	PRINT+6, PRINT+8
^SRO(133 - [#133]	DEVICE

Name	Line Occurrences
QUEUE	DEVICE
XRAY	PRINT+10

Name	Field # of Occurrence
^("1.0"	PRINT+8
^("CON"	PRINT+6

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	QUEUE+1!*
>> AGE	PRINT+3
>> I	DEVICE*
>> IOP	DEVICE*
IOSL	PRINT+1
POP	QUEUE+1!
>> SR("1.0"	PRINT+8*, PRINT+9
>> SRAN1	PRINT+3
>> SRAN2	PRINT+4
>> SRANES	PRINT+3
>> SRATT	PRINT+4
>> SRCON	PRINT+6*
>> SRDEV	DEVICE*
>> SRDIAG	PRINT+3
>> SRFROZ	PRINT+9*, PRINT+11
>> SRFST	PRINT+3
>> SRNM	PRINT+3
>> SROOM	PRINT+2
>> SROPD	PRINT+3
>> SROPS(1	PRINT+3
>> SROPS(2	PRINT+4
>> SROPS(3	PRINT+4
>> SROPS(4	PRINT+5
>> SROPS(5	PRINT+5
>> SROPS(6	PRINT+5
>> SRPREAD	PRINT+7
>> SRQ	PRINT+1
>> SRSET	PRINT+4
>> SRSITE	DEVICE
>> SRSLOC	PRINT+4
>> SRSST	PRINT+3
>> SRSUR	PRINT+3
>> SRTN	PRINT+6, PRINT+7, PRINT+8
>> SRXRAY1	PRINT+9*, PRINT+10, XRAY+1
>> SRXRAY2	PRINT+9*, PRINT+10, XRAY+1, XRAY+2, XRAY+3
>> SX	PRINT+2
>> VA("PID"	PRINT+3
>> ZTDESC	QUEUE+2*
>> ZTDTH	QUEUE+2*
>> ZTRTN	QUEUE+2*
>> ZTSAVE("SRDT"	QUEUE+2*
>> ZTSAVE("SRDT1"	QUEUE+2*
>> ZTSAVE("SRSITE*"	QUEUE+2*

Customize PDF page

Package: Surgery

Routine: SROSCH2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: