Routine: SROAUTLC

Package	Total	Call Graph
VA Fileman	4	NOW^%DTC EN^DDIOL EN^DIQ1 ^DIR
Surgery	1	(,RED)^SROAUTL4

Package	Total	Caller Graph
Surgery	4	SROA CARDIAC ENTER/EDIT SROACOM1 SROALM SROAUTL3

Entry Points

Name	Comments	DBIA/ICR reference
EM	; input transform logic on Case Schedule Type field (.035)
HELP
YN
CATH
CAR
CHK	; check for missing cardiac assessment information
SITE	; determine if site is a cardiac facility
LAB
CAT
OUT
R
KNOW	; delete date/time of surgical priority entry
CLIN
NOW	; update date/time of surgical priority entry
CARD()	; extrinsic call to determine if site is cardiac facility
OP

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,"The SURGERY SITE PARAMETERS file indicates this site/division does not use ",!,"the Cardiac Risk Assessment module. Therefore, this option is not available",!,"for use.",! Line Location: SITE+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: SITE+3
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: SITE+3
Function Call: WRITE	Prompt: @IOF Line Location: SITE+3
Routine Call	DIR Line Location: CAT+1 YN HELP+8

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

Name	Line Occurrences (* Changed, ! Killed)
^DIC(45.3 - [#45.3]	EM+3
^SRF - [#130]	NOW+1, KNOW+1, EM+2, EM+3, CAT+2, CAR+1
^SRO(133 - [#133]	CARD+2
^SRO(137.45 - [#137.45]	EM+3

Name	Field # of Occurrence
>> %	NOW+1
CARD	CARD+1~, CARD+2, CARD+3
DA	NOW+1, KNOW+1, EM+2, EM+3, CAT+2, CHK+1!*
DIC	CHK+1!*
DIQ	CHK+1!*
DIQ(0	CHK+1*
DIR	EM+1~, CAT!, YN!, HELP+8~
DIR("?"	CAT+1*
DIR("A"	CAT, CAT+1, YN, HELP+8
DIR(0	CAT+1, YN, HELP+8*
DR	CHK+1!, CLIN, CATH, R, OP, OUT, CAR, CAR+1, LAB
DTIME	SITE+3
>> DTOUT	CAT+1, YN, HELP+8
>> DUOUT	CAT+1, YN, HELP+8
IOF	SITE+2, SITE+3
>> SRC	CHK+1*
SREM	EM+1~, CAT+2*
SRHLP	HELP!, HELP+7!
SRHLP(1	HELP*
SRHLP(10	HELP+3*
SRHLP(11	HELP+4*
SRHLP(12	HELP+4*
SRHLP(13	HELP+4*
SRHLP(14	HELP+5*
SRHLP(15	HELP+5*
SRHLP(16	HELP+5*
SRHLP(17	HELP+6*
SRHLP(18	HELP+6*
SRHLP(19	HELP+6*
SRHLP(2	HELP*
SRHLP(20	HELP+7*
SRHLP(21	HELP+7*
SRHLP(22	HELP+7*
SRHLP(3	HELP*
SRHLP(4	HELP+1*
SRHLP(5	HELP+1*
SRHLP(6	HELP+2*
SRHLP(7	HELP+2*
SRHLP(8	HELP+3*
SRHLP(9	HELP+3*
SRNOT	EM+1~
SRQ	EM+1~, EM+3, YN, YN+1, HELP+8
>> SRSITE	CARD+1, CARD+2
SRSP	EM+1~, EM+3*
>> SRTN	CHK+1, CAR+1
SRX	CHK+1!
SRY	CHK+1!
SRZZ	CHK+1!
X	SITE+3*, NOW+1~, EM+2, CAT~, YN~
>> XQUIT	SITE+3*
>> Y	CAT+2, YN+1