Routine: SDWLR30

Information

SDWLR30 ;BPOI/TEH - WAIT LIST REPORT 30/120 (PCMM);06/12/2002

Package	Total	Call Graph
VA Fileman	4	^%DT ^DIC YN^DICN ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD

Package	Total	Caller Graph
Scheduling	1	SD WAIT LIST 30>30>120 REPORT

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: IN1+0
Function Call: WRITE	Prompt: !!,"Do you want only 'OPEN' Wait List Entries " Line Location: OPEN+1
Function Call: WRITE	Prompt: *7,"Must Enter 'YES' or 'NO'." Line Location: OPEN+2
Function Call: WRITE	Prompt: !!,"Print Report for ALL dates? " Line Location: DATE+1
Function Call: WRITE	Prompt: ! Line Location: DATE+5
Function Call: WRITE	Prompt: !,"Beginning Date must be greater than Ending Date." Line Location: DATE+11
Function Call: WRITE	Prompt: " NOT QUEUED" Line Location: QUE+2
Function Call: WRITE	Prompt: !,"REQUEST QUEUED" Line Location: QUE+7
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(IOF) Line Location: HD+0
Function Call: WRITE	Prompt: !,?80-$L("EWL Under 30/Over 30/120 Day Wait List Report")\2,"EWL Under 30/Over 30/120 Day Wait List Report" Line Location: HD+0
Routine Call	DIC Line Location: IN1+4
Routine Call	DIR Line Location: IN1 IN1+10
Routine Call	%ZIS Line Location: QUE+2

Name	Line Occurrences (* Changed, ! Killed)
^TMP("SDWLR30"	1!, 2+1, IN1+1, IN1+8, OPEN+4, DATE+2, DATE+12, QUE+1*, QUE+4, QUE+5

Name	Field # of Occurrence
>> %	OPEN+1, OPEN+2, OPEN+3, OPEN+4, DATE+1, DATE+2, DATE+3, DATE+4
>> %DT	DATE+5*
>> %DT("A"	DATE+5, DATE+8, DATE+10!
>> %DT(0	DATE+8*, DATE+10!
%ZIS	QUE+2!*
DIC	1!, IN1+4*, IN3!, END+1!
DIC("B"	INS+1*
DIC("S"	IN1+3*
DIC(0	IN1+4*
DIE	1!, END+1!
DIR	1!, IN3!, END+1!
DIR("A"	IN1, IN1+10
DIR("B"	INS+1, IN1+10, IN1+11!
DIR(0	IN1, IN1+10
DR	1!, END+1!
DUOUT	IN1+9, END+3!
I	END+1!
IO	QUE1
IO("Q"	QUE+7!
IOC	QUE+2!
IOF	HD
IOP	QUE+2!
IOST	QUE1
POP	QUE+1~, QUE+2
SDACTIVE	EN+2~
SDHIST	EN+2~
SDTEAM	EN+2~
SDWLBDT	DATE+7*, DATE+8, DATE+11, DATE+12, END+3!
SDWLDATE	END!
SDWLE	1*, END+3!
SDWLED	END!
SDWLEDT	DATE+10*, DATE+11, DATE+12, END+3!
SDWLERR	1, 1+1, 2, 3, INS+1, IN1+2, IN1+5, IN1+6, OPEN+1, OPEN+3* , DATE+4, DATE+5, DATE+6, DATE+9, END+3!
SDWLFORM	END!
SDWLINS	IN1+4*, IN1+7, IN1+8, IN3!
SDWLINST	1, IN1+5, IN1+6, IN1+7, IN1+8, IN3!
SDWLINST(	IN1+7*
SDWLOPEN	END!
SDWLPRI	END!
SDWLSPT	QUE+2!, QUE1*!, END+1!
SDWLTASK	QUE+4*, QUE+5, QUE+6, END!
SDWLTK	QUE+5*, QUE+6, END+3!
SDWLY	END!
WDWLBD	END!
X	IN1+4*, IN1+5, IN3!, DATE+9
Y	IN1+1, IN1+2, IN1+4, IN1+6, IN1+9, IN1+11, IN3!, DATE+6, DATE+7, DATE+10
ZCODE	EN+1~
ZTDESC	EN+1~, QUE+3*
ZTDTH	EN+1~, QUE+3*
ZTIO	EN+1~, QUE+2!
ZTQUEDED	EN+1~
ZTQUEUED	QUE+1~, END+2
ZTREQ	EN+1~, END+2*
ZTRTN	EN+1~, QUE+3*, QUE1
ZTSAVE	EN+1~
ZTSAVE(	QUE+6*
ZTSK	EN+1~