Routine: BUDARPTD

Package	Total	Call Graph
IHS VA Utilities	2	$$VAL^XBDIQ1 ^XBGSAVE
Kernel	2	$$FMTE^XLFDT $$VERSION^XPDUTL
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPOV,$$PRIMPROV,$$VD)^APCLV
VA Fileman	1	^DIR

Package

Total

Call Graph

IHS VA Utilities

$$VAL^XBDIQ1 ^XBGSAVE

Kernel

$$FMTE^XLFDT $$VERSION^XPDUTL

Patient Care Component Reports

$$START1^APCLDF ($$CLINIC,$$PRIMPOV,$$PRIMPROV,$$VD)^APCLV

VA Fileman

^DIR

Package	Total	Caller Graph
IHS Uniform Data System	5	BUDARP6B BUDARP7 BUDARPTC BUDARPTL BUDARPTP

Package

Total

Caller Graph

IHS Uniform Data System

BUDARP6B BUDARP7 BUDARPTC BUDARPTL BUDARPTP

External References

Name	Field # of Occurrence
$$START1^APCLDF	GETV+7
$$CLINIC^APCLV	GETV+17
$$PRIMPOV^APCLV	MH+3, SET+5
$$PRIMPROV^APCLV	GETV+22, GETV+31
$$VD^APCLV	GETV+21, SET+13
^DIR	TZH+2
$$VAL^XBDIQ1	MEDC+4, SET+31
^XBGSAVE	WDEL+13
$$FMTE^XLFDT	GETV+7, SET+31, SET+54, TZH1+3, TZH1+7
$$VERSION^XPDUTL	SET+20, SET+43

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: TZH+2
Function Call: WRITE	Prompt: !,"*** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT ***" Line Location: TZH1+2
Function Call: WRITE	Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,! Line Location: TZH1+3
Function Call: WRITE	Prompt: !,$$CTR("* BPHC Uniform Data System (UDS) *",80) Line Location: TZH1+4
Function Call: WRITE	Prompt: !,$$CTR("Patient List: Patient by Zip Code/Insurance",80),! Line Location: TZH1+5
Function Call: WRITE	Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),! Line Location: TZH1+6
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: TZH1+7
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: TZH1+8
Function Call: WRITE	Prompt: $TR($J("",80)," ","-") Line Location: TZH1+9
Function Call: WRITE	Prompt: !,"List of all patients with one or more visits during the calendar year." Line Location: TZH1+10
Function Call: WRITE	Prompt: !,"Zip code is from patient registration." Line Location: TZH1+11
Function Call: WRITE	Prompt: !!,"NOTE: Patients with a zip code included in the Other Zip Codes category" Line Location: TZH1+12
Function Call: WRITE	Prompt: !,"have their zip code value followed by a ""","",""" (e.g. 87015)." Line Location: TZH1+13
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?24,"HRN",?36,"COMMUNITY",?50,"SEX",?55,"ZIP CODE",?65,"INS" Line Location: TZH1+14
Function Call: WRITE	Prompt: !?5,"VISIT DATE",?25,"PROV TYPE",?41,"SRV",?45,"CLINIC",?62,"LOCATION" Line Location: TZH1+15
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-") Line Location: TZH1+17
Routine Call	DIR Line Location: TZH+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVPOV("AD"	GETV+24, SET+3
^AUPNVSIT - [#9000010]	GETV+10, GETV+11, GETV+12, GETV+13, GETV+16, GETV+23, GETV+28, GETV+29, MEDC1+3, MEDC1+4 , DENT+6, DENT+7, MH+8, MH+9, SUB+6, SUB+7, VISION+6, VISION+7, OTH+5, OTH+6 , ENAB+6, ENAB+7, SET+9
^BUDDATA	WDEL+3, WDEL+5!, WDEL+15, WDEL+16!, WDEL+11*
^BUDDATA(1	WDEL+8*
^BUDQCNTL - [#90665.2]	GETV+19, MEDC1+1, DENT+4, MH+6, SUB+4, VISION+4, ENAB+4, SET+8
^BUDQCNTL("B"	GETV+18, MEDC+2, DENT+2, MH+2, SUB+2, VISION+2, ENAB+2, SET+7
^BUDQSITE - [#90665.1]	GETV+15, SET+30, SET+53
^BUDQTFIV - [#90665.5]	OTH+3
^BUDQTFIV("AA"	MEDC+6
^BUDQTFIV("B"	OTH+1
^BUDQTFIV("C"	MEDC+5
^BWPCD - [#9002086.1]	SET+22, SET+23, SET+24, SET+27, SET+28, SET+45, SET+46, SET+47, SET+50, SET+51
^BWPCD("C"	SET+21, SET+44
^BWPN("B"	SET+17, SET+18, SET+19, SET+42
^DIC(4 - [#4]	TZH1+6
^TMP($J	GETV+5!, GETV+8, GETV+9, GETV+27, GETV+29, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7 , MH+9, SUB+5, SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7, SET+1* , SET+12, SET+31, SET+54*, WDEL+4!
^VA(200 - [#200]	TZH1+3
^XTMP("BUDARP9DEL"	WDEL+9, WDEL+10, WDEL+11

Name	Line Occurrences
$$CTR	TZH1+4, TZH1+5, TZH1+6, TZH1+7, TZH1+8
MEDC1	MEDC+4, MEDC+5
SET	GETV+23, GETV+24, GETV+32
SUB	MH+4
TZH1	TZH+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	GETV+7*
>> B	GETV+7*
>> BUDBD	GETV+7, SET+25, SET+48, TZH1+7
>> BUDBEN	TZH1+8
>> BUDCLINC	GETV+17*, GETV+19, SET+8
>> BUDED	GETV+7, SET+26, SET+49, TZH1+7
>> BUDFILE	WDEL+12
>> BUDGPG	TZH+1, TZH1+1*, TZH1+3
>> BUDH	WDEL+9, WDEL+10, WDEL+11
>> BUDJ	WDEL+9, WDEL+10, WDEL+11
>> BUDLASTV	GETV+6, SET+13
>> BUDLINE	MEDC+4, MEDC+5, MEDC+6*, MEDC1+1, DENT+4, MH+6, SUB+4, VISION+4, ENAB+4
>> BUDMEDV	GETV+6, MEDC1+5
>> BUDMEDVI	GETV+6, MEDC1+5
>> BUDP	TZH1+10, TZH1+11, TZH1+12, TZH1+13, TZH1+16*
>> BUDPP	GETV+22, GETV+26, GETV+27, GETV+29, GETV+31, GETV+32, MEDC+4, MEDC+5, MEDC+6, OTH+3 , OTH+4, OTH+6, ENAB+5, ENAB+7, SET+10
>> BUDQUIT	TZH+2*
>> BUDSITE	GETV+15, SET+30, SET+53, TZH1+6
>> BUDT35V	GETV+6, SET+11, SET+15
>> BUDT6V	GETV+6*
>> BUDTIEN	GETV+18, GETV+19, MEDC+2, MEDC1+1, MEDC1+2, MEDC1+4, DENT+2, DENT+4, DENT+5, DENT+7 , MH+2, MH+6, MH+7, MH+9, SUB+2, SUB+4, SUB+5, SUB+7, VISION+2, VISION+4 , VISION+5, VISION+7, OTH+1, OTH+3, ENAB+2, ENAB+4, SET+7*, SET+8
>> BUDTV	GETV+6, SET
>> BUDVDATE	GETV+21*, GETV+27, GETV+29, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7, MH+9, SUB+5 , SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7
>> BUDVLOC	GETV+13*, GETV+14, GETV+15, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7, MH+9, SUB+5 , SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7
>> BUDVSIT	GETV+9, GETV+10, GETV+11, GETV+12, GETV+13, GETV+16, GETV+17, GETV+21, GETV+22, GETV+23 , GETV+24, GETV+28, GETV+29, GETV+31, MEDC+4, MEDC1+3, MEDC1+4, MEDC1+5, DENT+6, DENT+7 , MH+3, MH+8, MH+9, SUB+6, SUB+7, VISION+6, VISION+7, OTH+5, OTH+6, ENAB+6 , ENAB+7, SET+1, SET+3, SET+5, SET+9, SET+12, SET+13, SET+22, SET+23, SET+24 , SET+27, SET+28, SET+44, SET+45, SET+46, SET+47, SET+50, SET+51, SET+54
>> BUDX	GETV+9*
>> BUDY	MEDC+5*
>> C	WDEL+9, WDEL+11
>> D	GETV+27, GETV+28, MEDC1+2, MEDC1+3, DENT+5, DENT+6, MH+7, MH+8, SUB+5, SUB+6 , VISION+5, VISION+6, OTH+4, OTH+5, ENAB+5, ENAB+6, SET+23, SET+25, SET+26, SET+31 , SET+46, SET+48, SET+49, SET+54, WDEL+9*, WDEL+10, WDEL+11
>> DFN	GETV+7, GETV+27, GETV+29, MEDC1+2, MEDC1+4, DENT+5, DENT+7, MH+7, MH+9, SUB+5 , SUB+7, VISION+5, VISION+7, OTH+4, OTH+6, ENAB+5, ENAB+7, SET+21, SET+44
DIR	TZH+2!
DIR(0	TZH+2*
DT	TZH1+3
>> DTOUT	TZH+2
DUZ	TZH1+3
>> E	GETV+7*
>> G	SET+21, SET+44
IO	TZH+2
IO(0	TZH+2
IOF	TZH1+1
IOM	CTR+1
IOST	TZH+2
>> J	SET+24, SET+47
>> L	SET+28, SET+29, SET+30, SET+51, SET+52, SET+53
>> P	MH+3*, MH+4
>> S	GETV+25, GETV+28, GETV+30, MEDC+1, MEDC1, MEDC1+3, MEDC1+6, DENT+1, DENT+3, DENT+6 , DENT+8, MH+1, MH+5, MH+8, MH+10, SUB+1, SUB+3, SUB+6, SUB+8, VISION+1* , VISION+3, VISION+6, VISION+8, OTH+2, OTH+5, OTH+7, ENAB+1, ENAB+3, ENAB+6*, ENAB+8
>> T	SET+17, SET+24, SET+42, SET+47
>> T1	SET+18*, SET+24
>> T2	SET+19*, SET+24
U	GETV+9, GETV+11, GETV+12, GETV+13, GETV+16, GETV+23, GETV+27, GETV+28, GETV+29, MEDC1+2 , MEDC1+3, MEDC1+4, DENT+5, DENT+6, DENT+7, MH+7, MH+8, MH+9, SUB+5, SUB+6 , SUB+7, VISION+5, VISION+6, VISION+7, OTH+4, OTH+5, OTH+6, ENAB+5, ENAB+6, ENAB+7 , SET+9, SET+23, SET+24, SET+27, SET+28, SET+31, SET+46, SET+47, SET+50, SET+51 , SET+54, TZH1+3, TZH1+6
>> V	SET+21*, SET+31
X	TZH1+7, TZH1+8, CTR~, CTR+1, WDEL+6, WDEL+7, WDEL+8, WDEL+10*, WDEL+11
XBE	WDEL+14!
XBF	WDEL+12*, WDEL+14!
XBFLT	WDEL+12*, WDEL+14!
XBFN	WDEL+12*, WDEL+14!
>> XBGL	WDEL+2*
XBMED	WDEL+12*, WDEL+14!
>> XBQ	WDEL+12*
XBTLE	WDEL+12*, WDEL+14!
Y	SET+5*, TZH+2, CTR~, CTR+1
>> ZTQUEUED	TZH+2, WDEL+3

Customize PDF page

Package: IHS Uniform Data System

Routine: BUDARPTD

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
OTH
MEDC
SET
SUB
TZH1	;
CTR(X,Y)	;EP
ENAB
MH
DENT
VISION
TZH	;EP
WDEL	;EP - write out delimited file 9d
MEDC1
GETV	;EP - get all visits for this patient and tally in BUDTV