Routine: SROPLIST

Information

SROPLIST ;B'HAM ISC/MAM - LIST OF OPERATIONS ; [ 09/22/98 11:42 AM ]

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

Package	Total	Caller Graph
Surgery	1	SROPLIS

Name	Comments	DBIA/ICR reference
SET	; set variables
END
OPS
ASK
OTHER	; other operations
PRINT	;
LOOP	; break procedure if greater than 50 characters

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$E(SROD,4,5)_"/"_$E(SROD,6,7)_"/"_$E(SROD,2,3),?13,$E(SRNM,1,24),?38,SRTS Line Location: PRINT+1
Function Call: WRITE	Prompt: ?90,$E(SRSUR,1,23),?114,$E(SRANES,1,14),!,SRTN,?13,VA("PID"),?38,SROPS(1),?90,$E(SRFST,1,23),?114,"OP TIME: "_SROT_" MIN.",!,SRABORT,?13,SRTYPE 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(SRTWO,1,23) Line Location: PRINT+2
Function Call: WRITE	Prompt: !,?38,SROPS(3) Condition for execution: $D(SROPS(3)) Line Location: PRINT+3
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: 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

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

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

Name	Field # of Occurrence
>> A	OPS+4*
>> DFN	SET+4*
DT	SROPLIST+3
DTIME	ASK, END+1
>> I	OPS*
IO	SROPLIST+2
IOF	END, END+2
IOSL	SROPLIST+5, PRINT+1
IOST	ASK, END, END+1
>> K	SROPLIST+4*, SET+1, SET+2, SET+3, SET+4
>> 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	SROPLIST+2*
>> S(	SET+6*
>> S(0	SET+4*, SET+5, OPS+4
>> SRABORT	SET+3*, PRINT+2
>> SRANES	OPS+3*, PRINT+2
>> SRATT	SET+3, SET+6
>> SRD	SROPLIST+4*
>> SRDT	SET+5*
>> SRED	SROPLIST+2, SROPLIST+3
>> SRED1	SROPLIST+2*, SROPLIST+4
SRFRTO	SROPLIST+3~*
>> SRFST	SET+3, SET+6, SET+7*, PRINT+2
>> SRINST	SROPLIST+2*
>> SRLONG	OTHER+1*, OTHER+2
>> SRNM	SET+4*, PRINT+1
>> SROD	SET+5*, PRINT+1
SROP	SET+4!
>> SROPER	OPS, OPS+1, OTHER+1, OTHER+3, LOOP+1
>> SROPERS	OTHER+1, OTHER+2, OTHER+3
SROPS	OPS+1!
SROPS(	LOOP+1*
SROPS(1	OPS+1*, PRINT+2
SROPS(2	PRINT+2
SROPS(3	PRINT+3
SROPS(4	PRINT+3
SROPS(5	PRINT+3
SROPS(6	PRINT+3
>> SROT	OPS+2*, PRINT+2
>> SRPRINT	SROPLIST+3*
>> SRQ	SROPLIST+2, SROPLIST+4, SROPLIST+5, SROPLIST+6, PRINT+1, ASK, END+1
>> SRSD	SROPLIST+3
>> SRSITE("SITE"	SROPLIST+2
>> SRSSN	SET+4*
>> SRSUR	SET+3, SET+6, PRINT+2
>> SRTECH	OPS+3
SRTN	SET+4*, SET+6, OPS, OPS+2, PRINT+2, END+2!, OTHER+1, OTHER+2
>> SRTS	SET+5*, PRINT+1
>> SRTWO	SET+3, SET+6, SET+7*, PRINT+2
>> SRTYPE	OPS+4*, PRINT+2
>> TOTAL	SROPLIST+2, SROPLIST+6, PRINT+4
>> VA("PID"	SET+4, PRINT+2
>> VADM(1	SET+4
>> X	OPS+2, ASK, END+1*
>> X1	OPS+2*
>> Y	SROPLIST+3*
>> Z	PRINT+1*
>> ZTQUEUED	END
>> ZTREQ	END*
>> ZTSTOP	END