Routine: LRORDD

Package	Total	Call Graph
Lab Service	4	URGG^LRORD1 DUP^LRORD2 GSS^LRORD3 ORDER^LROS

Package	Total	Caller Graph
Lab Service	5	LRORD1 LRORD1GU LRORD2A LROW LROW1
IHS Changes To Lab	2	BLRORD1 BLRORD2A

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
DUP1	;LOOK FOR DUPLICATES WITH IN TEST
DUP3	;
DUP2	;
Q20	;Look for Duplicate of the same test
EN1	; FROM LROW1 MAXIUM ORDER FREQUENCY CHECKER
EN2	;FROM LRORD2 CHECK FOR MAXIUM ORDER FREQUENCY
LROW	;
LROT

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,LRTNM," ~ Contains the Test ",X,! Line Location: DUP3+3
Function Call: WRITE	Prompt: !!,"THE ORDER FOR ~ ",X," ~ IS DELETED ",$C(7) Line Location: DUP3+3
Function Call: READ	Timeout: DTIME Variable: % Line Location: EN1+4
Function Call: WRITE	Prompt: !,"Answer 'Y' or 'N' : " Line Location: EN1+4

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	DUP2+1, DUP2+2, DUP2+3, DUP3+1, DUP3+3, EN1+1, EN2+1, Q20+2, Q20+5, Q20+7 , Q20+8
^LAB(61 - [#61]	Q20+2
^LAB(62 - [#62]	Q20+2
^LAB(69.9 - [#69.9]	LROW+1

Name	Field # of Occurrence
^(	DUP2+3
^(0	EN+1, DUP2+1, DUP2+3, Q20+2, Q20+5, Q20+7, Q20+8

Name	Field # of Occurrence
>> %	EN1+2, %*
>> A	DUP3+5*
>> BLRGUI	EN+1, DUP2+2, DUP3+3, DUP3+4, Q20+1, Q20+2
>> D	LROW+2*
DTIME	%
>> DTOUT	%*
I	DUP1+2!, DUP2+3*
II	DUP1+2!
>> LRCS(	EN2+1
>> LRCSN	EN2+1
>> LREND	DUP2+2, Q20+2, Q20+3
>> LREXP	Q20+7, Q20+8
>> LRMAX1	EN1+1, EN2+1*, EN2+2
>> LROT(	DUP1+1, DUP2+2, DUP2+3, DUP3+1, DUP3+3!, LROT, Q20+2, Q20+5, Q20+7, Q20+8
>> LROUT	EN1+2*
>> LROUTINE	DUP2+2, DUP3+1, Q20+4, Q20+5, Q20+6
LRSAME	Q20+1!
>> LRSAMP	DUP1+1, DUP2+2, DUP2+3, DUP3+1, DUP3+3, DUP3+5, LROW+2, LROT, Q20+1, Q20+2 , Q20+5, Q20+7, Q20+8
>> LRSAMP(	DUP3+5!
>> LRSAVE	Q20+4*, Q20+5, Q20+6
>> LRSN	EN1+1*
>> LRSPEC	DUP1+1, DUP2+2, DUP2+3, DUP3+1, DUP3+3, LROW+2, LROT, EN2+2, Q20+1, Q20+2 , Q20+5, Q20+7, Q20+8
>> LRSSX	Q20+5, Q20+7, Q20+8
LRST	DUP1+2!, Q20+5
LRSTSX	DUP1+1*, DUP1+2!, DUP2+1, DUP2+2, DUP2+3, DUP3+1
>> LRTEST	DUP3+5
>> LRTEST(	DUP3+5!, LROW+2
LRTNM	DUP1+2!, DUP3+1*, DUP3+3
>> LRTSTN	DUP3+5*
>> LRTSTS	DUP2+3, DUP3+3, EN2+1, EN2+2, Q20+2, Q20+5, Q20+7, Q20+8
LRTSTX	DUP1+2!, LROW+2*, LROT
LRTX	DUP1+2!
LRTY	EN1+1, EN2+2*!
>> LRURG	DUP2+2*, DUP3+2
>> LRURGG	Q20+5*
LRURGX	DUP1+2!, DUP3+1*, DUP3+2
>> LRXS(	DUP3+5!
>> LRXST(	DUP3+5!
>> S	EN+1
>> T(	EN1+1
>> TT(	EN+1*, EN2+2
U	DUP2+1, DUP2+3, DUP3+1, DUP3+3, LROW+1, LROW+2, EN1+1, EN2+1, Q20+2, Q20+5 , Q20+7, Q20+8
>> X	EN+1, DUP3+3
>> X3	DUP3+5
>> X3(	DUP3+5!, LROW+2
Z	DUP1+2!, DUP2+3, DUP3+1, DUP3+3, DUP3+5, Q20+2
ZZ	DUP1+1, DUP1+2!, DUP2+2, LROW+2, LROT