Routine: SRSCHUN1

Information

SRSCHUN1 ;B'HAM ISC/MAM - MAKE UNREQUESTED OPERATION (optional fields); [ 04/26/97 3:15 PM ]

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Surgery	10	^SRCUSS RISK^SROAUTL3 ^SROBLOD ^SROCON1 ^SROERR0 $$ICDSTR^SROICD ^SROPCE1 EN2^SROVAR $$CHKS^SRSCOR $$SPIN^SRTOVRF
Kernel	1	T0^%ZOSV
VA FileMan	1	^DIE

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: 3

Package	Total	Caller Graph
Surgery	3	SRSCHCA SRSCHD SRSCHDC

Entry Points

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

External References

Name	Field # of Occurrence
T0^%ZOSV	RT+1
^DIE	ANES+1, PROC+5, OTH+5
^SRCUSS	SS+1
RISK^SROAUTL3	SS+3
^SROBLOD	BLOOD+1
^SROCON1	OTH+5, SS+3
^SROERR0	SS+4
$$ICDSTR^SROICD	OTH, SS
^SROPCE1	SS+3
EN2^SROVAR	SS+1
$$CHKS^SRSCOR	SS+1, SS+2
$$SPIN^SRTOVRF	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+1
Function Call: WRITE	Prompt: !,?29,$S(SRSCON=1:"FIRST",1:"SECOND")_" CONCURRENT CASE" Condition for execution: $D(SRCC) Line Location: OTH+1
Function Call: WRITE	Prompt: !,?20,"SCHEDULE UNREQUESTED OPERATION: OTHER INFORMATION",!!,SRNM_" ("_SRSSN_")",?65,SREQDT,!,SRLINE,! Line Location: OTH+1
Routine Call	DIE Line Location: ANES+1 PROC+5 OTH+5

Global Variables Directly Accessed

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

Label References

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

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

Customize PDF page

Package: Surgery