Routine: SRSCHUN1

Package	Total	Call Graph
Surgery	8	^SRCUSS RISK^SROAUTL3 ^SROBLOD ^SROCON1 ^SROERR0 ^SROPCE1 EN2^SROVAR $$CHKS^SRSCOR
Kernel	1	T0^%ZOSV
VA Fileman	1	^DIE

Package

Total

Call Graph

Surgery

^SRCUSS RISK^SROAUTL3 ^SROBLOD ^SROCON1 ^SROERR0 ^SROPCE1 EN2^SROVAR $$CHKS^SRSCOR

Kernel

T0^%ZOSV

VA Fileman

^DIE

Package	Total	Caller Graph
Surgery	3	SRSCHCA SRSCHD SRSCHDC

Package

Total

Caller Graph

Surgery

SRSCHCA SRSCHD SRSCHDC

Name	Field # of Occurrence
T0^%ZOSV	RT+1
^DIE	ANES+1, PROC+5, OTH+1
^SRCUSS	SS
RISK^SROAUTL3	SS+2
^SROBLOD	BLOOD+1
^SROCON1	OTH+1, SS+2
^SROERR0	SS+3
^SROPCE1	SS+2
EN2^SROVAR	SS
$$CHKS^SRSCOR	SS, SS+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: ANES+0
Function Call: WRITE	Prompt: !,?29,$S(SRSCON=1:"FIRST",1:"SECOND")_" CONCURRENT CASE" Condition for execution: $D(SRCC) Line Location: ANES+0
Function Call: WRITE	Prompt: !,?14,"SCHEDULE UNREQUESTED OPERATION: ANESTHESIA PERSONNEL",!!,SRNM_" ("_SRSSN_")",?65,SREQDT,!,SRLINE Line Location: ANES+0
Function Call: WRITE	Prompt: @IOF Line Location: PROC+0
Function Call: WRITE	Prompt: !,?29,$S(SRSCON=1:"FIRST",1:"SECOND")_" CONCURRENT CASE" Condition for execution: $D(SRCC) Line Location: PROC+0
Function Call: WRITE	Prompt: !,?14,"SCHEDULE UNREQUESTED OPERATION: PROCEDURE INFORMATION",!!,SRNM_" ("_SRSSN_")",?65,SREQDT,!,SRLINE Line Location: PROC+0
Function Call: WRITE	Prompt: !,"Principal Procedure: ",?26,SROPS(1) Line Location: PROC+2
Function Call: WRITE	Prompt: !,?26,SROPS(2) Line Location: PROC+2
Function Call: WRITE	Prompt: !,?26,SROPS(2) Line Location: PROC+2
Function Call: WRITE	Prompt: !,"Principal Procedure Code (CPT): "_$P(SREQ(27),"^",2) Line Location: PROC+3
Function Call: WRITE	Prompt: @IOF Line Location: BLOOD+0
Function Call: WRITE	Prompt: !,?29,$S(SRSCON=1:"FIRST",1:"SECOND")_" CONCURRENT CASE" Condition for execution: $D(SRCC) Line Location: BLOOD+0
Function Call: WRITE	Prompt: !,?20,"SCHEDULE UNREQUESTED OPERATION: BLOOD INFORMATION",!!,SRNM_" ("_SRSSN_")",?65,SREQDT,!,SRLINE,! Line Location: BLOOD+0
Function Call: WRITE	Prompt: @IOF Line Location: OTH+0
Function Call: WRITE	Prompt: !,?29,$S(SRSCON=1:"FIRST",1:"SECOND")_" CONCURRENT CASE" Condition for execution: $D(SRCC) Line Location: OTH+0
Function Call: WRITE	Prompt: !,?20,"SCHEDULE UNREQUESTED OPERATION: OTHER INFORMATION",!!,SRNM_" ("_SRSSN_")",?65,SREQDT,!,SRLINE,! Line Location: OTH+0
Routine Call	DIE Line Location: ANES+1 PROC+5 OTH+1

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	PROC+1
^TMP("CSLSUR1"	SS+1*

Name	Line Occurrences
LOOP	PROC+1
RT	SS
SS	ANES+1, PROC+5, BLOOD+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	ANES+1!, PROC+5!, OTH+1, SS!
DIC	SS!
DIE	ANES+1!, PROC+5, OTH+1, SS!
DR	ANES+1!, PROC+4!, PROC+5!, OTH+1!, SS!*, SS+2!
DR(2	PROC+5*
>> DTOUT	ANES+1, PROC+5, OTH+1
IOF	ANES, PROC, BLOOD, OTH
>> LOOP	LOOP+1*
>> M	PROC+1*, LOOP+1
MM	PROC+1!, LOOP+1*
MMM	PROC+1!, LOOP+1*
>> Q3("VIEW"	SS!
>> SPD	SS*, SS+1
>> SRCC	ANES, PROC, BLOOD, OTH
>> SRDUOUT	BLOOD+1, OTH+1*, OTH+2
>> SREQ(27	PROC+3, PROC+4
>> SREQDT	ANES, PROC, BLOOD, OTH
>> SRLINE	ANES, PROC, BLOOD, OTH
>> SRNM	ANES, PROC, BLOOD, OTH
>> SRODR	OTH+1, SS+2
>> SROERR	SS+3*
>> SROPER	PROC+1, LOOP+1
SROPS	PROC+1!
SROPS(	LOOP+1*
SROPS(1	PROC+1*, PROC+2
SROPS(2	PROC+2
SROPS(3	PROC+2
>> SRSCON	ANES, PROC, BLOOD, OTH
>> SRSOUT	SS+2*
>> SRSSN	ANES, PROC, BLOOD, OTH
>> SRT	BLOOD+1
>> SRTN	ANES+1, PROC+1, PROC+5, OTH+1, SS, SS+1, SS+3
SRTX	SS+3!
>> XRTL	RT+1
>> XRTN	RT+1*
>> Y	ANES+1, PROC+5

Customize PDF page

Package: Surgery

Routine: SRSCHUN1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
OTH
RT	; start RT logging
SS
ANES
BLOOD
PROC
LOOP	; break procedure if greater than 54 charcaters