Routine: BUDARPC2

Package	Total	Call Graph
DRG Grouper	2	$$ICDDX^ICDCODE $$CPT^ICPTCOD
IHS Uniform Data System	2	(OPI,OPIC,PI)^BUDARPC3 $$AGE^BUDAUTL2
IHS Patient	1	($$AGE,$$RR)^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Kernel	1	$$FMADD^XLFDT
Patient Care Component Reports	1	($$CLINIC,$$VD)^APCLV

Package	Total	Caller Graph
IHS Uniform Data System	3	BUDARPC1 BUDARPC3 BUDARPTC

Name	Comments	DBIA/ICR reference
VET	;
L27(BUDV)	;EP
L26C(BUDV)	;EP
HOMEL(P,D)	;EP
MIGRANT	;
TPL(P,BD,ED)	;EP - workman's comp goes in line 11 per Duane
L26D(BUDV)	;EP
L26B(BUDV)	;EP
WC(P,BD,ED)	;EP - workman's comp goes in line 11 per Duane
MCRX	;
L31(BUDV)	;EP
MCD(P,D,T)	;EP - Is patient P medicaid eligible on date D. ; I = IEN. ; J = Node 11 IEN in ^AUPNMCD.
MIG(P,D)	;EP
MCR(P,D)	;EP - Is patient P medicare eligible on date D. 1 = yes, 0 = no. ; I = IEN in ^AUPNMCR multiple.
OPI(P,D,T)	;EP - Is patient P private insurance eligible on date D. 1= yes, 0=no.
L34(BUDV)	;EP
L26A(BUDV)	;EP
T4	;EP
L30(BUDV)	;EP
N	;
L31POV	;EP
HOMELESS	;
L32(BUDV)	;EP
OPIC(P,D,T)	;EP - Is patient P private insurance eligible on date D. 1= yes, 0=no.
TINS(A,P)	;
SCHOOL	;IF ALL VISITS ARE CLINIC SCHOOL??
MCRPIX	;
MCDX	;
L28(BUDV)	;EP
L26(BUDV)	;EP
GUAR(P,BD,ED)	;guarantor
L33(BUDV)	;EP
INS	;EP
HI	;
L29(BUDV)	;EP
SHI(V,LV)	;
PI(P,D)	;EP - Is patient P private insurance eligible on date D. 1= yes, 0=no.

