Routine: SRONOR5

Package	Total	Caller Graph
Surgery	1	SRONOR

Entry Points

Name	Comments	DBIA/ICR reference
UTIL	; set ^TMP
SET	; set and print info
LOOP	; break procedure if greater than 50 characters
HDR
OTHER	; other operations

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,?35,"There were no procedures entered for the date range selected." Line Location: SRONOR5+3
Function Call: WRITE	Prompt: !!,SRSDATE,?15,SRNM_" ("_VA("PID")_")",?64,SRSS,?116,SRST,!,SROP,?15,SRLOC_" ("_SRINOUT_")",?64,SROPS(1),?116,SRET Line Location: SET+12
Function Call: WRITE	Prompt: ! Condition for execution: SRABORT="" Line Location: SET+13
Function Call: WRITE	Prompt: ?64,SROPS(2) Line Location: SET+13
Function Call: WRITE	Prompt: !,?64,SROPS(3) Line Location: SET+13
Function Call: WRITE	Prompt: !,?64,SROPS(3) Line Location: SET+13
Function Call: READ	Timeout: DTIME Variable: X Line Location: HDR+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(132-$L(SRINST)\2),SRINST,!,?57,"SURGICAL SERVICE",?100,"REVIEWED BY:",!,?51,"REPORT OF NON-O.R. PROCEDURES",?100,"DATE REVIEWED:",!,?(132-$L(SRFRTO)\2),SRFRTO Line Location: HDR+2
Function Call: WRITE	Prompt: !!,"DATE",?15,"PATIENT (ID#)",?64,"SPECIALTY",?116,"START TIME",!,"CASE #",?15,"LOCATION (IN/OUT-PAT STATUS)",?64,"PROCEDURE(S)",?116,"FINISH TIME",! Line Location: HDR+3
Function Call: WRITE	Prompt: "=" Line Location: HDR+3
Function Call: WRITE	Prompt: !,?(124-$L("PROVIDER: "_SRSURG)\2),"* PROVIDER "_SRSURG_" *" Line Location: HDR+4

Name	Line Occurrences (* Changed, ! Killed)
^ECC(723	SET+5
^SC - [#44]	SET+6
^SRF - [#130]	SRONOR5+2, SET+2, SET+5, SET+6, SET+7, SET+8, SET+9, SET+11, UTIL+1, OTHER+1 , OTHER+2
^SRF("AC"	SRONOR5+2
^TMP("SR"	SRONOR5+2!, SRONOR5+3, SRONOR5+4, UTIL+3*
^VA(200 - [#200]	UTIL+1

Name	Field # of Occurrence
>> DFN	SET+2*
DTIME	HDR+1
IOF	HDR+2
IOSL	SET+1
IOST	HDR+1
>> LINE	HDR+3*
>> LOOP	LOOP+1*
>> M	SET+10*, LOOP+1
MM	SET+10!, LOOP+1*
MMM	SET+10!, LOOP+1*
>> OPER	SET+9, OTHER+1, OTHER+2
>> SR	SET+2*, SET+3
>> SRABORT	SET+11*, SET+13
>> SRED	SRONOR5+2
>> SRET	SET+8*, SET+12
>> SRFRTO	HDR+2
>> SRHALT	HDR
>> SRHDR	SRONOR5+3, HDR+1, HDR+4
>> SRINOUT	SET+3*, SET+12
>> SRINST	HDR+2
>> SRLOC	SET+6*, SET+12
>> SRLONG	OTHER+1*, OTHER+2
>> SRNM	SET+2*, SET+12
>> SROP	SRONOR5+2, SRONOR5+4, SET+2, SET+5, SET+6, SET+7, SET+8, SET+9, SET+11, SET+12 , UTIL+1, UTIL+3, OTHER+1, OTHER+2
>> SROPER	SET+9, SET+10, OTHER+1, OTHER+3, LOOP+1
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	SET+10!
SROPS(	LOOP+1*
SROPS(1	SET+10*, SET+12
SROPS(2	SET+13
SROPS(3	SET+13
SROPS(4	SET+13
>> SRSD	SRONOR5+2, SRONOR5+4, SET+4, UTIL+3
>> SRSDATE	SET+4*, SET+12
>> SRSOUT	SRONOR5+3, SRONOR5+4, SET+1, HDR, HDR+1*
>> SRSS	SET+5*, SET+12
>> SRSSN	SET+2*
>> SRST	SET+7*, SET+12
>> SRSUR	UTIL+1*, UTIL+2
>> SRSURG	UTIL+2, HDR+4
>> VA("PID"	SET+2, SET+12
>> VADM(1	SET+2
>> X	SET+3, HDR+1
>> Y	SET+4, SET+6, SET+7, SET+8, UTIL+1*
>> ZTQUEUED	HDR