Routine: SDWLRQ2

Package	Total	Call Graph
VA Fileman	5	^%DT ^DIC YN^DICN $$EXTERNAL^DILFD ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD

Package	Total	Caller Graph
Scheduling	1	SD WAIT LIST PRM CARE/TEAM

Entry Points

External References

Name	Field # of Occurrence
^%DT	DATE+5, DATE+6
^%ZIS	QUE+2
^%ZISC	END+2
^%ZTLOAD	QUE+7
^DIC	IN, CT1
YN^DICN	DATE+1, OPEN+1, PR+2
$$EXTERNAL^DILFD	CT+4
^DIR	CAT+3, FORM+3, PR+3

Interaction Calls

Name	Line Occurrences
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+9
Function Call: WRITE	Prompt: !!," * Report Category Selection *" Line Location: CAT+1
Function Call: WRITE	Prompt: *7," Invalid Selection." Line Location: CAT+6
Function Call: WRITE	Prompt: !!,"Select Category for Report Output",! Line Location: CAT+7
Function Call: WRITE	Prompt: ! Line Location: CT1+0
Function Call: WRITE	Prompt: !,"This Entry is Required." Line Location: CT1+3
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: *7," Invalid Response" Line Location: FORM+6
Function Call: WRITE	Prompt: !!,?80-$L("* Selected Report Parameters ")\2," Selected Report Parameters *",! Line Location: DIS+1
Function Call: WRITE	Prompt: !,?33 Condition for execution: I>1 Line Location: IS+3
Function Call: WRITE	Prompt: $P($G(^DIC(4,SDWLY(I),0)),U,1) Line Location: IS+3
Function Call: WRITE	Prompt: !,?20,"Institution: ALL " Line Location: IS+5
Function Call: WRITE	Prompt: $S(SDWLCT1["T":"Team",1:"Position"),!,?36 Line Location: CT+3
Function Call: WRITE	Prompt: "All " Line Location: CT+3
Function Call: WRITE	Prompt: !,?35 Condition for execution: I>1 Line Location: CT+4
Function Call: WRITE	Prompt: $$EXTERNAL^DILFD(SDWLF,.01,,SDWLY(I)) Line Location: CT+4
Function Call: WRITE	Prompt: !,?16,"Report Category: " Line Location: CT+5
Function Call: WRITE	Prompt: $S(SDWLCT1["T":"Team",1:"Position"),!,?36 Line Location: CT+5
Function Call: WRITE	Prompt: $S(SDWLCT1["T":"Team",1:"Position"),!,?36 Line Location: CT+5
Function Call: WRITE	Prompt: !,?18,"Output Format: ",$S(SDWLFORM="D":" Detailed",1:" Summary") Line Location: OP+0
Function Call: WRITE	Prompt: !,?25,"Printing 'OPEN' Entries Only." Line Location: PR+0
Function Call: WRITE	Prompt: !,?25,"Printing ALL Entries." Line Location: PR+1
Function Call: WRITE	Prompt: !!,"Are these Parameters Correct " Line Location: PR+2
Function Call: WRITE	Prompt: !," This Report will NOT be queued to print." Line Location: PR+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("Primary Care Team/Position Assignment Wait List Report")\2,"Primary Care Team/Position Assignment Wait List Report" Line Location: HD+0
Routine Call	DIC Line Location: IN CT1
Routine Call	DIR Line Location: CAT+3 FORM+3 PR+3
Routine Call	%ZIS Line Location: QUE+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	IS+3
^SCTM(404.51 - [#404.51]	IN+1
^SCTM(404.58 - [#404.58]	ACTIVE+3, ACTIVE+4
^TMP("SDWLRQ2"	1!, 3+1, IN+4, IN2, DATE+2, DATE+10, CAT+11, CT1+2, CT1+3, CT2 , OPEN+4, FORM+7, DIS+3, QUE+4, QUE+5

Label References

Name	Line Occurrences
1	2
2	3
3	4
4	6
@(	DIS+4, QUE1
CAT	2, CAT+6, CT1+3
CT1	CT1+5, CT2
CT2	CT1+4
CT3	CT1+2
DATE	4, DATE+9
DIS	7
E1	DATE+2, DATE+5, DATE+8
EN	7
END	1+1, 6, 7, IN+3, QUE+7
FORM	6, FORM+6
HD	EN+3
IN	IN+5
IN2	IN+3
IN3	IN+4
INS	1+1
OPEN	3, OPEN+2
QUE	7+1
QUE1	QUE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	4, DATE+1, DATE+2, DATE+3, DATE+4, OPEN+1, OPEN+2, OPEN+3, OPEN+4, PR+2*
>> %DT	DATE+5*
>> %DT("A"	DATE+5, DATE+6, DATE+8!
>> %DT(0	DATE+6*, DATE+8!
%ZIS	QUE+2!*
DIC	1!, IN, CAT+10!, CT1, END+1!
DIC("A"	IN, CAT+12, CT1+5*
DIC("S"	IN, CAT+14
DIC(0	IN, CT1
DIE	1!, END+1!
DIR	1!, CAT+10!, END+1!
DIR("L"	CAT+2, FORM+1, FORM+2*
DIR(0	CAT+2, FORM+1, PR+3*
DR	1!, CAT+10!, END+1!
>> DUOUT	6, IN+3, FORM+4*
I	IS+1, IS+3, CT+2, CT+4, 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~, ACTIVE+1, ACTIVE+4, ACTIVE+5
SDHIST	EN+2~, ACTIVE+1, ACTIVE+3, ACTIVE+4
SDTEAM	EN+2~, ACTIVE+1*
>> SDWLBDT	DATE+5*, DATE+6, DATE+9, DATE+10
>> SDWLCAT	CAT+2, CT1+2, CT1+5, CT2
>> SDWLCT1	CT+1, CT+3, CT+5
>> SDWLCT2	CT, CT+2, CT+5
SDWLDATE	END!
>> SDWLE	1, IN, IN+5, CT1+5*
SDWLED	END!
>> SDWLEDT	DATE+8*, DATE+9, DATE+10
>> SDWLERR	1, 1+1, 2, 3, 4, 6, 7, INS+1, IN+2, DATE+5 , DATE+7, CAT+1, CAT+2, CAT+4, CT1+1, OPEN+3, FORM+1, DIS+1, PR+2, PR+3
>> SDWLF	CAT+9, CAT+11, CAT+13, CT1, CT+1, CT+4, ACTIVE+2
SDWLFORM	OP, QUE+3, END!
>> SDWLI	DIS+2*, DIS+3
>> SDWLINS	IN+1*, IS, IS+1, IS+5
>> SDWLINST	1, IN+1, IN+4, IN+5*, IN2
SDWLOPEN	PR, END!
SDWLPRI	END!
>> SDWLPROM	INS+1, IN, IN+5
SDWLSPT	QUE+2!, QUE1*!, END+1!
>> SDWLTAG	DIS+4*
SDWLTASK	QUE+4*, QUE+5, QUE+6, END!
>> SDWLTK	QUE+5*, QUE+6
>> SDWLX	CAT+8*, CAT+12, CT1+5
SDWLY	IS+1!, IS+3, IS+4!, CT+2!, CT+4, END!
SDWLY(	IS+1, IS+3, CT+2, CT+4
U	IS+1, IS+3, CT+1, CT+2
WDWLBD	END!
>> X	IN+2, DATE+7, CAT+4, CAT+5, CAT+6, CAT+8, CAT+9, CAT+11, CT1+1, FORM+4 , FORM+5, FORM+6, FORM+7, DIS+3*, CT+3, PR+3
Y	IN, IN+3, IN+4, IN+5, DATE+5, DATE+8, CT1+2, CT1+3, CT1+4, CT1+5 , ACTIVE~, ACTIVE+3
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~

Customize PDF page

Package: Scheduling

Routine: SDWLRQ2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
ACTIVE(Y)	;Active Team
IN2
CAT	;Report category selection
QUE1
DATE	;Date range selection
OPEN	;OPEN Wait List Entries
HD
DIS	;Display Parameters
PR
1
3
2
4
7
6
E1
EN	;Header
END
FORM	;Report Format
IS
IN
IN3
CT
CT1
CT2
CT3
INS	;Get Institution
QUE	;Queue Report
OP