Routine: SROAUTL3

Package	Total	Call Graph
Surgery	9	^SROACAT ^SROACLN ^SROACOP ^SROAPRE (LR,PREOP)^SROAUTL0 GET^SROAUTL1 (,GET)^SROAUTL2 $$CARD^SROAUTLC TECH^SROPRIN
VA Fileman	2	EN^DIQ1 ^DIR

Package

Total

Call Graph

^SROACAT ^SROACLN ^SROACOP ^SROAPRE (LR,PREOP)^SROAUTL0 GET^SROAUTL1 (,GET)^SROAUTL2 $$CARD^SROAUTLC
TECH^SROPRIN

EN^DIQ1 ^DIR

Package	Total	Caller Graph
Surgery	7	SROACOM SROALM SRONEW SRSCHUN1 SRSRQST1 SRSUP1 SRSUPRQ

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
NON
RISK	; allow entry of risk assessment preop information with case request
PREOP	; print preop information (managerial)
CHK	; check for missing information for excluded cases
TR
LAB	; print preoperative laboratory test information (managerial)
EXT
CARD	; allow input of cardiac risk assessment preop information
OUT

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: RISK+4
Function Call: WRITE	Prompt: @IOF,!,"Enter Cardiac Preoperative information",!!," 1. Clinical Information",!," 2. Cardiac Catheterization & Angiographic Data",!," 3. Operative Risk Summary Data",! Line Location: CARD+2
Function Call: WRITE	Prompt: !! Condition for execution: $E(IOST)="P" Line Location: PREOP+1
Function Call: WRITE	Prompt: !,?28,"PREOPERATIVE INFORMATION",! Line Location: PREOP+1
Function Call: WRITE	Prompt: SREXT Line Location: EXT+1
Function Call: WRITE	Prompt: ?40,X Line Location: EXT+2
Function Call: WRITE	Prompt: ?40,$E(X,1,J-1) Line Location: EXT+3
Function Call: WRITE	Prompt: !,?20,"PREOPERATIVE LABORATORY TEST INFORMATION",! Line Location: LAB+1
Routine Call	DIR Line Location: RISK+2 RISK+4 CARD+3

FileNo	Call Tags
^SRF - [#130]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(45.3 - [#45.3]	RISK+3
^SRF - [#130]	RISK+3
^SRO(133 - [#133]	RISK+1
^SRO(137.45 - [#137.45]	RISK+3

Name	Field # of Occurrence
DA	OUT!, LAB+2!, CHK+1!*, CHK+2!
DIC	OUT!, LAB+2!, CHK+1!*, CHK+2!
DIQ	OUT!, LAB+2!, CHK+1!*, CHK+2!
DIQ(0	OUT, LAB+2, CHK+1*
DIR	RISK+2!, RISK+4!, CARD+3!
DIR("?"	CARD+3*
DIR("A"	RISK+2, RISK+4
DIR("B"	RISK+2*
DIR(0	RISK+2, RISK+4, CARD+3*
DR	PREOP+1, OUT!, LAB+2!, NON*, CHK+1!, CHK+2!
>> DTOUT	RISK+2, RISK+4, CARD+3
>> DUOUT	RISK+2, RISK+4, CARD+3
I	OUT+1, OUT+2, EXT+2~, EXT+3, LAB+3*, TR
IOF	CARD+2
IOST	PREOP+1
J	EXT+2~, EXT+3, TR
>> L	LAB+3*
>> M	OUT+1, LAB+3
>> SRCARD	RISK+3, RISK+4, RISK+5, RISK+6, RISK+7
>> SRDR	PREOP+1, OUT, OUT+1, LAB+2, LAB+3
>> SRDT	LAB+4*, LAB+5
>> SREQST	RISK+3*
>> SREXT	OUT+4, EXT, EXT+1, EXT+2
>> SRFLD	OUT+3, OUT+4, EXT, LAB+4, LAB+5
SRNM	CARD+1~
>> SRQ	PREOP+1*, OUT+2
SRSDATE	CARD+1~
>> SRSITE	RISK+1
SRSOUT	CARD+1~
>> SRSP	RISK+3*
>> SRTECH	CHK+2
>> SRTN	RISK+3, OUT, OUT+4, LAB+2, LAB+5, CHK+1
SRX	OUT+1!, OUT+3, LAB+3!, LAB+4, CHK+1!
SRX(	OUT+3, LAB+4
SRX("ANESTHES	IA TECHNIQUE" , CHK+2*
SRY	OUT!, LAB+2!, CHK+1!, CHK+2!
SRY(130	OUT+4, LAB+5
SRZ	CHK+2!
X	OUT+3, EXT+2~, EXT+3, LAB+4
Y	RISK+1, RISK+2, RISK+5, CARD+3, CARD+4, CARD+5, OUT+3, EXT+2~, EXT+3, LAB+4
>> Z	OUT+3, OUT+4, LAB+4, LAB+5

Information