Routine: SROALCS

Package	Total	Call Graph
Surgery	4	^SROALCSP CPTS^SROAUTL0 TECH^SROPRIN ($$MANDIV,$$NODATA)^SROUTL0
Registration	1	DEM^VADPT
VA Fileman	1	D^DIQ

Package	Total	Caller Graph
Surgery	1	SROALOG

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: $$NODATA^SROUTL0() Line Location: SROALCS+7
Function Call: WRITE	Prompt: !,?20,SROPS(SRAO) Line Location: SET+13
Function Call: WRITE	Prompt: !,?20,"CPT Codes: " Line Location: SET+14
Function Call: WRITE	Prompt: ! Line Location: SET+16
Function Call: WRITE	Prompt: "-" Line Location: SET+16
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGE+0
Function Call: WRITE	Prompt: !!,"If you want to continue listing incomplete assessments, enter <RET>. Enter",!,"'^' to return to the menu." Line Location: PAGE+1
Function Call: WRITE	Prompt: @IOF,!,?27,"COMPLETED RISK ASSESSMENTS",!,?(80-$L(SRFRTO)\2),SRFRTO,!!,"ASSESSMENT #",?20,"PATIENT",?55,"DATE COMPLETED",!,"OPERATION DATE",?20,"OPERATION(S)",?55,"ANESTHESIA TECHNIQUE",! Line Location: HDR+0
Function Call: WRITE	Prompt: "=" Line Location: HDR+0
Function Call: WRITE	Prompt: !!," SURGICAL SPECIALTY: ",SRSS," ",! Line Location: SS+2

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SROALCS+5, UTL+2, UTL+3, SET+3, SET+6, SET+7, OTHER+1, OTHER+2
^SRF("AC"	SROALCS+5
^SRO(137.45 - [#137.45]	UTL+3, SET+9
^TMP("SRA"	SROALCS+3!, SROALCS+6, SROALCS+7, UTL+4*

Name	Field # of Occurrence
>> DFN	SET+3*
DTIME	PAGE
I	SET+3~, SET+6, SET+14~, SET+15
IOF	HDR
IOSL	SET+2, SS+1
IOST	SROALCS+2
>> LINE	SET+16, HDR
>> LOOP	LOOP+1*
>> M	SET+8*, LOOP+1
MM	SET+8!, LOOP+1*
MMM	SET+8!, LOOP+1*
>> SR("RA"	SROALCS+5, UTL+1, SET+3, SET+5, SET+10
>> SRA(0	SET+3*, SET+9, SET+12
>> SRANM	SET+3, SET+4, SET+13
>> SRAO	SET+13*
>> SRASP	UTL+2
>> SRASSN	SET+3*
>> SRC	SET+5*, SET+13
SRCPTT	SET+1!*
>> SRDT	SET+12*, SET+13
>> SRED	SROALCS+5
>> SRFLG	UTL+2
>> SRFRTO	HDR
>> SRINSTP	SROALCS+5
SRL	SET+14~*
>> SRLONG	OTHER+1*, OTHER+2
>> SROPER	SET+6, SET+7, SET+8, OTHER+1, OTHER+3, LOOP+1*
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	SET+8!
SROPS(	SET+13, LOOP+1*
SROPS(1	SET+8*, SET+13
>> SROTHER	SET+6, OTHER+1, OTHER+2
SRPROC	SET+14~
SRPROC(	SET+15
>> SRSD	SROALCS+5*
>> SRSOUT	SROALCS+4, SROALCS+5, SROALCS+6, SET+2, PAGE, SS+1
>> SRSS	SROALCS+6, UTL+3, UTL+4, SET+9, SET+10, SS+2
>> SRTECH	SET+13
>> SRTN	SROALCS+5, SROALCS+6, UTL+2, UTL+3, UTL+4, SET+3, SET+6, SET+7, SET+13, OTHER+1 , OTHER+2
>> TYPE	SET+10*
>> VA("PID"	SET+3, SET+13
VADM	SET+3!
VADM(1	SET+3
>> X	SET+7, PAGE, PAGE+1
>> Y	SET+5, SET+12