Routine: SROPLSTS

Package	Total	Call Graph
Surgery	5	TECH^SROPRIN ^SROSTOP $$DIV^SROUTL0 ^SRSKILL MINS^SRSUTL2
Kernel	1	^%ZISC
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Surgery	1	SROPLST1

Entry Points

Name	Comments	DBIA/ICR reference
HDDT	; set up variables common to both reports
SET	; set variables
END
HDR	; print heading
OPS
STOT	; print specialty total
S1
1	; entry when queued
ASK
OTHER	; other operations
PRINT	;
2	; entry when queued
LOOP	; break procedure if greater than 50 characters

External References

Name	Field # of Occurrence
^%ZISC	END+2
TECH^SROPRIN	OPS+3
^SROSTOP	HDR+1
$$DIV^SROUTL0	1+2, 2+3
^SRSKILL	END+2
MINS^SRSUTL2	OPS+2
DEM^VADPT	SET+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: S1+0
Function Call: WRITE	Prompt: "-" Line Location: S1+0
Function Call: WRITE	Prompt: !,?1,"",SRTS,"" Line Location: S1+1
Function Call: WRITE	Prompt: !!,?1,$E(SROD,4,5)_"/"_$E(SROD,6,7)_"/"_$E(SROD,2,3),?13,$E(SRNM,1,26),?38,SROPS(1) Line Location: PRINT+1
Function Call: WRITE	Prompt: ?90,$E(SRSUR,1,23),?114,$E(SRANES,1,14),!,?1,SRTN,?13,VA("PID") Line Location: PRINT+2
Function Call: WRITE	Prompt: ?38,SROPS(2) Condition for execution: $D(SROPS(2)) Line Location: PRINT+2
Function Call: WRITE	Prompt: ?90,$E(SRFST,1,23),?114,"OP TIME: ",SROT," MIN.",!,SRABORT,?13,SRTYPE Line Location: PRINT+2
Function Call: WRITE	Prompt: ?38,SROPS(3) Condition for execution: $D(SROPS(3)) Line Location: PRINT+2
Function Call: WRITE	Prompt: ?90,$E(SRTWO,1,23) Line Location: PRINT+2
Function Call: WRITE	Prompt: !,?38,SROPS(4) Line Location: PRINT+3
Function Call: WRITE	Prompt: !,?38,SROPS(5) Line Location: PRINT+3
Function Call: WRITE	Prompt: !,?38,SROPS(5) Line Location: PRINT+3
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(132-$L(SRINST)\2),SRINST,?120,"PAGE ",PAGE,!,?58,"SURGICAL SERVICE",?100,"DATE REVIEWED:",!,?52,"LIST OF OPERATIONS BY SERVICE" Line Location: HDR+2
Function Call: WRITE	Prompt: ?100,"REVIEWED BY:",!,?(132-$L(SRFRTO)\2),SRFRTO,?100,SRPRINT Line Location: HDR+3
Function Call: WRITE	Prompt: !!,?1,"DATE",?13,"PATIENT",?38,"OPERATION(S)",?90,"SURGEON",?116,"ANESTHESIA",!,"CASE #",?15,"ID#",?90,"FIRST ASSISTANT",?116,"TECHNIQUE",!,?13,"PRIORITY",?90,"SECOND ASSISTANT" Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: HDR+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"Press RETURN to continue " Line Location: END+1
Function Call: WRITE	Prompt: @IOF Line Location: END+2
Function Call: WRITE	Prompt: !!!,"TOTAL OPERATIONS FOR ALL SERVICES: ",TC Line Location: 1+4
Function Call: WRITE	Prompt: !!,?30,"",SRTS,"" Line Location: 2+2
Function Call: WRITE	Prompt: !!,?1,"TOTAL ",SRTS,": ",C Line Location: STOT+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	HDDT+1
^SRF - [#130]	SET+1, SET+2, SET+4, OPS, OPS+2, OTHER+1, OTHER+2, 1+2, 2+3
^SRF("ASP"	1+2, 2+3
^SRO(137.45 - [#137.45]	S1
^TMP("SR"	1+1!, 1+2*, 1+3
^VA(200 - [#200]	SET+2, SET+3

Label References

Name	Line Occurrences
2	1+1
ASK	PRINT+1, 1+4, STOT+1
END	1+1, 1+4, 1+5, 2+1, 2+4
HDDT	1+1, 2+1
HDR	ASK+1, 1+1, 2+1
LOOP	OPS+1
OTHER	OPS
S1	1+3
SET	1+3, 2+3
STOT	1+3, 2+3

Naked Globals

Name	Field # of Occurrence
^(	SET+2, OPS+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	OPS+4*
>> C	S1, 1+1, 1+3, 2+2, 2+3*, STOT+1
>> DFN	SET+1*
DT	HDDT+1
DTIME	ASK, END+1
>> I	OPS, HDR+4
IO	1+1, 2+1
IOF	HDR+2, END, END+2
IOM	S1
IOSL	PRINT+1, 1+4, STOT+1
IOST	ASK, END, END+1
>> K	S1, 1+1, 1+2, 1+3, 2+2, 2+3
>> LINE	S1*
>> LOOP	LOOP+1*
>> M	OPS+1*, LOOP+1
MM	OPS+1!, LOOP+1*
MMM	OPS+1!, LOOP+1*
>> N	1+2, 2+2, 2+3*
>> OPER	OPS, OTHER+1, OTHER+2
>> PAGE	HDR+2, HDR+5, HDDT+1
>> S(	SET+2*
>> S(0	SET+1*, OPS+4
>> SR	1+2, 1+3, 2+2, 2+3
>> SRABORT	SET+4*, PRINT+2
>> SRANES	OPS+3*, PRINT+2
>> SRATT	SET+1, SET+2
>> SRD	1+2, 2+2
>> SRDT	SET+1*
>> SRED	1+2, 2+3, HDDT+1
SRFRTO	HDR+3, 1+1~, 2+1~, HDDT+1*
>> SRFST	SET+1, SET+2, SET+3*, PRINT+2
>> SRHALT	HDR+1
>> SRINST	HDR+2, HDDT+1*
>> SRLONG	OTHER+1*, OTHER+2
>> SRNM	SET+1*, PRINT+1
>> SROD	SET+1*, PRINT+1
SROP	SET+1!
>> SROPER	OPS, OPS+1, OTHER+1, OTHER+3, LOOP+1
SROPERS	OPS!, OTHER+1, OTHER+2, OTHER+3
SROPS	OPS+1!
SROPS(	LOOP+1*
SROPS(1	OPS+1*, PRINT+1
SROPS(2	PRINT+2
SROPS(3	PRINT+2
SROPS(4	PRINT+3
SROPS(5	PRINT+3
SROPS(6	PRINT+3
>> SROT	OPS+2*, PRINT+2
>> SRPRINT	HDR+3, HDDT+1*
>> SRQ	S1, PRINT+1, HDR+1, ASK, ASK+1, END+1, 1+1, 1+2, 1+3, 1+4 , 2+1, 2+3, STOT+1, HDDT+1*
>> SRSD	HDDT+1
>> SRSITE("SITE"	HDDT+1
>> SRSSN	SET+1*
>> SRSUR	SET+1, SET+2, PRINT+2
>> SRT1	2+2
>> SRTECH	OPS+3
SRTN	SET+1, SET+2, SET+4, OPS, OPS+2, PRINT+2, END+2!, OTHER+1, OTHER+2, 1+3* , 2+3*
>> SRTS	S1*, S1+1, ASK+1, 2+2, STOT+1
>> SRTWO	SET+1, SET+2, SET+3*, PRINT+2
>> SRTYPE	OPS+4*, PRINT+2
>> SRUL	S1, S1+1, 1+1
>> SRZZ	1+1
>> TC	1+1, 1+3, 1+4, 2+3*
>> VA("PID"	SET+1, PRINT+2
>> VADM(1	SET+1
>> X	OPS+2, ASK, END+1*
>> X1	OPS+2*
>> Y	HDDT+1*
>> Z	PRINT+1*
>> ZTQUEUED	HDR+1, END
>> ZTREQ	END*
>> ZTSTOP	END

Customize PDF page

Package: Surgery

Routine: SROPLSTS

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: