Routine: SROAUTL

Information

SROAUTL ;BIR/ADM - RISK ASSESSMENT UTILITY ;03/03/08

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
Surgery	5	^SROAUTL1 ^SROAUTL2 EN^SROCCAT TECH^SROPRIN ($$LOCK,UNLOCK)^SROUTL
VA Fileman	5	DD^%DT C^%DTC ^DIE EN^DIQ1 ^DIR
DRG Grouper	2	$$CPT^ICPTCOD $$MOD^ICPTMOD
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Surgery	40	SRO1L1 SROACAR SROACAR1 SROACAT SROACL1 SROACL2 SROACLN SROACOD SROACOM SROACOP SROACPM SROACPM1 SROACR1 SROACR2 SROACTH SROACTH1 SROAEX SROALAB SROALDP SROALEN SROALM SROALN2 SROALN3 SROAMAN SROAOP SROAOP1 SROAOP2 SROAOUT SROAPM SROAPR2 SROAPRE SROAPS1 SROAPS2 SROARET SROAUTL0 SROCLAB SROCMPED SROCMPS SROTHER SROUTC

Entry Points

Name	Comments	DBIA/ICR reference
HDR	; print screen header
NCODE
OCC
DEM
REM
DATE	; called by output transform on several date fields
PREHD
NC	; called from input transform to kill X if case is cardiac assessed
CARD()	; is this a cardiac assessed case?
FUNCT()	; called by screen on functional health status field (#240)
CHK	; check for missing non-cardiac assessment data items
STUFF	; stuff preop information from previous case
DUP	; duplicate preop information from prior operation within 60 days
K901	; kill logic for AOP and AMS cross references
OTH
PREOP
INDX	; set airway index
LAB
LOOP
MS	; set logic for AMS cross reference on Mandibular Space field (901.2)
OCCEND
OP	; set logic for AOP cross reference on Oral-Pharyngeal field (901.1)

External References

Name	Field # of Occurrence
DD^%DT	DATE+2
C^%DTC	DUP+4
^DIE	STUFF+3
EN^DIQ1	STUFF+2, CHK+2, CHK+3
^DIR	DUP+12
$$CPT^ICPTCOD	SROAUTL+5, NCODE+2
$$MOD^ICPTMOD	SROAUTL+7, NCODE+4
^SROAUTL1	CHK+2
^SROAUTL2	CHK+3
EN^SROCCAT	OCC
TECH^SROPRIN	OTH
$$LOCK^SROUTL	STUFF+1
UNLOCK^SROUTL	STUFF+1
DEM^VADPT	SROAUTL+3, NCODE

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,SRHDR(I) Line Location: HDR+2
Function Call: WRITE	Prompt: ?(79-$L(SRCSTAT)),SRCSTAT Line Location: HDR+2
Function Call: WRITE	Prompt: ! Line Location: HDR+4
Function Call: WRITE	Prompt: "-" Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: HDR+5
Routine Call	DIE Line Location: STUFF+3
Routine Call	DIR Line Location: DUP+12

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	SROAUTL+4, NCODE+1, DUP+9
^SRF - [#130]	SROAUTL+3, SROAUTL+4, SROAUTL+5, SROAUTL+6, SROAUTL+7, NCODE, NCODE+1, NCODE+2, CARD+2, INDX+1* , OP+1, MS+1, K901+1*, DUP+1, DUP+2, DUP+4, DUP+5, DUP+6, DUP+8, DUP+9 , DUP+10, OCC, OCC+1, OCC+2, OCC+3, OCC+5
^SRF("B"	DUP+4
^SRO(136 - [#136]	NCODE+2, NCODE+3, NCODE+4
^SRO(136.5 - [#136.5]	OCC+7
^TMP("SROCC"	OCC!, OCC+1, OCC+5, OCC+6, OCC+7, OCC+8, OCCEND!

Label References

Name	Line Occurrences
$$CARD	FUNCT+2, NC+1
@(	CHK+2, CHK+3
INDX	OP+1, MS+1
LOOP	SROAUTL+10, NCODE+7
NCODE	SROAUTL+2
OCCEND	OCC+6
PREHD	STUFF+2
PREOP	PREHD
STUFF	DUP+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	CARD+1, INDX+1, OP+1, MS+1, K901+1, STUFF+2!, STUFF+3!, CHK+2!, CHK+3!, OTH!
>> DFN	SROAUTL+3, NCODE, DUP+4*
DIC	STUFF+2!, CHK+2!, CHK+3!*, OTH!
DIE	STUFF+3*!
DIQ	STUFF+2!, CHK+2!, CHK+3!*, OTH!
DIQ(0	STUFF+2, CHK+2, CHK+3*
DIR	DUP+9!, DUP+12!
DIR("A"	DUP+10, DUP+11
DIR("B"	DUP+12*
DIR(0	DUP+12*
DR	STUFF+2!, STUFF+3!, CHK+2!, CHK+3!, OTH!, PREOP, DEM, LAB, REM, PREHD
>> DTOUT	DUP+12
>> DUOUT	DUP+12
>> I	LOOP+2, HDR+2, HDR+4, DUP+1
IOF	HDR+1
>> J	LOOP+2*
>> K	LOOP+1, LOOP+2
NOGO	DUP+1, DUP+2, DUP+3!
>> SR	DUP+4, DUP+8
SR200	DUP+1*!
>> SRC	CHK+2, CHK+3
SRCASE	DUP+4!, DUP+5, DUP+6, DUP+7, DUP+8, DUP+9, DUP+10, STUFF+1, STUFF+2, STUFF+3
SRCASE(	DUP+7*, DUP+8
SRCMOD	SROAUTL+3~, SROAUTL+6, SROAUTL+7, SROAUTL+8, NCODE~, NCODE+3, NCODE+4, NCODE+5
SRCOMMA	SROAUTL+3~, SROAUTL+6, SROAUTL+8, NCODE~, NCODE+3, NCODE+5
>> SRCPT	SROAUTL+5, SROAUTL+6, SROAUTL+8, SROAUTL+9, SROAUTL+10, NCODE+2, NCODE+3, NCODE+5, NCODE+6, NCODE+7
SRCSTAT	HDR+2, HDR+3, HDR+4!
>> SRDATE	OCC+2, OCC+4, OCC+5, OCC+7, OCC+8
SRDT	DUP+8!, DUP+9*, DUP+10
>> SRENDT	DUP+4*, DUP+5
SRHDR	SROAUTL+3!, NCODE!, HDR+1
SRHDR(	LOOP+1, LOOP+2, HDR+2, HDR+3, HDR+4!
SRHDR(1	SROAUTL+10, NCODE+7, LOOP*
SRI	SROAUTL+6, SROAUTL+7, NCODE+3, NCODE+4, INDX+1, INDX+2!, OP+1~, MS+1~
>> SRM	SROAUTL+7, NCODE+4
SRMS	INDX+2!, OP+1~, MS+1~
SRO	OCC!
SROP	INDX+2!, MS+1~*
>> SROPER	SROAUTL+5, SROAUTL+10, NCODE+2, NCODE+7, LOOP, LOOP+1
SRPAGE	HDR+1, HDR+4!
>> SRPO	OCC+1, OCC+2, OCC+3, OCC+5, OCC+7*
SRSCR	FUNCT+1~, FUNCT+2, FUNCT+3
>> SRSDATE	SROAUTL+4, SROAUTL+10, NCODE+1, NCODE+7, DUP+4, DUP+5, OCC, OCC+1
SRSEP	CHK+1~, OCC+3*, OCC+5
>> SRSOUT	DUP+12*
>> SRSUPCPT	SROAUTL+2, SROAUTL+9
>> SRTECH	OTH
>> SRTN	SROAUTL+3, SROAUTL+4, SROAUTL+5, SROAUTL+6, SROAUTL+7, NCODE, NCODE+1, NCODE+2, NCODE+3, NCODE+4 , CARD+1, DUP+1, DUP+2, DUP+4, DUP+6, STUFF+3, CHK+2, CHK+3, OCC, OCC+1 , OCC+2, OCC+3, OCC+5
SRX	CARD+1~, CARD+2, DUP+5, DUP+7, DUP+8, CHK+1!
SRX("ANESTHES	IA TECHNIQUE" , OTH*
SRX("POSTOP O	CCURRENCE DATE" , OCC+7*
SRX("SEPSIS C	ATEGORY" , OCC+8*
SRY	DATE+2~, INDX+1, INDX+2!, OP+1~, MS+1~, STUFF+2!, CHK+2!, CHK+3!, OTH!
SRY(130	STUFF+3
SRZ	STUFF+3*, OTH!
>> VA("PID"	SROAUTL+3, NCODE
>> VADM(1	SROAUTL+3, NCODE
X	SROAUTL+3~, SROAUTL+5, NCODE~, NCODE+2, LOOP+1, LOOP+2, NC+1!, OP+1, MS+1, DUP+1* , DUP+2*, DUP+4
>> X1	DUP+4*
>> X2	DUP+4*
>> Y	SROAUTL+4, SROAUTL+5, NCODE+1, NCODE+2, LOOP+2, DATE+1, DATE+2, DUP+8, DUP+9*, DUP+13

Customize PDF page

Package: Surgery

Routine: SROAUTL

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 40

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: