Routine: SROSPSS

Package	Total	Call Graph
Surgery	2	^SROSTOP $$MANDIV^SROUTL0
Registration	1	DEM^VADPT

Package

Total

Call Graph

^SROSTOP $$MANDIV^SROUTL0

DEM^VADPT

Package	Total	Caller Graph
Surgery	1	SROSPEC

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
SET	; set case variables for printing
HDR	; print heading
OPS
UTIL	; case information
OTHER	; other operations
DATE
PAGE
LOOP	; break procedure if greater than 50 characters

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"TOTAL ",SRSPEC,": 0" Line Location: SROSPSS+5
Function Call: WRITE	Prompt: !!,"TOTAL CASES WITHOUT SPECIMENS: 0" Line Location: SROSPSS+6
Function Call: WRITE	Prompt: !!,"TOTAL ",SRSPEC,": ",TOTAL Line Location: DATE+2
Function Call: WRITE	Prompt: !,SROD,?20,VADM(1),?55,SRDIAG,?110,SRSUR,!,SRTN,?20,VA("PID"),?55,SROP(1),?110,SRATT Line Location: OPS+2
Function Call: WRITE	Prompt: !,?55,SROP(2) Line Location: OPS+2
Function Call: WRITE	Prompt: !,?55,SROP(2) Line Location: OPS+2
Function Call: WRITE	Prompt: !,?55,SROP(2) Line Location: OPS+2
Function Call: WRITE	Prompt: ! Line Location: OPS+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAGE+1
Function Call: WRITE	Prompt: !!,"Press RETURN to continue listing cases, or '^' to exit from this option." Line Location: PAGE+2
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(132-$L(SRINST)\2),SRINST,?120,"PAGE ",PAGE,!,?58,"SURGICAL SERVICE",?100,"REVIEWED BY: ",!,?55,"CASES WITHOUT SPECIMENS",?100,"DATE REVIEWED: " Line Location: HDR+3
Function Call: WRITE	Prompt: !,?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT Line Location: HDR+5
Function Call: WRITE	Prompt: !!,"DATE",?20,"PATIENT",?55,"POSTOPERATIVE DIAGNOSIS",?110,"SURGEON",!,"CASE #",?20,"PATIENT ID",?55,"OPERATIVE PROCEDURE",?110,"ATTENDING SURGEON" Line Location: HDR+6
Function Call: WRITE	Prompt: ! Line Location: HDR+7
Function Call: WRITE	Prompt: "=" Line Location: HDR+7

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

Name	Line Occurrences
DATE	SROSPSS+4
HDR	SROSPSS+6, PAGE
LOOP	OPS+1
OTHER	OPS
PAGE	SROSPSS+4, SROSPSS+5, DATE+1, SET+1, PAGE+2
SET	DATE
UTIL	SROSPSS+3

Name	Field # of Occurrence
^(	SET+3
^(34	SET+3

Name	Field # of Occurrence
>> DFN	SET+2*
DTIME	PAGE+1
>> I	OPS*
IOF	HDR+2
IOSL	DATE+1, SET+1
IOST	PAGE
>> LINE	HDR+7*
>> LOOP	LOOP+1*
>> M	OPS+1*, LOOP+1
MM	OPS+1!, LOOP+1*
MMM	OPS+1!, LOOP+1*
>> OPER	OPS, OTHER+1, OTHER+2
>> PAGE	SROSPSS+2, HDR+3, HDR+8
>> SR(	SET+3*
>> SRATT	SET+3, SET+5, OPS+2
>> SRDIAG	SET+3*, OPS+2
>> SRED	SROSPSS+2
>> SREDT	SROSPSS+2*, SROSPSS+3
>> SRFRTO	HDR+5
>> SRHALT	HDR+1
>> SRHDR	SROSPSS+2, PAGE, HDR+8
>> SRINST	HDR+3
>> SRINSTP	SROSPSS+3
>> SRLONG	OTHER+1*, OTHER+2
>> SROD	SET+2*, OPS+2
SROP	OPS+1!
SROP(	LOOP+1*
SROP(1	OPS+1*, OPS+2
SROP(2	OPS+2
SROP(3	OPS+2
SROP(4	OPS+2
>> SROPER	OPS, OPS+1, OTHER+1, OTHER+3, LOOP+1
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
>> SRPRINT	HDR+5
>> SRSD	SROSPSS+2
>> SRSDATE	SROSPSS+2, SROSPSS+3, DATE*, UTIL+4, SET+2
>> SRSOUT	SROSPSS+2, SROSPSS+3, SROSPSS+4, SROSPSS+5, DATE, DATE+1, SET+1, PAGE+1, HDR+1*
>> SRSP	SROSPSS+5, SROSPSS+6, UTIL+2
>> SRSP(	SROSPSS+5, UTIL+2
SRSPEC	SROSPSS+4, SROSPSS+5, SROSPSS+6!, DATE+2, HDR+4
>> SRSS	SROSPSS+4, SROSPSS+5, DATE, UTIL+2*, UTIL+4
>> SRSUR	SET+3, SET+4, OPS+2
>> SRTN	SROSPSS+3, DATE, UTIL+1, UTIL+2, UTIL+3, UTIL+4, SET+2, SET+3, OPS, OPS+2 , OTHER+1, OTHER+2
>> TOTAL	SROSPSS+4, DATE+2, OPS+3
>> VA("PID"	OPS+2
>> VADM(1	OPS+2
>> X	PAGE+1*, PAGE+2
>> ZTQUEUED	HDR+1

Information