Routine: SROUNV2

Package	Total	Caller Graph
Surgery	1	SROUNV

Entry Points

Name	Comments	DBIA/ICR reference
CASE	; get case number
UTIL	; set ^TMP("SR",$J)
SET	; set variables & print info
HDR	; print heading
LOOP	; break procedure if greater than 59 characters

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No data for selected date range." Line Location: SROUNV2+5
Function Call: WRITE	Prompt: !,SRSDATE,?20,SRSNM_" ("_SRTN_")",?60,SRSUR,!,?20,VA("PID"),?60,SRATT,! Line Location: SET+8
Function Call: WRITE	Prompt: !,?20,SROPS(1) Line Location: SET+10
Function Call: WRITE	Prompt: !,?20,SROPS(2) Line Location: SET+10
Function Call: WRITE	Prompt: !,?20,SROPS(2) Line Location: SET+10
Function Call: WRITE	Prompt: ! Line Location: SET+11
Function Call: WRITE	Prompt: "-" Line Location: SET+11
Function Call: READ	Timeout: DTIME Variable: X Line Location: HDR+2
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+3
Function Call: WRITE	Prompt: !,?5,"List of Unverified Cases for "_SRSPEC,!!,"Operation Date",?20,"Patient (Case #)",?60,"Surgeon",!,?20,"Patient ID #",?60,"Attending Surgeon",! Line Location: HDR+3
Function Call: WRITE	Prompt: "=" Line Location: HDR+3

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SROUNV2+3, SET+2, SET+4, SET+5, UTIL+1, UTIL+2, UTIL+3, UTIL+4, UTIL+5
^SRF("AC"	SROUNV2+3
^SRO(137.45 - [#137.45]	UTIL+5
^TMP("SR"	SROUNV2+2!, SROUNV2+4, SROUNV2+5, CASE+1, UTIL+6*
^VA(200 - [#200]	SET+6, SET+7

Name	Field # of Occurrence
>> DFN	SET+2*
DTIME	HDR+2
>> EDATE	SROUNV2+2
IO	SROUNV2+2
IOF	HDR+3
IOSL	SET+1
IOST	HDR+2
>> LINE	SET+11, HDR+3
>> LOOP	LOOP+1*
>> M	SET+9*, LOOP+1
MM	SET+9!, LOOP+1*
MMM	SET+9!, LOOP+1*
>> SDATE	SROUNV2+2
SR	CASE+1!
SR(	SET+5, SET+6, SET+7, UTIL+2
SR(0	SET+2, UTIL+5
>> SRATT	SET+7*, SET+8
>> SRCPT	SET+4*
>> SRHALT	HDR+1
>> SRHDR	SROUNV2+4*, HDR+2
>> SRINSTP	SROUNV2+3
SROP	CASE+1!
>> SROPER	SET+4, SET+9, LOOP+1*
SROPS	SET+9!
SROPS(	LOOP+1*
SROPS(1	SET+9*, SET+10
SROPS(2	SET+10
SROPS(3	SET+10
>> SRSDATE	SET+2*, SET+8
>> SRSDT	SROUNV2+2, SROUNV2+3, SROUNV2+4*, CASE+1, UTIL+6
>> SRSEDT	SROUNV2+2*, SROUNV2+3
>> SRSNM	SET+2*, SET+8
>> SRSOUT	SROUNV2+2, SROUNV2+4, CASE+1, SET+1, HDR+1, HDR+2*
>> SRSPEC	SROUNV2+4, CASE+1, UTIL+5, HDR+3
>> SRSPECN	UTIL+5*, UTIL+6
>> SRSSN	SET+3*
>> SRSUR	SET+6*, SET+8
>> SRTN	SROUNV2+3, CASE+1, SET+2, SET+4, SET+5, SET+8, UTIL+1, UTIL+2, UTIL+3, UTIL+4 , UTIL+5, UTIL+6
>> VA("PID"	SET+3, SET+8
>> VADM(1	SET+2
>> X	HDR+2*
>> Y	SET+2*
>> ZTQUEUED	HDR+1