Routine: SROALST

Package	Total	Call Graph
Surgery	5	^SROALSTP CPTS^SROAUTL0 SSPRIN^SROCPT0 TECH^SROPRIN $$MANDIV^SROUTL0
DRG Grouper	1	$$CPT^ICPTCOD
Registration	1	DEM^VADPT
VA Fileman	1	(D,Y)^DIQ

Package	Total	Caller Graph
Surgery	1	SROALOG

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !,SRTN,?20,SRANM_" "_VA("PID"),?55,$P(SRSS,"("),!,SRDT,?20,SROPS(1),?55,SRTECH,!,STATUS Line Location: SET+21
Function Call: WRITE	Prompt: ?20,SROPS(2) Condition for execution: $D(SROPS(2)) Line Location: SET+21
Function Call: WRITE	Prompt: ?55,SREXCL Line Location: SET+21
Function Call: WRITE	Prompt: !,SRDOC Line Location: SET+22
Function Call: WRITE	Prompt: ?20,SROPS(3) Line Location: SET+22
Function Call: WRITE	Prompt: ?20,SROPS(3) Line Location: SET+22
Function Call: WRITE	Prompt: !,?20,"CPT Codes: " Line Location: SET+23
Function Call: WRITE	Prompt: ! Line Location: SET+25
Function Call: WRITE	Prompt: "-" Line Location: SET+25
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,!,?(80-$L(SRHD)\2),SRHD,!,?(80-$L(SRFRTO)\2),SRFRTO Line Location: HDR+1
Function Call: WRITE	Prompt: !!,"CASE #",?20,"PATIENT",?55,"SURGICAL SPECIALTY",!,"OPERATION DATE",?20,"PRINCIPAL OPERATION",?55,"ANESTHESIA TECHNIQUE",!,"ASSESSMENT STATUS",?55,"EXCLUSION CRITERIA",!,"SURGEON",! Line Location: HDR+2
Function Call: WRITE	Prompt: "=" Line Location: HDR+2

Name	Line Occurrences (* Changed, ! Killed)
^DD(130	SET+9, SET+18
^SRF - [#130]	SROALST+3, SET+3, SET+4, SET+5, SET+6, SET+8, SET+11, SET+12, SET+13, SET+18 , OTHER+1, OTHER+2
^SRF("AC"	SROALST+3
^SRO(136 - [#136]	SET+20
^SRO(137.45 - [#137.45]	SET+15

Name	Field # of Occurrence
>> C	SET+9, SET+18
>> CAN	SET+4, SET+5
>> DFN	SET+7*
DTIME	PAGE
I	SET+7~, SET+12, SET+23~, SET+24
IOF	HDR+1
IOSL	SET+2
IOST	SROALST+2
>> LINE	SET+25, HDR+2
>> LOOP	LOOP+1*
>> M	SET+14*, LOOP+1
MM	SET+14!, LOOP+1*
MMM	SET+14!, LOOP+1*
>> SRA("RA"	SET+8*, SET+9
>> SRA(0	SET+3*, SET+7, SET+15, SET+17
>> SRANM	SET+7*, SET+21
>> SRASSN	SET+7*
SRCPTT	SET+1!, SET+20
>> SRDOC	SET+18, SET+19, SET+22
>> SRDT	SET+17*, SET+21
>> SRED	SROALST+3
>> SREXCL	SET+9*, SET+10, SET+21
>> SRFRTO	HDR+1
>> SRHD	HDR*, HDR+1
>> SRINSTP	SROALST+3
SRL	SET+23~*
>> SRLONG	OTHER+1*, OTHER+2
>> SROPER	SET+11, SET+13, SET+14, OTHER+1, OTHER+3, LOOP+1*
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	SET+14!
SROPS(	LOOP+1*
SROPS(1	SET+14*, SET+21
SROPS(2	SET+21
SROPS(3	SET+22
SROPS(4	SET+22
>> SROTHER	SET+12, OTHER+1, OTHER+2
SRPROC	SET+23~
SRPROC(	SET+24
>> SRSD	SROALST+3*
>> SRSOUT	SROALST+3, SET+2, PAGE
>> SRSS	SET+15*, SET+21
>> SRTECH	SET+21
>> SRTN	SROALST+3*, SET+3, SET+4, SET+5, SET+6, SET+8, SET+11, SET+12, SET+13, SET+18 , SET+20, SET+21, OTHER+1, OTHER+2
>> STATUS	SET+8, SET+10, SET+21
>> VA("PID"	SET+7, SET+21
VADM	SET+7!
VADM(1	SET+7
>> X	SET+6, SET+8, SET+11, SET+13, SET+20, PAGE, PAGE+1
>> Y	SET+9, SET+17, SET+18, SET+19, SET+20
>> Z	SET+18*