Routine: LRSORB

Information

LRSORB ;DALOI/RWF/RLM-SCAN PART OF LRSORA ;7/3/86 12:47 PM [ 04/14/2003 1:27 PM ]

Package	Total	Call Graph
Kernel	2	^%ZISC ($$FMTE,$$NOW)^XLFDT
Lab Service	1	(DASH,PT)^LRX

Name	Line Occurrences
Function Call: WRITE	Prompt: !,PNM,?35,SSN," " Line Location: PRINT+2
Function Call: WRITE	Prompt: $S($D(^DPT(DFN,.1)):^(.1),1:LRLLOC) Condition for execution: LRDPF=2 Line Location: PRINT+2
Function Call: WRITE	Prompt: ?60,$P(L0,U,6) Line Location: PRINT+2
Function Call: WRITE	Prompt: !,PNM,?35,HRCN," " Line Location: PRINT+4
Function Call: WRITE	Prompt: $S($D(^DPT(DFN,.1)):^(.1),1:LRLLOC) Condition for execution: LRDPF=2 Line Location: PRINT+4
Function Call: WRITE	Prompt: ?60,$P(L0,U,6) Line Location: PRINT+4
Function Call: WRITE	Prompt: !,?5,LRTEST(I,1),?20," ",$J($P(V(I),U,1),8),$J($P(V(I),U,2),3)," ",$S($D(^LAB(61,LRSPEC,0)):$P(^(0),U,1),1:"") Line Location: PRINT+6
Function Call: WRITE	Prompt: @IOF,"SPECIAL REPORT: SEARCHING FOR ",?30,LRTEST(1,1)," ",LRTEST(1,2)," ",$$FMTE^XLFDT($$NOW^XLFDT,"") Line Location: HDR+0
Function Call: WRITE	Prompt: !,?25," or" Condition for execution: I>1 Line Location: HDR+1
Function Call: WRITE	Prompt: ?30,LRTEST(I,1)," ",LRTEST(I,2) Line Location: HDR+1
Function Call: READ	Timeout: DTIME Line Location: WAIT+0
Function Call: WRITE	Prompt: $C(7) Line Location: WAIT+0

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PRINT+4
^LAB(61 - [#61]	PRINT+6
^LR - [#63]	LOOK, PRINT, LRLONG+1, NIDT
^LRO(69 - [#69]	DT, LOC, PT, LRIDT
^TMP("LR"	END+3!

Name	Field # of Occurrence
^(	PRINT+4, NIDT
^(0	LOOK, PRINT+6

Name	Field # of Occurrence
%H	END!
%ZIS	END!
>> DFN	PRINT*, PRINT+4
DIC	END!
DTIME	WAIT
DTOUT	END!
HRCN	PRINT+4, END+3!
I	LOOK+1, PRINT+6, HDR+1*, END!
IO	LRSORB+7, HDR, LRLONG
IOF	HDR
IOSL	PRINT+4, PRINT+6
IOST	WAIT
L0	LOOK*, PRINT+1, PRINT+4, END!
LAST	END!
LRAA	END!
LRAD	END!
LRDFN	PT, LRIDT, LOOK, PRINT, LRLONG+1, END!, NIDT
LRDPF	PRINT*, PRINT+4, END!
LREDT	DT, LRLONG*, END!, NIDT
LREND	LRSORB+7, DT, LOC, PT, LRIDT, PRINT+4, PRINT+6, HDR, LRLONG, LRLONG+1 , END!, NIDT, WAIT
LRFAN	END!
LRIDT	LRIDT, LOOK, END!, NIDT
LRLAN	END!
LRLLOC	LOC, PT, LRIDT, PRINT+4, END!, NIDT
LRLONG	LRSORB+7, END!
LRLOX	LOC*, END!
LRPDT	DT*, LOC, PT, LRIDT, END!
LRSB	END!
LRSDT	DT, LRLONG*, END!, NIDT
LRSPEC	PRINT+1*, PRINT+6, END!
LRSTAR	END!
LRTEST	LOOK+1, HDR+1, END!
LRTEST(	LOOK+1, PRINT+6, HDR+1
LRTEST(1	HDR
LRTSTS	END+3!
LRWDTL	END+3!
PNM	PRINT+4, END+3!
POP	END+3!
SSN	END+3!
U	PRINT, PRINT+1, PRINT+4, PRINT+6
V	LOOK!, END+3!
V(	LOOK+1*, PRINT+6
V(0	LOOK+2
>> X	PRINT, WAIT
Y	END+3!