Routine: BSDAL0

Information

BSDAL0 ; IHS/ANMC/LJF - IHS APPT LIST - CONTINUED ;

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
IHS Changes To Scheduling	3	$$ACTV^BSDU PCP^BSDU1 $$WALKIN^BSDU2
IHS Changes To ADT	2	$$INPT1^BDGF1 ($$DEAD,$$DOD,$$HRCN,$$INSUR)^BDGF2
Kernel	2	$$FMTE^XLFDT $$REPEAT^XLFSTR
Registration	1	(ADD,DEM)^VADPT
Scheduling	1	TM^SDROUT0
VA Fileman	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
APPTLN(CLN,DATE,IEN)	; -- for each individual appt, print patient data
CCLK(CLN,DATE)	; -- list chart requests for this clinic and date
CHECK(CLN,APDT)	;check if clinic for this division and not cancelled or inactive
START	;EP; called by list template INIT^BSDALL
CLINIC	; called for each clinic
ACTIVITY(CLN,APDT)	;Determine if clinic has activity to print for appt date

External References

Name	Field # of Occurrence
$$INPT1^BDGF1	APPTLN+16
$$DEAD^BDGF2	APPTLN+21
$$DOD^BDGF2	APPTLN+21
$$HRCN^BDGF2	CCLK+7
$$INSUR^BDGF2	APPTLN+33
$$ACTV^BSDU	CHECK+3
PCP^BSDU1	APPTLN+46
$$WALKIN^BSDU2	APPTLN+3
$$GET1^DIQ	CLINIC+6, APPTLN+41, APPTLN+42, CCLK+6, CCLK+10, CHECK+1, CHECK+2
TM^SDROUT0	APPTLN+10, APPTLN+14, APPTLN+30
ADD^VADPT	APPTLN+37
DEM^VADPT	APPTLN+5
$$FMTE^XLFDT	CLINIC+6, APPTLN+26, APPTLN+41, CCLK+2, CCLK+11
$$REPEAT^XLFSTR	CLINIC+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CLINIC+4
Function Call: WRITE	Prompt: "@@@@@" Line Location: CLINIC+5
Function Call: WRITE	Prompt: "Appointments for ",$$GET1^DIQ(44,SC,.01)," clinic on ",$$FMTE^XLFDT(BSDD) Line Location: CLINIC+6
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("=",80) Line Location: CLINIC+7
Function Call: WRITE	Prompt: !!?(IOM-$L(BSDACT)\2),BSDACT Line Location: CLINIC+20
Function Call: WRITE	Prompt: ! Line Location: CLINIC+22
Function Call: WRITE	Prompt: !,$J(X,8) Line Location: APPTLN+10
Function Call: WRITE	Prompt: !! Line Location: APPTLN+11
Function Call: WRITE	Prompt: ?12,"Walk-in " Line Location: APPTLN+12
Function Call: WRITE	Prompt: ?12,"Checked in at ",X Line Location: APPTLN+14
Function Call: WRITE	Prompt: ?12,"No-Show" Line Location: APPTLN+15
Function Call: WRITE	Prompt: ?40,"Admitted "_X_" " Line Location: APPTLN+17
Function Call: WRITE	Prompt: ?40,"(",$S($G(^DPT(DFN,.1))]"":^(.1),1:"Outpatient"),")" Line Location: APPTLN+18
Function Call: WRITE	Prompt: !?12," PATIENT DIED ON ",$$DOD^BDGF2(DFN)," " Line Location: APPTLN+21
Function Call: WRITE	Prompt: !?5,$S($D(^SC(SC,"S",DATE,1,IEN,"OB")):"*",1:"") Line Location: APPTLN+23
Function Call: WRITE	Prompt: ?7,$E(VADM(1),1,18) Line Location: APPTLN+24
Function Call: WRITE	Prompt: ?30,"#",VA("PID") Line Location: APPTLN+25
Function Call: WRITE	Prompt: ?39,$$FMTE^XLFDT(+VADM(3),5)," (",VADM(4),")" Line Location: APPTLN+26
Function Call: WRITE	Prompt: ?48+SPACE,$J(X,8) Line Location: APPTLN+30
Function Call: WRITE	Prompt: " " Condition for execution: SPACE<16 Line Location: APPTLN+30
Function Call: WRITE	Prompt: !?9,$$INSUR^BDGF2(DFN,DATE) Line Location: APPTLN+33
Function Call: WRITE	Prompt: ?18,BSDOI Condition for execution: BSDOI]"" Line Location: APPTLN+33
Function Call: WRITE	Prompt: ! Line Location: APPTLN+36
Function Call: WRITE	Prompt: ?5,"Phone: ",VAPA(8) Line Location: APPTLN+37
Function Call: WRITE	Prompt: ?25,"Made by ",$$GET1^DIQ(200,X,.01)," on ",$$FMTE^XLFDT(Y,"2") Line Location: APPTLN+41
Function Call: WRITE	Prompt: !?20,"PCP: ",$P(BSDARR(1),"/",1,2) Line Location: APPTLN+47
Function Call: WRITE	Prompt: ! Line Location: APPTLN+49
Function Call: WRITE	Prompt: !,"CHART REQUESTS for ",$$FMTE^XLFDT(DATE),":" Line Location: CCLK+2
Function Call: WRITE	Prompt: !,$E($$GET1^DIQ(2,DFN,.01),1,20) Line Location: CCLK+6
Function Call: WRITE	Prompt: ?23,"#",$$HRCN^BDGF2(DFN,DUZ(2)) Line Location: CCLK+7
Function Call: WRITE	Prompt: ?35,$E($P(BSDN,U,3),1,33) Line Location: CCLK+8
Function Call: WRITE	Prompt: !?35,"Made by ",$E($$GET1^DIQ(200,+$P(BSDN,U,2),.01),1,15) Line Location: CCLK+10
Function Call: WRITE	Prompt: " on ",$$FMTE^XLFDT(+BSDN,"D") Line Location: CCLK+11

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^SC - [#44]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	APPTLN+4, APPTLN+18
^SC - [#44]	CLINIC+11, CLINIC+14, CLINIC+15, APPTLN+2, APPTLN+13, APPTLN+23, CCLK+2, CCLK+3, CCLK+4, CCLK+5 , CHECK+4, CHECK+5, ACTIVITY+1, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6
^SC("B"	START+3, START+5

Label References

Name	Line Occurrences
$$ACTIVITY	CLINIC+3
$$CHECK	CLINIC+3
APPTLN	CLINIC+16
CCLK	CLINIC+22
CLINIC	START+5

Naked Globals

Name	Field # of Occurrence
^(	APPTLN+18

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APDT	CHECK~, CHECK+3, CHECK+4, CHECK+5, ACTIVITY~, ACTIVITY+1, ACTIVITY+3, ACTIVITY+4
BSD	CLINIC+1~, CLINIC+10, CLINIC+11, CLINIC+14, CLINIC+15, CLINIC+16
BSDACT	CLINIC+1~, CLINIC+10, CLINIC+18, CLINIC+19, CLINIC+20, APPTLN+49*
>> BSDAMB	APPTLN+36, APPTLN+38, CCLK+9
BSDARR	APPTLN+45~, APPTLN+46*
BSDARR(1	APPTLN+47
BSDC	CCLK+1~
BSDCN	START+1~, START+2, START+3, START+5
>> BSDCR	CLINIC+22, ACTIVITY+1
>> BSDD	CLINIC+3, CLINIC+6, CLINIC+10, CLINIC+11, CLINIC+22
>> BSDION	CLINIC+5, CLINIC+7
BSDN	CCLK+1~, CCLK+5*, CCLK+8, CCLK+10, CCLK+11
BSDOI	APPTLN+1~, APPTLN+2*, APPTLN+33
>> BSDPCMM	APPTLN+46
>> BSDPH	APPTLN+36, APPTLN+37
>> BSDWI	APPTLN+3
BSDZ	APPTLN+1~
BSDZ(	APPTLN+29*, APPTLN+30
BSDZ(3	APPTLN+28*
BSDZ(4	APPTLN+28*
BSDZ(5	APPTLN+28*
CLN	APPTLN~, APPTLN+2, CCLK~, CCLK+2, CCLK+3, CCLK+4, CCLK+5, CHECK~, CHECK+1, CHECK+2 , CHECK+3, CHECK+4, CHECK+5, ACTIVITY~, ACTIVITY+1, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6
DATA	APPTLN+1~, APPTLN+4*, APPTLN+12, APPTLN+15, APPTLN+29
DATE	APPTLN~, APPTLN+2, APPTLN+3, APPTLN+4, APPTLN+10, APPTLN+13, APPTLN+16, APPTLN+23, APPTLN+33, CCLK~ , CCLK+2, CCLK+3, CCLK+4, CCLK+5, ACTIVITY+2~, ACTIVITY+3, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6
DFN	APPTLN+1~, APPTLN+2, APPTLN+3, APPTLN+4, APPTLN+16, APPTLN+18, APPTLN+21, APPTLN+33, APPTLN+46, CCLK+1~ , CCLK+4, CCLK+6, CCLK+7
DUZ(2	CCLK+7
FIRST	CLINIC+1~, CLINIC+13, APPTLN+10
FOUND	ACTIVITY+2~, ACTIVITY+3, ACTIVITY+4, ACTIVITY+5, ACTIVITY+6, ACTIVITY+7
I	APPTLN+45~
IEN	CLINIC+1~, CLINIC+13, CLINIC+14, CLINIC+15, CLINIC+16, APPTLN~, APPTLN+2, APPTLN+13, APPTLN+23, CCLK+1~ , CCLK+3*, CCLK+4, CCLK+5
IOM	CLINIC+20
N	ACTIVITY+2~, ACTIVITY+5*, ACTIVITY+6
NODE	APPTLN+1~, APPTLN+2*, APPTLN+40
SC	START+1~, START+4, START+5, CLINIC+3, CLINIC+6, CLINIC+11, CLINIC+14, CLINIC+15, CLINIC+16, CLINIC+22 , APPTLN+13, APPTLN+23
SPACE	APPTLN+1~, APPTLN+30*
U	CLINIC+15, APPTLN+2, APPTLN+4, APPTLN+12, APPTLN+13, APPTLN+15, APPTLN+29, APPTLN+40, CCLK+8, CCLK+10 , ACTIVITY+6
VA	APPTLN+1~
VA("PID"	APPTLN+25
VADM	APPTLN+1~
VADM(1	APPTLN+24
VADM(3	APPTLN+26
VADM(4	APPTLN+26
VAPA	APPTLN+1~, APPTLN+37!
VAPA(8	APPTLN+37
>> VAUTC	START+3
>> VAUTC(	START+3
>> VAUTD	CHECK+2
>> VAUTD(	CHECK+2
X	APPTLN+1~, APPTLN+10, APPTLN+13, APPTLN+14, APPTLN+16, APPTLN+17, APPTLN+29, APPTLN+30, APPTLN+39~, APPTLN+40 , APPTLN+41, APPTLN+42
Y	APPTLN+39~, APPTLN+40*, APPTLN+41
Z	APPTLN+1~, APPTLN+30, APPTLN+39~, APPTLN+42

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDAL0

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: