Routine: SDWLPL

Package	Total	Call Graph
VA Fileman	2	$$GET1^DIQ ^DIR
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Scheduling	4	SDAM2 SDCO1 SDM1A SDMM

Entry Points

Name	Comments	DBIA/ICR reference
ANS1	;
SAVE(TYPE,WLTNI,IEN)	;
ARAY2	;
LIST(ANS2,DFN)	;
ANS2(DFN,ANS2)	;
INIT(DFN,ANS2,FLG)	; ; ANS2: A - ALL ; S - All Specialties ; C - All Clinics ; M - Matches stop codes only ; FLG: (optional) ; NR - do not diplay entries with NON REMOVAL REASON - in check out
ARAY1	;
TST
ARAY3	;
ARAY4	;identify both clinic and specialties EWL matching by stop code with entered appointment
DISPLAY	;

External References

Name	Field # of Occurrence
$$GET1^DIQ	INIT+9, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+2, ARAY3+2, ARAY4+3, ARAY4+9, ARAY4+10 , SAVE+4, SAVE+5, SAVE+6, SAVE+7, LIST+4, LIST+13, LIST+14, LIST+15, LIST+19, LIST+20
^DIR	ANS1+1, TST+1
$$FMTE^XLFDT	LIST+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This patient is currently on the Wait List." Line Location: SDWLPL+9
Function Call: WRITE	Prompt: !!,"PLEASE ENTER 'A' for All entries, 'C' for clinic or 'S' for current specialty/stop code or '^' to quit." Line Location: TST+2
Function Call: WRITE	Prompt: !!,"No selected open EWL entry has been found!" Line Location: TST+5
Function Call: WRITE	Prompt: !,"==========================================================================" Line Location: LIST+3
Function Call: WRITE	Prompt: !," Open EWL entries matching appointment specialty" Line Location: LIST+6
Function Call: WRITE	Prompt: "-----------" Line Location: LIST+7
Function Call: WRITE	Prompt: !,"EW List Type SC/P Waiting for Institution Orig Date By Des. Date Reopen" Line Location: LIST+8
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: LIST+9
Function Call: WRITE	Prompt: !?2,"Comment: ",SMT Line Location: LIST+19
Function Call: WRITE	Prompt: !?2,"Reopen: ",SMO Line Location: LIST+20
Function Call: WRITE	Prompt: !?2,"Non-Removal Reason: ",$P(REC,U,13) Line Location: LIST+21
Routine Call	DIR Line Location: ANS1+1 TST+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ
^SCTM(404.51 - [#404.51]	GET1^DIQ
^SCTM(404.57 - [#404.57]	GET1^DIQ
^SDWL(409.3 - [#409.3]	GET1^DIQ
^SDWL(409.31 - [#409.31]	GET1^DIQ
^SDWL(409.32 - [#409.32]	GET1^DIQ
^SC - [#44]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SDWL(409.3 - [#409.3]	SDWLPL+7, INIT+8, INIT+12
^TMP("SDWLPL"	INIT+7!, INIT+12*, INIT+13, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+2, ARAY3+2, ARAY4+3 , ARAY4+9, SAVE+1, SAVE+2, SAVE+3, SAVE+14!
^TMP($J	TST+5, INIT+7!, ARAY2+2, ARAY3+2, ARAY4+1, SAVE+8, SAVE+9, SAVE+12, SAVE+13*, LIST+11

Label References

Name	Line Occurrences
ARAY1	INIT+15
ARAY2	INIT+16
ARAY3	INIT+17
ARAY4	INIT+18
INIT	TST+5
LIST	DISPLAY+1
SAVE	ARAY1+5, ARAY2+5, ARAY3+5, ARAY4+6, ARAY4+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANS1	INIT+20!
ANS2	ANS2~, ANS2+1, ANS2+2, TST+1, TST+2, TST+4, TST+5, DISPLAY+1, INIT~, INIT+15 , INIT+16, INIT+17, INIT+18, LIST~, LIST+7
CLINIC	INIT+7, INIT+20!, INIT+21!, ARAY3+2
DENTER	INIT+7, INIT+12, INIT+14, INIT+20!, SAVE+9
DESIRD	INIT+7*, INIT+20!
DESIRED	SAVE+3~*, SAVE+9
DFN	SDWLPL+7, ANS2~, TST+5, DISPLAY+1, INIT~, INIT+8, SAVE+5, LIST~, LIST+4
DIR	ANS1+2!, TST+3!
DIR("A"	ANS1+1, TST+1
DIR("B"	ANS1+1, TST+1
DIR(0	ANS1+1, TST+1
FLG	INIT~
IEN	INIT+7, INIT+8, INIT+9, INIT+12, INIT+13, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY1+5 , ARAY2+2, ARAY2+5, ARAY3+2, ARAY3+5, ARAY4+3, ARAY4+6, ARAY4+9, ARAY4+13, SAVE~, SAVE+1 , SAVE+2, SAVE+3, SAVE+4, SAVE+6, SAVE+7, SAVE+9, SAVE+14, LIST+12*, LIST+13, LIST+14 , LIST+19, LIST+20
INST	INIT+7, INIT+20!, SAVE+2, SAVE+9
IOF	LIST+1
NAME	SAVE+5~, LIST+4~
NN	SDWLPL+8, INIT+20!, SAVE+8, SAVE+9, SAVE+12, SAVE+13
NUM	INIT+13, INIT+21!, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+2, ARAY3+2, ARAY4+3, ARAY4+9* , LIST+10, LIST+11, LIST+16
REC	INIT+21!, LIST+10, LIST+11, LIST+12, LIST+15, LIST+16, LIST+21
REQBY	INIT+7, INIT+20!, SAVE+1
SCODE	INIT+7, INIT+20!, ARAY2+2, ARAY4+1*, ARAY4+4, ARAY4+11
SCPRI	INIT+7, INIT+20!, SAVE+4, SAVE+9
SDBY	SAVE+6~*, SAVE+9
SDCLSC	ARAY4+8~, ARAY4+10*, ARAY4+11
SDIN	LIST+15~*, LIST+16
SDINS	LIST+15~*
SDLO	LIST+17~, LIST+18*, LIST+19, LIST+20
SDNR	SAVE+7~*, SAVE+13
SDP	LIST+12~, LIST+13*, LIST+16
SDR	LIST+12~, LIST+14*, LIST+16
SDUP	LIST+17~, LIST+18*, LIST+19, LIST+20
SMO	LIST+20~*
SMT	LIST+19~*
SPIEC	SAVE+11~*, SAVE+12
SSN	INIT+7, SAVE+5~, LIST+4~*
STR	ANS2+1~*, ANS2+2
TYPE	INIT+13*, INIT+14, INIT+21!, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY1+5, ARAY2+1, ARAY2+5 , ARAY3+1, ARAY3+5, ARAY4+2, ARAY4+6, ARAY4+7, ARAY4+13, SAVE~, SAVE+11
U	ARAY2+2, ARAY3+2, ARAY4+1, SAVE+9, SAVE+12, SAVE+13, LIST+16, LIST+21
WLTN	INIT+13, INIT+21!, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+2, ARAY3+2, ARAY4+3, ARAY4+9* , SAVE+9
WLTNI	ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY1+5, ARAY2+2, ARAY2+5, ARAY3+2, ARAY3+5, ARAY4+3* , ARAY4+4, ARAY4+6, ARAY4+9*, ARAY4+10, ARAY4+13, SAVE~, SAVE+12
WLTYPE	INIT+13, INIT+21!, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+4, ARAY3+4, ARAY4+5, ARAY4+12* , SAVE+9
>> Y	ANS1+3, TST+1

Customize PDF page

Package: Scheduling

Routine: SDWLPL

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: