Routine: BSDLT

Call Graph

Package	Total	Call Graph
VA Fileman	5	(C,DW)^%DTC UPDATE^DIE $$GET1^DIQ ^DIWP ^DIWW
IHS Changes To ADT	2	$$TIME^BDGF $$HRCN^BDGF2
IHS Changes To Scheduling	2	FUTURE^BSDLT1 $$GREETING^BSDU
Registration	2	$$FML^DGNFUNC (ADD,KVAR)^VADPT
Kernel	1	$$FMTE^XLFDT
Scheduling	1	DTS^SDUTL

Package	Total	Caller Graph
IHS Changes To Scheduling	2	BSDCLET BSDWLE
Scheduling	1	SDLT

Name	Comments	DBIA/ICR reference
RECALL(CL,P)	;-- get recall information and clinic based on patient and clinic passed in
STORE(PAT,LET,D)	;-- lets store the date printed and letter for tracking
ADDR
FORM	;EP;
WRAPP	;WRITE APPOINTMENT INFORMATION
REST	;EP; WRITE THE REMAINDER OF LETTER
LAST4(DFN)	;Return patient "last four"
PRT	;EP;
W1	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?65,Y,!,?65,"#",$$HRCN^BDGF2(+A,DUZ(2)),!!!! Line Location: PRT+2
Function Call: WRITE	Prompt: !,?51,"Date Printed: ",Y,!,?65,"#",$$HRCN^BDGF2(+A,DUZ(2)),!!!! Line Location: PRT+3
Function Call: WRITE	Prompt: !!!!! Line Location: PRT+4
Function Call: WRITE	Prompt: !!!! Line Location: PRT+4
Function Call: WRITE	Prompt: !?5,$$GREETING^BSDU(SDLET,+A) Line Location: W1+1
Function Call: WRITE	Prompt: !?9,DOW,?19,$J(SDDAT,12) Line Location: FORM+2
Function Call: WRITE	Prompt: ?32,$J(SDT0,8)," ",SDCL Line Location: FORM+3
Function Call: WRITE	Prompt: @IOF Line Location: FORM+3
Function Call: WRITE	Prompt: !!,?5,"Recall Date: "_$$FMTE^XLFDT($G(RC)),?40,"Clinic/Ward: "_$$GET1^DIQ(44,$P($G(^BSDWL(CL,0)),U),.01) Line Location: RECALL+5
Function Call: WRITE	Prompt: @IOF Line Location: REST+3
Function Call: WRITE	Prompt: ! Line Location: REST+4
Function Call: WRITE	Prompt: @IOF Line Location: REST+5
Function Call: WRITE	Prompt: !?12,$$FML^DGNFUNC(DFN) Line Location: ADDR+0
Function Call: WRITE	Prompt: ", ",$P(^UTILITY("VAPA",$J,5),"^",2) Line Location: ADDR+9
Function Call: WRITE	Prompt: " ",^UTILITY("VAPA",$J,6) Line Location: ADDR+10
Function Call: WRITE	Prompt: ", ",$P(^UTILITY("VAPA",$J,17),"^",2) Line Location: ADDR+14
Function Call: WRITE	Prompt: " ",$P(^UTILITY("VAPA",$J,18),U,2) Line Location: ADDR+15
Function Call: WRITE	Prompt: ! Line Location: ADDR+16
Routine Call	DIE Line Location: STORE+6

FileNo	Call Tags
^SC - [#44]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BSDPAR - [#9009020.2]	STORE+1
^BSDWL - [#9009017.1]	RECALL+3, RECALL+4, RECALL+5
^BSDWL("AB"	RECALL+2
^DG(43 - [#43]	ADDR+1
^DPT - [#2]	LAST4+2
^SC - [#44]	WRAPP+1
^UTILITY("VAPA"	ADDR+5, ADDR+8, ADDR+9, ADDR+10, ADDR+13, ADDR+14, ADDR+15
^UTILITY($J	W1+2!, W1+4!, REST+2!, REST+3!
^VA(407.5 - [#407.5]	W1+2, REST+2

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

Name	Field # of Occurrence
>> A	PRT+3, W1+1, W1+5, REST+1, ADDR
>> B	WRAPP+2*
BSDCNT	REST+1!
CDA	RECALL+1~, RECALL+2*, RECALL+3, RECALL+4
CL	RECALL~, RECALL+2, RECALL+3, RECALL+4, RECALL+5
D	STORE~
DFN	ADDR*, LAST4~, LAST4+2
>> DIV	STORE+1
DIWF	W1+2!, REST+2!
DIWL	W1+2, REST+2!
DIWR	W1+2!, REST+2!
>> DOW	FORM+2*
DT	PRT+3, W1+5, STORE+5, ADDR+2
DUZ(2	PRT+3
FDA	STORE+2~
FDA(	STORE+4, STORE+5
FERR	STORE+2~
FIENS	STORE+2~, STORE+3*, STORE+4, STORE+5
>> I	REST+4*
IOF	REST+3, REST+5
IOSL	REST+4
LET	STORE~, STORE+3
>> LL	ADDR+8, ADDR+13
P	RECALL~, RECALL+2
PAT	STORE~, STORE+4
RC	RECALL+1~, RECALL+4*, RECALL+5
>> S	WRAPP+2*
>> S1	REST+1
>> SC	WRAPP+1
>> SDC	WRAPP+1*
SDCCACT1	ADDR+4~, ADDR+5*, ADDR+7, ADDR+12
SDCCACT2	ADDR+4~, ADDR+5*, ADDR+7, ADDR+12
>> SDCL	WRAPP+1, WRAPP+2, FORM+3
>> SDDAT	FORM+2*
>> SDFORM	PRT+4, REST+3
>> SDHX	FORM+2*
>> SDLET	W1+1, W1+2, W1+5, REST+2
>> SDS	WRAPP+2
>> SDT0	FORM+2*, FORM+3
SDX	WRAPP+2, WRAPP+3, FORM+2, LAST4+1~, LAST4+2*, LAST4+3
>> SDX1	WRAPP+2*, WRAPP+3
U	STORE+1, RECALL+3, RECALL+4, RECALL+5, ADDR+15, LAST4+3
VAHOW	ADDR!*
>> VAPA("P"	ADDR+1*, ADDR+2
>> VATEST("ADD"	ADDR+2*
>> X	W1+2, WRAPP+2, WRAPP+3, FORM+2, REST+2, ADDR+2
>> X1	ADDR+2*
>> X2	ADDR+2*
>> Y	PRT+3*
>> Z0	W1+2*
>> Z5	REST+2*