Routine: LROSPLG

Package

Total

Call Graph

(C,NOW)^%DTC ^DIR

$$ISPIMS^BLRUTIL

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Checking surgical record for this patient...",! Line Location: LROSPLG+9
Function Call: WRITE	Prompt: !,"No operations on record in the past 7 days for this patient.",! Line Location: LROSPLG+11
Function Call: WRITE	Prompt: ! Line Location: OPT+1
Function Call: WRITE	Prompt: !!,"No operation selected.",! Line Location: NOOP+0
Function Call: WRITE	Prompt: !,CNT_". " Line Location: LIST+5
Function Call: WRITE	Prompt: $E(SRSDATE,4,5)_"-"_$E(SRSDATE,6,7)_"-"_$E(SRSDATE,2,3) Line Location: CASE+0
Function Call: WRITE	Prompt: ?14,SROPS(1) Line Location: CASE+3
Function Call: WRITE	Prompt: !,?14,SROPS(2) Line Location: CASE+3
Function Call: WRITE	Prompt: !,?14,SROPS(2) Line Location: CASE+3
Function Call: WRITE	Prompt: !,?14,SROPS(4) Condition for execution: $D(SROPS(4)) Line Location: CASE+3
Routine Call	DIR Line Location: LROSPLG+12 OPT+2

Name	Line Occurrences (* Changed, ! Killed)
^LR - [#63]	LROSPLG+3, LROSPLG+6
^SRF - [#130]	DOC, DISP, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, CASE+1, OTHER+1, OTHER+2
^SRF("ADT"	LROSPLG+10

Name	Field # of Occurrence
%	LROSPLG+8, END!
CNT	LROSPLG+10, LROSPLG+11, LROSPLG+12, LROSPLG+13, OPT+1, OPT+3, END!, LIST+5*, CASE+4
>> DFN	LROSPLG+6*, LROSPLG+10
DIR	LROSPLG+12!, OPT!, END!
DIR("?"	OPT*
DIR("A"	LROSPLG+12, OPT+1
DIR(0	LROSPLG+12, OPT+1
DR	END!
DT	LROSPLG+8
>> DTOUT	LROSPLG+12, OPT+2
>> DUOUT	LROSPLG+12, OPT+2
I	END!, CASE+1*
J	END!
K	END!
LOOP	END!, LOOP+1*
>> LRDFN	LROSPLG+3, LROSPLG+6
M	END!, CASE+2*, LOOP+1
MM	END!, CASE+2!, LOOP+1*
MMM	END!, CASE+2!, LOOP+1*
>> PNM	LROSPLG+6*
SR	END!
SRABORT	END!
SRCASE	END!
SRCASE(	OPT+3, CASE+4*
SRCASE(1	LROSPLG+13
SRD	END!
SRDOC	DOC*, END!
SRDT	LROSPLG+8, LROSPLG+10, END!, CASE+4
SREND	LROSPLG+8*, LROSPLG+10, END!
SRJ	END!
SRK	END!
SRLONG	END!, OTHER+1*, OTHER+2
SRN	END!
SROP	LROSPLG+10, DISP, END!, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, CASE+1, CASE+2 , CASE+4, OTHER+1, OTHER+2
SROPER	END!, CASE+1, CASE+2, OTHER+1, OTHER+3, LOOP+1
SROPERS	END!, OTHER+1, OTHER+2, OTHER+3
SROPS	END!, CASE+2!
SROPS(	LOOP+1*
SROPS(1	CASE+2*, CASE+3
SROPS(2	CASE+3
SROPS(3	CASE+3
SROPS(4	CASE+3
SROTHER	END!, CASE+1, OTHER+1, OTHER+2
SRSCAN	END!, LIST+1*!, LIST+2, LIST+3
SRSDATE	DISP, END!, LIST+5, CASE
SRSTAT	END!
SRSTATUS	END!
SRTN	LROSPLG+10, LROSPLG+13, OPT+3, NOOP, DOC, DISP, END!
>> SSN	LROSPLG+6*
VA	END!
VA("PID"	LROSPLG+6
VADM	END!
VADM(1	LROSPLG+6
VAERR	END!
X	LROSPLG+8, END!
>> X1	LROSPLG+8*
>> X2	LROSPLG+8*
>> Y	LROSPLG+12, LROSPLG+13, OPT+3

Information