Routine: LRLLP

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"PRINT LOAD/WORK LIST" Line Location: LRLLP+4
Function Call: READ	Timeout: DTIME Variable: LRFRMT Line Location: AS+0
Function Call: WRITE	Prompt: !,"Answer C or E" Line Location: AS+0
Function Call: READ	Timeout: DTIME Variable: LRFRMT Line Location: AS+1
Function Call: WRITE	Prompt: !,"(C)ondensed or (E)xpanded list ? (req. 132 column format):E//" Line Location: AS+1
Function Call: WRITE	Prompt: !,"Answer C or E" Line Location: AS+1
Function Call: WRITE	Prompt: !,"LOAD/WORK LIST NOT SETUP FOR THIS DATE" Line Location: EN2+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: LR1+0
Function Call: WRITE	Prompt: !,$S(LRTYPE=1:"TRAY",1:"SEQUENCE")," # TO START WITH:",LRST,"//" Line Location: LR1+0
Function Call: WRITE	Prompt: !?5,"Enter number to start with.",! Line Location: LR1+0
Function Call: WRITE	Prompt: $C(7)," NOT SETUP YET" Line Location: LR1+2
Function Call: READ	Timeout: DTIME Variable: LRLLT Line Location: LR2+0
Function Call: WRITE	Prompt: !?$S(LRTYPE=1:12,1:17),"END WITH: LAST//" Line Location: LR2+0
Function Call: WRITE	Prompt: !?5,"Enter number to end with",! Line Location: LR2+0
Function Call: WRITE	Prompt: !!,"The list is EMPTY and can't be printed",! Line Location: EMPTY+0
Routine Call	DIC Line Location: LRLLP+5
Routine Call	%ZIS Line Location: LR3+3

FileNo	Call Tags
^LRO(68.2 - [#68.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^LRO(68.2 - [#68.2]	EN2+1, EN2+2, EN2+3, LR1+2, LR3+1, LR3+2
^TMP("LR"	KILL+6!
^TMP($J	LR4!

Name	Field # of Occurrence
^(2	EN2+2, EN2+3

Name	Field # of Occurrence
%	KILL+2!
>> %DT	LR4+1*
%H	KILL+2!
%ZIS	LRLLP+4!, LR3+3*
A	KILL+2!
AGE	KILL+2!
DA	KILL+2!
DFN	KILL+2!
DIB	KILL+2!
DIC	LRLLP+4!, LRLLP+5*, KILL+2!
DIC("S"	LRLLP+5*
DIC(0	LRLLP+5*
DT	LRLLP+6
DTIME	AS+1, LR1, LR2
HRCN	KILL+6!
I	KILL+2!
IO	LR4+2, DQ
IO("Q"	KILL+2!, LR3+4
J	KILL+2!
K	KILL+2!
L	KILL+2!
LAST	KILL+2!, EN2+3*
LRACC	KILL+2!
LRAD	LRLLP+6*, KILL+2!, EN2+2
LRALTH	KILL+2!, EN2+1*
LRAN	KILL+2!
LRCUP	KILL+2!, LR3*, LR3+2
LRDC	KILL+3!, EN2+1*
LRDFN	KILL+3!
LRDOC	KILL+3!
LRDPF	KILL+3!
LREXIT	KILL+1!
LRFRMT	AS+1*, KILL+2!, LR4+3
LRIDT	KILL+3!
LRINST	LRLLP+5*, KILL+3!, EN2+1, EN2+2, EN2+3, LR1+2, LR3+1, LR3+2
LRLINE	KILL+3!, EN2+1*
LRLL	KILL+3!
LRLLOC	KILL+3!
LRLLT	LRLLP+6, KILL+3!, EN2+3, LR2, LR2+1
LRMAXCUP	LRLLP+5*, KILL+4!
LRNOW	KILL+2!, LR4+1*
LRODNUM	KILL+4!
LRORD	KILL+4!
LRPROF	KILL+4!
LRSHORT	KILL+4!, EN2+1*
LRSISPEC	KILL+6!
LRSPEC	KILL+4!
LRST	LRLLP+6, KILL+4!, EN2+3, LR1, LR1+1, LR1+2, LR3, LR3+1
LRTEST	LRLLP+4!, KILL+4!
LRTRAY	KILL+4!, LR3*, LR3+2
LRTSTLM	KILL+2!
LRTSTS	KILL+6!
LRTYPE	LRLLP+5, KILL+6!, EN2+1, EN2+3, LR1, LR1+2, LR2, LR3, LR3+1, LR3+2 , LR4+3
LRURG	KILL+6!
LRV	KILL+6!
LRWRD	KILL+6!
LRXPD	KILL+6!, EN2+1*
PNM	KILL+6!
>> POP	LR3+3
SEX	KILL+6!
SSN	KILL+6!
U	LRLLP+5, LRLLP+6, AS+1, EN2+1, EN2+2, EN2+3
X	KILL+6!, EN2+1, LR1, LR1+1, LR3+1, LR3+2, LR4+1*
Y	LRLLP+5, KILL+6!, LR4+1
Y(0	LRLLP+5
Z	KILL+6!
ZTIO	QUE!
>> ZTQUEUED	EN2+3, LR3+3, DQ
>> ZTREQ	DQ*
ZTRTN	QUE*!
ZTSAVE	QUE!
ZTSAVE("LR*"	QUE*
ZTSK	LRLLP+4!, QUE!

Information

Name	Comments	DBIA/ICR reference
EN2	;ENTRY FROM LRLL2
LR1
EN1	;from LRLL1
AS	;W !,"(C)ondensed or (E)xpanded list ? (req. 132 column format):C//" R LRFRMT:DTIME Q:'$T!(LRFRMT[U) S LRFRMT=$E(LRFRMT) S:LRFRMT']"" LRFRMT="C" I LRFRMT'="C"&(LRFRMT'="E") W !,"Answer C or E" G AS
LR2
KILL	;from LRLL1
LR4
LR3
QUE
EMPTY
DQ