Name	Field # of Occurrence
$$CLINIC^APCLV	L26+2, L26+3, SCHOOL+4
$$VD^APCLV	L26A+3, INS+2, INS+4, INS+8, INS+10, INS+12, INS+14, INS+16, MIGRANT+1, HOMELESS+1
$$AGE^AUPNPAT	L26+1
$$RR^AUPNPAT	INS+8
OPI^BUDARPC3	OPI+1
OPIC^BUDARPC3	OPIC+1
PI^BUDARPC3	PI+1
$$AGE^BUDAUTL2	L26A+3
$$ICDDX^ICDCODE	L31POV+5
$$CPT^ICPTCOD	L26+5
$$VAL^XBDIQ1	L27+10, L26B+2, L26C+3, L26C+17, L28+10, L29+10, L30+10, L31+12, L32+10, L33+10 , L34+10, L26A+7, L26D+3, HI+4, HI+6, HI+14
$$VALI^XBDIQ1	HI+2, MCD+16, MCD+17, VET+1
$$FMADD^XLFDT	WC+4, TPL+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNGUAR - [#9000043]	GUAR+3, GUAR+4, GUAR+5, GUAR+6
^AUPNMCD - [#9000004]	MCD+13, MCD+14, MCD+20, MCD+22
^AUPNMCD("B"	MCD+12
^AUPNMCR - [#9000003]	MCR+9, MCR+12, MCR+13, MCR+14
^AUPNPAT - [#9000001]	MCD+10, MCR+8, MIG+2, MIG+5, MIG+7, MIG+8, MIG+12, MIG+13, HOMEL+2, HOMEL+5 , HOMEL+7, HOMEL+8, HOMEL+11, HOMEL+12
^AUPNPRVT - [#9000006]	MCRX+3, MCRX+6, MCRX+7, MCRX+8, MCRX+15, MCRX+16
^AUPNTPL - [#9000041]	TPL+5, TPL+6, TPL+7, TPL+8
^AUPNVCPT - [#9000010.18]	L26+5
^AUPNVCPT("AD"	L27+9, L26B+1, L26C+2, L28+9, L29+9, L30+9, L31+11, L32+9, L33+9, L34+9 , L26+4, L26A+6, L26D+2
^AUPNVDEN - [#9000010.05]	L27+2, L28+2, L29+2, L30+2, L31+4, L32+2, L33+2, L34+2
^AUPNVDEN("AD"	L27+1, L28+1, L29+1, L30+1, L31+3, L32+1, L33+1, L34+1
^AUPNVPED - [#9000010.16]	L26B+7, L26C+8
^AUPNVPED("AD"	L26B+6, L26C+7
^AUPNVPOV - [#9000010.07]	L31POV+3
^AUPNVPOV("AD"	L26C+16, L31POV+2
^AUPNVSIT - [#9000010]	L26+1
^AUPNWC - [#9000042]	WC+3, WC+7, WC+10, WC+11, WC+12
^AUTNINS - [#9999999.18]	MCRX+9, MCRX+10, MCRX+11, MCRX+12, MCRX+13
^AUTTADA - [#9999999.31]	L27+4, L28+4, L29+4, L30+4, L31+6, L32+4, L33+4, L34+4
^AUTTEDT - [#9999999.09]	L26B+9, L26B+10, L26C+10, L26C+11
^BUDQIL - [#90665.4]	N+1
^BUDQIL("B"	HI+12
^DPT - [#2]	MCD+8, MCD+9, MCD+11, MCR+6, MCR+7, MCR+10, MCRX+4
^TMP($J	SCHOOL+4
^XTMP("BUDARPT1"	SHI+4, TINS+13, MIGRANT+5, MIGRANT+9, HOMELESS+9, VET+2, SCHOOL+7*

Name	Line Occurrences
$$HOMEL	HOMELESS+1
$$MCD	INS+14, INS+16
$$MCR	INS+4
$$MIG	MIGRANT+1
$$OPI	INS+10
$$OPIC	INS+12
$$PI	INS+2
$$TPL	INS+21
$$WC	INS+19
HI	T4+1
HOMELESS	T4+4
INS	T4+2
MCDX	MCD+8, MCD+9, MCD+10, MCD+11
MCRPIX	MCRX+3, MCRX+4
MCRX	MCR+6, MCR+7, MCR+8, MCR+9, MCR+10
MIGRANT	T4+3
N	HI+15
SCHOOL	T4+5
SHI	HI+5, HI+7, HI+8, N+4, N+5, N+6, N+7
TINS	INS+3, INS+5, INS+9, INS+11, INS+13, INS+15, INS+17, INS+20, INS+22, INS+26
VET	T4+6

Name	Field # of Occurrence
^(	MCD+11, MCR+10, MCRX+4
^(0	GUAR+5, GUAR+6, MCD+22, MCR+14, MCRX+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	L27+2, L27+3, L27+4, L27+5, L27+6, L28+2, L28+3, L28+4, L28+5, L28+6 , L29+2, L29+3, L29+4, L29+5, L29+6, L30+2, L30+3, L30+4, L30+5, L30+6 , L31+4, L31+5, L31+6, L31+7, L31+8, L31POV+3, L31POV+4, L31POV+5, L31POV+6, L32+2* , L32+3, L32+4, L32+5, L32+6, L33+2, L33+3, L33+4, L33+5, L33+6, L33+10 , L33+11, L34+2, L34+3, L34+4, L34+5, L34+6, L34+10, L34+11, L26A+3, L26A+4 , L26A+5, GUAR+1~, GUAR+2, GUAR+7, GUAR+8, TINS~, TINS+1, TINS+2, TINS+3, TINS+4
BD	GUAR~, GUAR+6, WC~, WC+4, WC+9, WC+12, TPL~, TPL+3, TPL+8
>> BUDAGE	SHI+4, INS+3, INS+5, INS+9, INS+11, INS+13, INS+15, INS+17, INS+20, INS+22 , INS+26, TINS+13, MIGRANT+5, MIGRANT+9, HOMELESS+9, VET+2, SCHOOL+7
>> BUDBD	INS+19, INS+21
>> BUDCAD	L26+1
>> BUDCOM	SHI+4, TINS+13, MIGRANT+5, MIGRANT+9, HOMELESS+9, VET+2, SCHOOL+7
>> BUDED	INS+19, INS+21
>> BUDH	SHI+4, TINS+13, MIGRANT+5, MIGRANT+9, HOMELESS+9, VET+2, SCHOOL+7
>> BUDHAS	INS+1, INS+2, INS+3, INS+4, INS+5, INS+8, INS+9, INS+10, INS+11, INS+12 , INS+13, INS+14, INS+15, INS+16, INS+17, INS+19, INS+20, INS+21, INS+22
>> BUDJ	SHI+4, TINS+13, MIGRANT+5, MIGRANT+9, HOMELESS+9, VET+2, SCHOOL+7
>> BUDLASTV	INS+2, INS+4, INS+8, INS+10, INS+12, INS+14, INS+16, MIGRANT+1, HOMELESS+1
>> BUDNIH	HI+1, HI+4, HI+5, HI+12
>> BUDSEX	SHI+4, TINS+13, MIGRANT+5, MIGRANT+9, HOMELESS+9, VET+2, SCHOOL+7
>> BUDSITE	HI+14
>> BUDT4CHA	MIGRANT+4, MIGRANT+7
>> BUDT4IPP	SHI+3
>> BUDT4PMI	TINS+5
>> BUDT4V(	SHI+1, TINS+1
>> BUDT4V(10	TINS+4*
>> BUDT4V(12	TINS+2*
>> BUDT4V(14	MIGRANT+3*
>> BUDT4V(15	MIGRANT+6*
>> BUDT4V(16	MIGRANT+3, MIGRANT+6
>> BUDT4V(17	HOMELESS+3*
>> BUDT4V(18	HOMELESS+4*
>> BUDT4V(19	HOMELESS+5*
>> BUDT4V(20	HOMELESS+6*
>> BUDT4V(21	HOMELESS+7*
>> BUDT4V(22	HOMELESS+8*
>> BUDT4V(23	HOMELESS+3, HOMELESS+4, HOMELESS+5, HOMELESS+6, HOMELESS+7, HOMELESS+8
>> BUDT4V(24	SCHOOL+6*
>> BUDT4V(25	VET+2*
>> BUDT4V(6	SHI+2*
>> BUDT4V(8	TINS+3*
>> BUDTHI	HI+1, HI+6, HI+7, HI+8, HI+9, HI+10, HI+11*, N+2
>> BUDTHIP	HI+1, HI+2, HI+3*, HI+9, HI+10, HI+11
BUDV	L27~, L27+1, L27+9, L26B~, L26B+1, L26B+6, L26C~, L26C+2, L26C+7, L26C+16 , L28~, L28+1, L28+9, L29~, L29+1, L29+9, L30~, L30+1, L30+9, L31~ , L31+3, L31+11, L31POV+2, L32~, L32+1, L32+9, L33~, L33+1, L33+9, L34~ , L34+1, L34+9, L26~, L26+1, L26+2, L26+3, L26+4, L26A~, L26A+3, L26A+6 , L26D~, L26D+2
D	MCD~, MCD+4, MCD+11, MCD+21, MCD+22, PI~, OPIC~, OPI~, MCR~, MCR+3 , MCR+10, MCR+13, MCR+14, MCRX+4, MCRX+15, MCRX+16, MIG~, MIG+6, HOMEL~, HOMEL+6
>> DFN	L26A+3, SHI+4, HI+2, HI+4, HI+6, INS+2, INS+4, INS+8, INS+10, INS+12 , INS+14, INS+16, INS+19, INS+21, TINS+13, MIGRANT+1, MIGRANT+5, MIGRANT+9, HOMELESS+1, HOMELESS+9 , VET+1, VET+2, SCHOOL+7
ED	GUAR~, GUAR+5, WC~, WC+7, WC+8, WC+11, TPL~, TPL+5, TPL+7
>> G	L27+1, L27+6, L27+8, L27+9, L27+11, L27+13, L26B+1, L26B+3, L26B+5, L26B+6 , L26B+11, L26B+12, L26C+2, L26C+4, L26C+6, L26C+7, L26C+12, L26C+13, L26C+14, L26C+15 , L26C+16, L26C+18, L26C+19, L28+1, L28+6, L28+8, L28+9, L28+11, L28+13, L29+1 , L29+6, L29+8, L29+9, L29+11, L29+13, L30+1, L30+6, L30+8, L30+9, L30+11* , L30+13, L31+1, L31+3, L31+8, L31+10, L31+11, L31+13, L31+15, L31POV+1, L31POV+2 , L31POV+6, L31POV+8, L32+1, L32+6, L32+8, L32+9, L32+11, L32+13, L33+1, L33+6* , L33+8, L33+9, L33+11, L33+13, L34+1, L34+6, L34+8, L34+9, L34+11, L34+13 , L26+4, L26+6, L26+7, L26A+2, L26A+4, L26A+5, L26A+6, L26A+8, L26A+10, L26D+1 , L26D+2, L26D+4, L26D+6, MCRX+5, MCRX+9, MCRX+10, MCRX+11, MCRX+12, MCRX+13, MCRX+14
>> H	HOMELESS+1*, HOMELESS+2, HOMELESS+3, HOMELESS+4, HOMELESS+5, HOMELESS+6, HOMELESS+7, HOMELESS+8
I	MCD+6~, MCD+12, MCD+13, MCD+14, MCD+16, MCD+20, MCD+22, MCR+4~, MCR+11, MCR+12* , MCR+13, MCR+14, MCRX+5, MCRX+6, MCRX+7, MCRX+8, MCRX+15, MCRX+16
J	MCD+6~, MCD+20*, MCD+21, MCD+22
L	HOMELESS+3, HOMELESS+4, HOMELESS+5, HOMELESS+6, HOMELESS+7, HOMELESS+8, HOMELESS+9, MIG+3~, MIG+4, MIG+10 , MIG+11, MIG+12, MIG+13, HOMEL+3~, HOMEL+4, HOMEL+9, HOMEL+10, HOMEL+11, HOMEL+12
LV	SHI~, SHI+4
>> M	MIGRANT+1*, MIGRANT+2, MIGRANT+3, MIGRANT+6
N	MCD+6~, MCD+16, MCD+17, MCD+18, MCD+19
P	HI+13, HI+16, HI+17, HI+18, HI+19, N+1, GUAR~, GUAR+3, GUAR+4, GUAR+5 , GUAR+6, WC~, WC+3, WC+7, WC+10, WC+11, WC+12, TPL~, TPL+5, TPL+6 , TPL+7, TPL+8, TINS~, TINS+1, TINS+3, TINS+4, TINS+6, TINS+7, TINS+8, TINS+9 , TINS+10, TINS+11*, TINS+12, TINS+13, MCD~, MCD+3, MCD+8, MCD+9, MCD+10, MCD+11 , MCD+12, PI~, OPIC~, OPI~, MCR~, MCR+2, MCR+6, MCR+7, MCR+8, MCR+9 , MCR+10, MCR+12, MCR+13, MCR+14, MCRX+3, MCRX+4, MCRX+6, MCRX+7, MCRX+8, MCRX+15 , MCRX+16, MIG~, MIG+2, MIG+5, MIG+7, MIG+8, MIG+12, MIG+13, HOMEL~, HOMEL+2 , HOMEL+5, HOMEL+7, HOMEL+8, HOMEL+11, HOMEL+12
S	HI+14, HI+15, SCHOOL+2~, SCHOOL+3, SCHOOL+4*, SCHOOL+5
SD	WC+1~, WC+4, WC+7, WC+8, WC+9, WC+10, TPL+1~, TPL+3, TPL+5, TPL+6
T	L26+4, HI+13, HI+16, HI+17, TINS+6, TINS+7, TINS+8, TINS+9, TINS+10, TINS+11* , TINS+12, TINS+13, MCD~, MCD+5, MCD+18, MCD+19, OPIC~, OPI~, MIGRANT+5, MIGRANT+8 , MIGRANT+9, HOMELESS+3, HOMELESS+4, HOMELESS+5, HOMELESS+6, HOMELESS+7, HOMELESS+8, HOMELESS+9, VET+2*
U	L27+2, L27+4, L26B+7, L26B+10, L26C+8, L26C+11, L28+2, L28+4, L29+2, L29+4 , L30+2, L30+4, L31+4, L31+6, L31POV+3, L31POV+5, L32+2, L32+4, L33+2, L33+4 , L34+2, L34+4, L26+1, L26+5, N+1, GUAR+5, GUAR+6, WC+11, WC+12, TPL+7 , TPL+8, TINS+1, TINS+2, TINS+3, TINS+4, MCD+7, MCD+9, MCD+11, MCD+14, MCD+22 , MCR+5, MCR+7, MCR+10, MCR+13, MCR+14, MCRX+4, MCRX+7, MCRX+8, MCRX+9, MCRX+10 , MCRX+11, MCRX+12, MCRX+13, MCRX+15, MCRX+16, MIGRANT+3, MIGRANT+6, HOMELESS+3, HOMELESS+4, HOMELESS+5 , HOMELESS+6, HOMELESS+7, HOMELESS+8, MIG+8, MIG+12, MIG+13, HOMEL+8, HOMEL+11, HOMEL+12
V	L27+1, L27+2, L28+1, L28+2, L29+1, L29+2, L30+1, L30+2, L31+3, L31+4 , L31POV+2, L31POV+3, L32+1, L32+2, L33+1, L33+2, L33+9, L33+10, L34+1, L34+2 , L34+9, L34+10, SHI~, SHI+1, SHI+4, VET+1, VET+2, SCHOOL+2~
X	L27+9, L27+10, L26B+1, L26B+2, L26B+6, L26B+7, L26C+2, L26C+3, L26C+7, L26C+8 , L26C+16, L26C+17, L28+9, L28+10, L29+9, L29+10, L30+9, L30+10, L31+11, L31+12 , L32+9, L32+10, L26+4, L26+5, L26A+6, L26A+7, L26D+2, L26D+3, HI+12, N+1 , GUAR+1~, GUAR+3, GUAR+4, GUAR+5, GUAR+6, WC+1~, WC+10, WC+11, WC+12, TPL+1~ , TPL+6, TPL+7, TPL+8, MCRX+8, MCRX+9, MCRX+10, MCRX+11, MCRX+12, MCRX+13, SCHOOL+2~ , SCHOOL+4, MIG+3~, MIG+5, MIG+6, MIG+7, HOMEL+3~, HOMEL+5, HOMEL+6, HOMEL+7
Y	N+1, N+2, GUAR+1~, GUAR+2, GUAR+4, GUAR+5, GUAR+6, WC+1~, WC+6, WC+13* , WC+14, TPL+1~, TPL+4, TPL+9, TPL+10, MCD+6~, MCD+7, MCD+23, MCDX+1, MCR+4~ , MCR+5, MCR+15, MCRX+1, MCRX+17, MCRPIX+1, SCHOOL+2~, MIG+3~, MIG+7, MIG+8, MIG+10 , HOMEL+3~, HOMEL+7*, HOMEL+8, HOMEL+9
Z	L27+10, L27+11, L26B+2, L26B+3, L26B+7, L26B+8, L26B+9, L26B+10, L26B+11, L26C+3* , L26C+4, L26C+8, L26C+9, L26C+10, L26C+11, L26C+12, L26C+13, L26C+14, L26C+17, L26C+18 , L28+10, L28+11, L29+10, L29+11, L30+10, L30+11, L31+12, L31+13, L32+10, L32+11 , L26+5, L26+6, L26A+7, L26A+8, L26D+3, L26D+4, N+2, N+3, N+4, N+5 , N+6, GUAR+1~, WC+1~, TPL+1~, MCD+6~, MCD+14, MIG+3~, HOMEL+3~

Customize PDF page

Package: IHS Uniform Data System

Routine: BUDARPC2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: