Routine: SDLT

Information

SDLT ;ALB/LDB,GXT - CANCELLATION LETTERS ;17 JUL 2018

Source Information

Source file <SDLT.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
VA FileMan	4	(C,DW)^%DTC $$GET1^DIQ ^DIWP ^DIWW
Registration	2	$$FML^DGNFUNC (ADD,KVAR)^VADPT
Kernel	1	$$NAMEFMT^XLFNAME
Scheduling	1	DTS^SDUTL

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 7

Package	Total	Caller Graph
Scheduling	7	SDC0 SDC3 SDCNL SDCNP1A SDL1 SDM1A SDN1

Entry Points

Name	Comments	DBIA/ICR reference
PRT
W1
WRAPP	;WRITE APPOINTMENT INFORMATION
FORM
REST	;WRITE THE REMAINDER OF LETTER
ADDR
LAST4(DFN)	;Return patient "last four"
BADADD	;Print patients with a Bad Address Indicator
TST	; SD5.3622 - handle scheduled tests
ADLIN()	; ; This API is checked to determine if the "ENABLE BLANK LINE?" (#1.1) ; field in the SCHEDULING PARAMETERS (404.91) file is set to "YES" ; (internal value 1). ; Added with patch SD5.3705

External References

Name	Field # of Occurrence
C^%DTC	ADDR+2
DW^%DTC	FORM
$$FML^DGNFUNC	ADDR
$$GET1^DIQ	ADDR+6, ADDR+7, ADLIN+7
^DIWP	W1+4, REST+2
^DIWW	W1+5, REST+3
DTS^SDUTL	PRT+2
ADD^VADPT	ADDR+3
KVAR^VADPT	ADDR+28
$$NAMEFMT^XLFNAME	W1+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: PRT+3
Function Call: WRITE	Prompt: !,?65,Y,!,?65,$$LAST4(A),!!!! Line Location: PRT+6
Function Call: WRITE	Prompt: !!!!! Line Location: PRT+7
Function Call: WRITE	Prompt: !!!! Line Location: PRT+7
Function Call: WRITE	Prompt: !,"Dear " Line Location: W1+0
Function Call: WRITE	Prompt: X,"," Line Location: W1+3
Function Call: WRITE	Prompt: ! Line Location: FORM+2
Function Call: WRITE	Prompt: ?22,$J(SDT0,9),!?5,SDCL Line Location: FORM+4
Function Call: WRITE	Prompt: @IOF Line Location: FORM+25
Function Call: WRITE	Prompt: ! Line Location: REST+4
Function Call: WRITE	Prompt: !?12,$$FML^DGNFUNC(DFN) Line Location: ADDR+0
Function Call: WRITE	Prompt: ! Line Location: ADDR+28
Function Call: WRITE	Prompt: @IOF,$TR($J("",IOM)," ","*") Line Location: BADADD+3
Function Call: WRITE	Prompt: !,?(IOM-$L(SDHDR)/2),SDHDR,! Line Location: BADADD+4
Function Call: WRITE	Prompt: !,"Last 4",!,"of SSN",?10,"Patient Name",! Line Location: BADADD+6
Function Call: WRITE	Prompt: $TR($J("",IOM)," ","*") Line Location: BADADD+7
Function Call: WRITE	Prompt: !,$$LAST4(SDDFN),?10,SDNAM Line Location: BADADD+11
Function Call: WRITE	Prompt: !!,SDHDR1 Line Location: BADADD+12
Function Call: WRITE	Prompt: ! Line Location: TST+1

FileNo	Call Tags
^DIC(5 - [#5]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("FUNC" - [#.5]	FORM
^DG(43 - [#43]	ADDR+1
^DPT - [#2]	PRT+1, LAST4+2
^SC - [#44]	WRAPP+4, FORM+9, FORM+10, FORM+11, FORM+12, FORM+14
^TMP($J	BADADD+1, BADADD+9, BADADD+10
^UTILITY($J	W1+4!, W1+5!, REST+2!, REST+3!
^VA(200 - [#200]	FORM+21
^VA(407.5 - [#407.5]	W1+4, FORM+15, FORM+22, REST+2

Label References

Name	Line Occurrences
$$ADLIN	FORM+2
$$LAST4	PRT+6, BADADD+11
ADDR	PRT+7, REST+5
FORM	WRAPP+4, WRAPP+6
TST	FORM+24

Naked Globals

Name	Field # of Occurrence
^(	W1+4, REST+2
^("BT"	ADDR+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	PRT, PRT+6, W1+2, ADDR
B	WRAPP+1~, WRAPP+6*, FORM+2, FORM+3, FORM+4, FORM+15, FORM+17, FORM+22, FORM+24
DA	ADLIN+5~, ADLIN+6*, ADLIN+7
DFN	PRT, PRT+1, ADDR, LAST4~, LAST4+2
DIC	ADLIN+5~, ADLIN+6*, ADLIN+7
DIQ	ADLIN+5~
DIQ(0	ADLIN+6*
DIWF	W1+4!, REST+2!
DIWL	W1+4, REST+2!
DIWR	W1+4!, REST+2!
>> DOW	FORM*, FORM+3, TST+2, TST+3, TST+4
DPTNAME	W1+1~, W1+3
DPTNAME("FIELD"	W1+2*
DPTNAME("FILE"	W1+2*
DPTNAME("IENS"	W1+2*
DR	ADLIN+5~, ADLIN+6*, ADLIN+7
DT	PRT+2, ADDR+2
I	REST+1~, REST+4*
IOF	PRT+3, FORM+25, BADADD+3
IOM	BADADD+3, BADADD+4, BADADD+7
IOSL	FORM+25, REST+4
J	FORM+8~, FORM+14*
LL	ADDR+9~, ADDR+13, ADDR+22
>> POP	PRT+1*
>> S	WRAPP+6*
>> SC	WRAPP+4
>> SDC	WRAPP+4*, FORM+4, FORM+9, FORM+10, FORM+11, FORM+12, FORM+14, FORM+15, FORM+17, FORM+21 , FORM+22
SDCCACT1	ADDR+9~, ADDR+10*, ADDR+12, ADDR+21
SDCCACT2	ADDR+9~, ADDR+10*, ADDR+12, ADDR+21
>> SDCL	WRAPP+4, WRAPP+6, FORM+4, TST+2, TST+3, TST+4
>> SDDAT	FORM*, FORM+3, TST+2, TST+3, TST+4
SDDFN	BADADD+8~, BADADD+10*, BADADD+11
SDFIRST	PRT+3, PRT+4!
>> SDFORM	PRT+7, REST+3
SDHDR	BADADD+2~, BADADD+4*
SDHDR1	BADADD+2~, BADADD+5*, BADADD+12
>> SDHX	FORM*
SDIENS	ADDR+5~, ADDR+6, ADDR+7, ADDR+8!
>> SDLET	W1+4, FORM+15, FORM+22, REST+2
SDLOC	FORM+8~, FORM+9*, FORM+16
>> SDLT	FORM+25
SDNAM	BADADD+8~, BADADD+9*, BADADD+10, BADADD+11
>> SDNOSH	PRT+1
SDPRNM	FORM+8~, FORM+21*, FORM+22
SDPROV	FORM+8~, FORM+14*, FORM+20, FORM+21
>> SDS	WRAPP+6
>> SDT0	FORM*, FORM+4, TST+2, TST+3, TST+4
SDTEL	FORM+8~, FORM+10*, FORM+11, FORM+17, FORM+18
SDTELEXT	FORM+8~, FORM+11, FORM+12, FORM+19
SDX	WRAPP+6, WRAPP+7, FORM, LAST4+1~, LAST4+2*, LAST4+3
>> SDX1	WRAPP+6*, WRAPP+7
U	PRT, FORM+14, FORM+15, FORM+18, FORM+21, FORM+22, ADDR+6, ADDR+7, ADDR+16, ADDR+19 , ADDR+24, ADDR+27, LAST4+3
VAHOW	ADDR!
>> VAPA(	ADDR+13, ADDR+22
>> VAPA("P"	ADDR+1*, ADDR+2
>> VAPA(11	ADDR+16
>> VAPA(12	ADDR+10
>> VAPA(16	ADDR+24, ADDR+26
>> VAPA(17	ADDR+7*, ADDR+24
>> VAPA(18	ADDR+24
>> VAPA(22	ADDR+10
>> VAPA(23	ADDR+18
>> VAPA(24	ADDR+18
>> VAPA(25	ADDR+15, ADDR+19
>> VAPA(26	ADDR+26
>> VAPA(27	ADDR+26
>> VAPA(28	ADDR+23, ADDR+27
>> VAPA(4	ADDR+16, ADDR+18
>> VAPA(5	ADDR+6*, ADDR+16
>> VATEST("ADD"	ADDR+2*
X	SDLT+18~, W1+3, W1+4, WRAPP+6, WRAPP+7, FORM, REST+1~, REST+2, ADDR+2, ADDR+5~ , ADDR+6, ADDR+7*
>> X1	ADDR+2*
>> X2	ADDR+2*
>> Y	PRT+2*, PRT+6
Z0	SDLT+18~, W1+4*
Z5	REST+1~, REST+2*

Customize PDF page

Package: Scheduling