Routine: BDPUPDT

Package	Total	Call Graph
IHS VA Utilities	3	^XBDBQUE $$VAL^XBDIQ1 EN^XBVK
Kernel	2	$$FMTE^XLFDT $$REPEAT^XLFSTR
VA Fileman	2	C^%DTC ^DIR
IHS Designated Provider	1	$$DATE^BDPLMDSP
Patient Care Component Reports	1	XTMP^APCLOSUT

Package

Total

Call Graph

IHS VA Utilities

^XBDBQUE $$VAL^XBDIQ1 EN^XBVK

Kernel

$$FMTE^XLFDT $$REPEAT^XLFSTR

VA Fileman

C^%DTC ^DIR

IHS Designated Provider

$$DATE^BDPLMDSP

Patient Care Component Reports

XTMP^APCLOSUT

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
HEAD	;EP;HEADER
PAGEHEAD	;
END	;
ZIS	;
HEAD1	;
INFORM	;Report Explanation
ED	;get ending date
PRINT	;PRINT RECORDS BY DATE
DONE	;
CTR(X,Y)	;EP - Center X in a field Y wide.
ASK	;Ask For Date Range
PROC	;
HEAD2

Name	Field # of Occurrence
C^%DTC	ED+4
XTMP^APCLOSUT	PROC+4
$$DATE^BDPLMDSP	PRINT+9
^DIR	BD+1, ED+1, HEAD2
^XBDBQUE	ZIS+2
$$VAL^XBDIQ1	PROC+13, PRINT+9
EN^XBVK	END+1
$$FMTE^XLFDT	HEAD1+2, HEAD1+6
$$REPEAT^XLFSTR	HEAD1+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: ! Line Location: ED+5
Function Call: WRITE	Prompt: !,"No data to report." Line Location: PRINT+4
Function Call: WRITE	Prompt: !!,"Total # of patients: ",BDPTCNT,! Line Location: PRINT+12
Function Call: WRITE	Prompt: ! Line Location: HEAD2+0
Function Call: WRITE	Prompt: !,$$FMTE^XLFDT(DT),?70,"Page: ",BDPPG Line Location: HEAD1+2
Function Call: WRITE	Prompt: !,$$CTR("***************************************************************",80) Line Location: HEAD1+3
Function Call: WRITE	Prompt: !,$$CTR("* DESIGNATED PROVIDER LIST BY DATE LAST UPDATED *",80) Line Location: HEAD1+4
Function Call: WRITE	Prompt: !,$$CTR("***************************************************************",80) Line Location: HEAD1+5
Function Call: WRITE	Prompt: !,$$CTR(X,80) Line Location: HEAD1+6
Function Call: WRITE	Prompt: !!,"PROVIDER CATEGORY",?22,"PATIENT NAME",?44,"LAST CURRENT PROVIDER",?68,"UPDATE DT" Line Location: HEAD1+7
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",79) Line Location: HEAD1+8
Function Call: WRITE	Prompt: !,?25,"******************************",! Line Location: INFORM+2
Function Call: WRITE	Prompt: ?10,"This Report prints a Listing of Records updated for a",!,?10,"specific date range - entered by the User.",! Line Location: INFORM+3
Function Call: WRITE	Prompt: !?10,"The report output includes:",!,?10,"Category Type-Patient Name-Current Provider-Date of Last Update.",! Line Location: INFORM+4
Function Call: WRITE	Prompt: ?25,"*****************************",! Line Location: INFORM+5
Routine Call	DIR Line Location: BD+1 ED+1 HEAD2

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	PROC+8
^BDPRECN - [#90360.1]	PROC+7, PROC+9
^BDPRECN("B"	PROC+5, PROC+6
^XTMP("BDPUPDT"	PROC+3!, PROC+13*, PRINT+4, PRINT+5, PRINT+6, PRINT+7, DONE+1!

Name	Line Occurrences
$$CTR	HEAD1+3, HEAD1+4, HEAD1+5, HEAD1+6
BD	ED+2
DONE	PRINT+10, PRINT+11
END	BD+2, ZIS+3, PRINT+4, DONE+2
HEAD1	HEAD+2
HEAD2	HEAD+1
INFORM	BDPUPDT+5
PAGEHEAD	PRINT+3, PRINT+8, PRINT+11

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BDPBD	BD+3*, ED+1, ED+4, PROC+11, HEAD1+6
>> BDPD	PRINT+5*, PRINT+6, PRINT+7, PRINT+9
>> BDPDEM	HEAD+1
>> BDPDEMM	HEAD+1
>> BDPED	ED+3*, PROC+12, HEAD1+6
>> BDPH	PROC+2*, PROC+3, PROC+13, PRINT+4, PRINT+5, PRINT+6, PRINT+7, DONE+1
>> BDPI	PRINT+7*, PRINT+9
>> BDPIEN	PROC+6*, PROC+7, PROC+9, PROC+13
>> BDPJ	PROC+2*, PROC+3, PROC+13, PRINT+4, PRINT+5, PRINT+6, PRINT+7, DONE+1
>> BDPPG	PRINT+2, HEAD+2, HEAD1+1, HEAD1+2
BDPQUIT	PRINT+2!, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+10, PRINT+11, HEAD2*
>> BDPSD	ED+4*
>> BDPTCNT	PROC+2, PROC+14, PRINT+12
>> BDPX	PROC+5, PROC+6, PRINT+6, PRINT+7
>> D	PROC+9*, PROC+10, PROC+11, PROC+12, PROC+13
>> DFN	PROC+7*, PROC+8
DIR	BD+1!, ED+1!, HEAD2!
DIR("A"	BD+1, ED+1
DIR(0	BD+1, ED+1, HEAD2*
>> DIRUT	BD+1, BD+2, ED+1, ED+2
DT	HEAD1+2
>> DTOUT	HEAD2
>> DUOUT	BD+1, ED+1
DUZ(2	PROC+8
IO	HEAD2
IO(0	HEAD2
IOF	HEAD1+1
IOM	CTR+1
IOSL	PRINT+8, PRINT+11
IOST	HEAD2
U	PROC+7, PROC+8, PROC+9
X	ED+4, HEAD1+6*, CTR~, CTR+1
>> X1	ED+4*
>> X2	ED+4*
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	BD+3, ED+3, HEAD2, CTR~, CTR+1

Customize PDF page

Package: IHS Designated Provider

Routine: BDPUPDT

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: