Routine: BGP6UTL1

Package	Total	Call Graph
VA Fileman	2	^%DT ^DIWP
IHS GPRA Information System	1	($$CODEN,$$ICD,$$ICDDX,$$ICDOP)^BGP6UTL2
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Kernel	1	$$FMADD^XLFDT
Patient Care Component Reports	1	$$VD^APCLV

Package	Total	Caller Graph
IHS GPRA Information System	69	BGP0D61 BGP1D61 BGP6ALG1 BGP6C12 BGP6C2 BGP6CON1 BGP6CU BGP6CU1 BGP6D1 BGP6D10 BGP6D2 BGP6D21 BGP6D211 BGP6D212 BGP6D213 BGP6D22 BGP6D23 BGP6D25 BGP6D27 BGP6D3 BGP6D31 BGP6D34 BGP6D35 BGP6D37 BGP6D38 BGP6D3A BGP6D3B BGP6D3C BGP6D4 BGP6D42 BGP6D5 BGP6D52 BGP6D55 BGP6D6 BGP6D61 BGP6D62 BGP6D63 BGP6D64 BGP6D7 BGP6D71 BGP6D714 BGP6D72 BGP6D721 BGP6D724 BGP6D731 BGP6D74 BGP6D75 BGP6D83 BGP6D84 BGP6D841 BGP6D87 BGP6D88 BGP6D9 BGP6DHE1 BGP6DP1C BGP6DP2 BGP6DP3 BGP6DP7 BGP6DPA2 BGP6DPA4 BGP6EL2 BGP6EL3 BGP6EL4 BGP6ELL1 BGP6ELP1 BGP6PDL1 BGP6PDL2 BGP8D61 BGP9D61
IHS Uniform Data System	1	BUDCRP7B
iCare	1	BQIRGHEP

Name	Comments	DBIA/ICR reference
STI16B()	;EP
CPTREFT(P,BDATE,EDATE,T,RT)	;EP - return ien of CPT entry if patient had this CPT
LASTDX(P,T,BDATE,EDATE)	;EP
LASTDXI(P,T,BDATE,EDATE,SC)	;EP
LASTPRCI(P,T,BDATE,EDATE)	;EP
FIRSTPRC(P,T,BDATE,EDATE)	;EP
LASTPRC(P,T,BDATE,EDATE)	;EP
FIRSTCPT(P,T,BDATE,EDATE)	;EP
I1()	;EP
LABEL(ID,RT,PT,IT,ND)	;EP
STI16A()	;EP
LASTECOD(P,T,BDATE,EDATE)	;EP
RADREF(P,BDATE,EDATE,T)	;EP - return ien of CPT entry if patient had this CPT
I13()	;EP
I12()	;EP
PRCREFT(P,BDATE,EDATE,T)	;EP - return ien of proc
REFUSAL(P,F,I,B,E)	;EP
IA()	;EP
NMIREF(P,F,I,B,E)	;EP
REFTAX(P,F,T,B,E)	;EP - refused an item in a taxonomy
I17()	;EP
SETPRC(P,BDATE,EDATE,T,BGPG)	;EP
LABELE(ID,RT,PT,ND)	;EP
I25()	;EP

Name	Field # of Occurrence
^%DT	NMIREF+6, NMIREF+7, REFUSAL+6, REFUSAL+7, REFTAX+6, REFTAX+7
$$VD^APCLV	SETPRC+14
$$DOB^AUPNPAT	FIRSTCPT+2
$$CODEN^BGP6UTL2	LASTDXI+9, LASTPRCI+7
$$ICD^BGP6UTL2	SETPRC+13, LASTDX+16, LASTPRC+14, FIRSTPRC+12, FIRSTCPT+7, RADREF+10, LASTECOD+14, CPTREFT+10, PRCREFT+9
$$ICDDX^BGP6UTL2	LASTDX+17, LASTDXI+21, LASTECOD+14
$$ICDOP^BGP6UTL2	SETPRC+14, LASTPRC+15, LASTPRCI+16, FIRSTPRC+18, PRCREFT+10
^DIWP	LABEL+41, LABELE+14
$$VAL^XBDIQ1	LABEL+6, LABEL+7, LABEL+8, LABEL+10, LABEL+11, LABEL+12, LABEL+13, LABEL+14, LABEL+15, LABEL+16 , LABEL+17, LABEL+20, LABEL+21, LABEL+22, LABEL+24, LABEL+25, LABEL+26, LABEL+27, LABEL+28, LABEL+29 , LABEL+30, LABEL+31, LABEL+38, LABEL+39, LABEL+40, LABELE+5, LABELE+8, FIRSTCPT+17
$$VALI^XBDIQ1	LABEL+37
$$FMADD^XLFDT	RADREF+4, CPTREFT+5, PRCREFT+4

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	REFTAX+8
^ATXAX("B"	SETPRC+7, LASTDX+7, LASTPRC+6, FIRSTPRC+6, FIRSTCPT+5, LASTECOD+6
^AUPNPREF - [#9000022]	NMIREF+10, NMIREF+11, REFUSAL+8, RADREF+8, RADREF+11, REFTAX+9, CPTREFT+9, CPTREFT+11, CPTREFT+12, PRCREFT+8 , PRCREFT+10
^AUPNPREF("AA"	NMIREF+8, NMIREF+9, REFUSAL+8, RADREF+7, RADREF+8, REFTAX+9, CPTREFT+8, CPTREFT+9, PRCREFT+7, PRCREFT+8
^AUPNVCPT("AA"	FIRSTCPT+6, FIRSTCPT+8, FIRSTCPT+12
^AUPNVPOV - [#9000010.07]	LASTDX+13, LASTDXI+15, LASTDXI+18, LASTECOD+12
^AUPNVPOV("AA"	LASTDX+11, LASTDX+12, LASTDXI+13, LASTDXI+14, LASTECOD+10, LASTECOD+11
^AUPNVPRC - [#9000010.08]	SETPRC+11, SETPRC+14, LASTPRC+12, LASTPRCI+13, FIRSTPRC+10, FIRSTPRC+13
^AUPNVPRC("AA"	LASTPRC+10, LASTPRC+11, LASTPRCI+11, LASTPRCI+12
^AUPNVPRC("AC"	SETPRC+10, FIRSTPRC+9
^AUPNVSIT - [#9000010]	LASTDXI+19, LASTDXI+20, FIRSTPRC+15
^BGPELIIM - [#90557.02]	LABELE+9
^BGPINDMC - [#90556.02]	LABEL+32
^DPT - [#2]	SETPRC+5, LASTDX+5, LASTDXI+6, LASTPRC+4, LASTPRCI+4, FIRSTPRC+4, LASTECOD+4
^ICD9 - [#80]	LASTDX+15
^ICPT - [#81]	RADREF+11, CPTREFT+12
^RAMIS(71 - [#71]	RADREF+9, RADREF+11
^UTILITY($J	LABEL+41!, LABEL+42, LABEL+43!, LABELE+14!, LABELE+15, LABELE+16!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	NMIREF+6~, NMIREF+7, REFUSAL+6~, REFUSAL+7, REFTAX+6~, REFTAX+7
B	NMIREF~, NMIREF+4, NMIREF+6, NMIREF+11, REFUSAL~, REFUSAL+4, REFUSAL+6, REFUSAL+8, REFTAX~, REFTAX+4 , REFTAX+6*, REFTAX+9
BDATE	SETPRC~, SETPRC+5, LASTDX~, LASTDX+5, LASTDX+10, LASTDXI~, LASTDXI+6, LASTDXI+12, LASTPRC~, LASTPRC+4 , LASTPRC+9, LASTPRCI~, LASTPRCI+4, LASTPRCI+10, FIRSTPRC~, FIRSTPRC+4, FIRSTPRC+16, FIRSTCPT~, FIRSTCPT+2, FIRSTCPT+11 , RADREF~, RADREF+4, RADREF+8, LASTECOD~, LASTECOD+4, LASTECOD+9, CPTREFT~, CPTREFT+5, CPTREFT+9, PRCREFT~ , PRCREFT+4*, PRCREFT+8
>> BGPACTCL	STI16A+1
>> BGPACTUP	I12+5, STI16B+1
>> BGPAGEB	I1+2, I1+3
>> BGPD1	I13+3, I13+4, I13+5, IA+10, I17+1, I25+2
>> BGPD2	I13+1, I13+2, I13+5, IA+10
>> BGPD3	I12+3, I12+4, I13+3, I13+4, I13+5, IA+10
>> BGPD4	I12+2, I13+5, IA+10, STI16A+2, STI16B+2
>> BGPD5	I13+5, IA+10
>> BGPD6	I13+5, IA+10
>> BGPD7	I12+3, I12+4, I13+5, IA+4, IA+5, IA+6, IA+10
>> BGPD8	I13+5, IA+7, IA+8, IA+9, IA+10
>> BGPD9	I13+5
>> BGPDMD2	I25+1
BGPDX1	SETPRC+2~, SETPRC+4, SETPRC+10, SETPRC+11, SETPRC+14, LASTDX+3~, LASTDX+4, LASTDX+11, LASTDX+12, LASTDX+17 , LASTDXI+4~, LASTDXI+5, LASTDXI+13, LASTDXI+14, LASTDXI+21, LASTPRC+3, LASTPRC+10, LASTPRC+11, LASTPRC+15, LASTPRCI+3* , LASTPRCI+11, LASTPRCI+12, LASTPRCI+16, FIRSTPRC+3, LASTECOD+3, LASTECOD+10, LASTECOD+11, LASTECOD+14
BGPDX2	SETPRC+2~, SETPRC+4, LASTDX+3~, LASTDX+4, LASTDX+12, LASTDX+13, LASTDX+17, LASTDXI+4~, LASTDXI+5, LASTDXI+14* , LASTDXI+15, LASTDXI+18, LASTDXI+21, LASTPRC+3, LASTPRC+11, LASTPRC+12, LASTPRC+15, LASTPRCI+3, LASTPRCI+12, LASTPRCI+13 , LASTPRCI+16, FIRSTPRC+3, LASTECOD+3, LASTECOD+11*, LASTECOD+12, LASTECOD+14
BGPDX3	SETPRC+2~, SETPRC+4, SETPRC+11, SETPRC+12, SETPRC+13, SETPRC+14, LASTDX+3~, LASTDX+4, LASTDX+13, LASTDX+14 , LASTDX+15, LASTDX+16, LASTDX+17, LASTDXI+4~, LASTDXI+5, LASTDXI+15, LASTDXI+16, LASTDXI+17, LASTDXI+21, LASTPRC+3* , LASTPRC+12, LASTPRC+13, LASTPRC+14, LASTPRC+15, LASTPRCI+3, LASTPRCI+13, LASTPRCI+14, LASTPRCI+15, LASTPRCI+16, FIRSTPRC+3 , FIRSTPRC+10, FIRSTPRC+11, FIRSTPRC+12, FIRSTPRC+18, LASTECOD+3, LASTECOD+12*, LASTECOD+13, LASTECOD+14
BGPDX4	SETPRC+2~, SETPRC+4, SETPRC+9, SETPRC+14, LASTDX+3~, LASTDX+4, LASTDX+9, LASTDX+11, LASTDX+12, LASTDX+17 , LASTDX+20, LASTDXI+4~, LASTDXI+5, LASTDXI+11, LASTDXI+13, LASTDXI+14, LASTDXI+21, LASTDXI+24, LASTPRC+3, LASTPRC+8* , LASTPRC+10, LASTPRC+11, LASTPRC+15, LASTPRC+18, LASTPRCI+3, LASTPRCI+9, LASTPRCI+11, LASTPRCI+12, LASTPRCI+16, LASTPRCI+19 , FIRSTPRC+3, FIRSTPRC+8, FIRSTPRC+9, FIRSTPRC+18, FIRSTPRC+20, LASTECOD+3, LASTECOD+8, LASTECOD+10, LASTECOD+11, LASTECOD+14 , LASTECOD+17
BGPDX5	LASTDXI+4~
>> BGPDX6	LASTECOD+3, LASTECOD+12
>> BGPDX7	LASTECOD+3*
>> BGPDXBD	LASTDX+10, LASTDX+11, LASTDXI+12, LASTDXI+13, LASTPRC+9, LASTPRC+10, LASTPRCI+10, LASTPRCI+11, LASTECOD+9*, LASTECOD+10
>> BGPDXED	LASTDX+10, LASTDX+11, LASTDXI+12, LASTDXI+13, LASTPRC+9, LASTPRC+10, LASTPRCI+10, LASTPRCI+11, LASTECOD+9*, LASTECOD+10
BGPDXV	LASTDXI+4~, LASTDXI+18*, LASTDXI+19, LASTDXI+20
BGPG	SETPRC~, SETPRC+1!
BGPG(	SETPRC+14*
>> BGPINDM	I1+2, I1+3, I12+1, I12+2, I12+3, I12+4, I13+1, I13+2, I13+3, I13+4 , IA+4, IA+5, IA+6, IA+7, IA+8, IA+9, IA+10, I17+2, I25+1, I25+3
>> BGPN1	IA+3
>> BGPN18	STI16A+3, STI16B+3
>> BGPN9	STI16A+2, STI16B+2
>> BGPSEX	I17+2, I25+3
BGPT	FIRSTCPT+4~, FIRSTCPT+5*, FIRSTCPT+7
BGPTX5	SETPRC+2~, SETPRC+4, SETPRC+7, SETPRC+8, SETPRC+13, LASTDX+3~, LASTDX+4, LASTDX+7, LASTDX+8, LASTDX+16 , LASTDXI+4~, LASTDXI+5, LASTDXI+9, LASTDXI+10, LASTDXI+17, LASTPRC+3, LASTPRC+6, LASTPRC+7, LASTPRC+14, LASTPRCI+3* , LASTPRCI+7, LASTPRCI+8, LASTPRCI+15, FIRSTPRC+3, FIRSTPRC+6, FIRSTPRC+7, FIRSTPRC+12, LASTECOD+3, LASTECOD+6*, LASTECOD+7 , LASTECOD+14
>> BGPVALUE	I1+1, I1+2, I1+3, I1+4
>> BGPX	FIRSTPRC+9*, FIRSTPRC+10, FIRSTPRC+13, FIRSTPRC+18
C	FIRSTCPT+4~, FIRSTCPT+6, FIRSTCPT+7, FIRSTCPT+8, FIRSTCPT+12, FIRSTCPT+16, FIRSTCPT+17, RADREF+9*, RADREF+10, RADREF+11
D	FIRSTPRC+13, FIRSTPRC+14, FIRSTPRC+15, FIRSTPRC+16, FIRSTPRC+17, FIRSTPRC+18, FIRSTCPT+4~, FIRSTCPT+8, FIRSTCPT+9, FIRSTCPT+12 , FIRSTCPT+16, FIRSTCPT+17, NMIREF+11, REFUSAL+8, RADREF+8, RADREF+11, REFTAX+9, CPTREFT+9, CPTREFT+12, PRCREFT+8 , PRCREFT+10
>> DIWL	LABEL+41, LABELE+14
>> DIWR	LABEL+41, LABELE+14
DT	SETPRC+6, LASTDX+6, LASTDXI+7, LASTPRC+5, LASTPRCI+5, FIRSTPRC+5, FIRSTCPT+3, LASTECOD+5
E	FIRSTCPT+9, FIRSTCPT+10, FIRSTCPT+11, FIRSTCPT+13, NMIREF~, NMIREF+5, NMIREF+7, NMIREF+11, REFUSAL~, REFUSAL+5 , REFUSAL+7, REFUSAL+8, REFTAX~, REFTAX+5, REFTAX+7, REFTAX+9
EDATE	SETPRC~, SETPRC+6, LASTDX~, LASTDX+6, LASTDX+10, LASTDXI~, LASTDXI+7, LASTDXI+12, LASTPRC~, LASTPRC+5 , LASTPRC+9, LASTPRCI~, LASTPRCI+5, LASTPRCI+10, FIRSTPRC~, FIRSTPRC+5, FIRSTPRC+17, FIRSTCPT~, FIRSTCPT+3, FIRSTCPT+10 , RADREF~, RADREF+3, RADREF+4, RADREF+8, LASTECOD~, LASTECOD+5, LASTECOD+9, CPTREFT~, CPTREFT+4, CPTREFT+5 , CPTREFT+9, PRCREFT~, PRCREFT+3, PRCREFT+4, PRCREFT+8
F	NMIREF~, NMIREF+2, NMIREF+8, NMIREF+9, REFUSAL~, REFUSAL+2, REFUSAL+8, REFTAX~, REFTAX+2, REFTAX+9
G	FIRSTCPT+4~, NMIREF+6~, NMIREF+8, NMIREF+11, NMIREF+12, REFUSAL+6~, REFUSAL+8, REFUSAL+9, RADREF+5~, RADREF+6 , RADREF+7, RADREF+8, RADREF+11, RADREF+13, REFTAX+6~, REFTAX+8, REFTAX+9, REFTAX+10, CPTREFT+6~, CPTREFT+7* , CPTREFT+8, CPTREFT+9, CPTREFT+12, CPTREFT+14, PRCREFT+5~, PRCREFT+6, PRCREFT+7, PRCREFT+8, PRCREFT+10*, PRCREFT+12
I	NMIREF~, NMIREF+3, NMIREF+8, NMIREF+9, REFUSAL~, REFUSAL+3, REFUSAL+8, RADREF+5~, RADREF+7, RADREF+8 , RADREF+9, RADREF+11, CPTREFT+6~, CPTREFT+8, CPTREFT+9, CPTREFT+10, CPTREFT+12, PRCREFT+5~, PRCREFT+7*, PRCREFT+8 , PRCREFT+9, PRCREFT+10
ID	LABEL~, LABEL+1, LABEL+6, LABEL+7, LABEL+8, LABEL+10, LABEL+11, LABEL+12, LABEL+13, LABEL+14 , LABEL+15, LABEL+16, LABEL+17, LABEL+20, LABEL+21, LABEL+22, LABEL+24, LABEL+25, LABEL+26, LABEL+27 , LABEL+28, LABEL+29, LABEL+30, LABEL+31, LABEL+32, LABEL+37, LABEL+38, LABEL+39, LABEL+40, LABELE~ , LABELE+1, LABELE+5, LABELE+8, LABELE+9
IT	LABEL~, LABEL+2*, LABEL+10, LABEL+11, LABEL+12, LABEL+13, LABEL+14, LABEL+15, LABEL+24, LABEL+25 , LABEL+26, LABEL+27, LABEL+28, LABEL+29
J	LABEL+35~, LABEL+39, LABEL+40
L	LABEL+3~, LABEL+6, LABEL+7, LABEL+8, LABEL+10, LABEL+11, LABEL+12, LABEL+13, LABEL+14, LABEL+15* , LABEL+16, LABEL+17, LABEL+20, LABEL+21, LABEL+22, LABEL+24, LABEL+25, LABEL+26, LABEL+27, LABEL+28 , LABEL+29, LABEL+30, LABEL+31, LABEL+32, LABEL+34, LABEL+41, LABELE+2~, LABELE+5, LABELE+8*, LABELE+9 , LABELE+11, LABELE+14
ND	LABEL~, LABEL+5, LABEL+19, LABEL+32, LABEL+37, LABELE~, LABELE+4, LABELE+7, LABELE+9
P	SETPRC~, SETPRC+5, SETPRC+10, LASTDX~, LASTDX+1, LASTDX+5, LASTDX+11, LASTDX+12, LASTDXI~, LASTDXI+1 , LASTDXI+6, LASTDXI+13, LASTDXI+14, LASTPRC~, LASTPRC+1, LASTPRC+4, LASTPRC+10, LASTPRC+11, LASTPRCI~, LASTPRCI+1 , LASTPRCI+4, LASTPRCI+11, LASTPRCI+12, FIRSTPRC~, FIRSTPRC+1, FIRSTPRC+4, FIRSTPRC+9, FIRSTCPT~, FIRSTCPT+1, FIRSTCPT+2 , FIRSTCPT+6, FIRSTCPT+8, FIRSTCPT+12, NMIREF~, NMIREF+1, NMIREF+8, NMIREF+9, REFUSAL~, REFUSAL+1, REFUSAL+8 , RADREF~, RADREF+1, RADREF+7, RADREF+8, LASTECOD~, LASTECOD+1, LASTECOD+4, LASTECOD+10, LASTECOD+11, REFTAX~ , REFTAX+1, REFTAX+9, CPTREFT~, CPTREFT+1, CPTREFT+8, CPTREFT+9, PRCREFT~, PRCREFT+1, PRCREFT+7, PRCREFT+8
PT	LABEL~, LABEL+34, LABELE~, LABELE+11
RL	LABEL+35~, LABEL+36, LABEL+37, LABEL+38, LABEL+39, LABEL+40, LABEL+42, LABEL+44, LABELE+12~, LABELE+13 , LABELE+15*, LABELE+17
RT	LABEL~, LABEL+6, LABEL+7, LABEL+8, LABEL+9, LABEL+20, LABEL+21, LABEL+22, LABEL+23, LABELE~ , CPTREFT~, CPTREFT+3*, CPTREFT+11
SC	LASTDXI~, LASTDXI+2*, LASTDXI+20
T	SETPRC~, SETPRC+7, LASTDX~, LASTDX+7, LASTDXI~, LASTDXI+9, LASTPRC~, LASTPRC+6, LASTPRCI~, LASTPRCI+7 , FIRSTPRC~, FIRSTPRC+6, FIRSTCPT~, FIRSTCPT+5, RADREF~, RADREF+2, RADREF+10, LASTECOD~, LASTECOD+6, REFTAX~ , REFTAX+3, REFTAX+8, CPTREFT~, CPTREFT+2, CPTREFT+10, PRCREFT~, PRCREFT+2, PRCREFT+9
T1	REFTAX+6~, REFTAX+8*, REFTAX+9
U	LABEL+32, LABEL+39, LABEL+40, LABEL+42, LABELE+9, LABELE+15, SETPRC+5, SETPRC+11, SETPRC+14, LASTDX+5 , LASTDX+13, LASTDX+17, LASTDXI+6, LASTDXI+15, LASTDXI+18, LASTDXI+20, LASTDXI+21, LASTPRC+4, LASTPRC+12, LASTPRC+15 , LASTPRCI+4, LASTPRCI+13, LASTPRCI+16, FIRSTPRC+4, FIRSTPRC+10, FIRSTPRC+13, FIRSTPRC+15, FIRSTPRC+18, FIRSTCPT+17, NMIREF+10 , NMIREF+11, REFUSAL+8, RADREF+7, RADREF+8, RADREF+9, RADREF+11, LASTECOD+4, LASTECOD+12, LASTECOD+14, REFTAX+9 , CPTREFT+8, CPTREFT+9, CPTREFT+11, CPTREFT+12, PRCREFT+7, PRCREFT+8, PRCREFT+10
X	LABEL+3~, LABEL+41, LABEL+42, LABELE+2~, LABELE+14, LABELE+15, NMIREF+6~, NMIREF+7, NMIREF+8, NMIREF+9 , REFUSAL+6~, REFUSAL+7, REFUSAL+8, RADREF+5~, RADREF+8, IA+2~, IA+3, IA+4, IA+5, IA+7 , IA+8, IA+10, REFTAX+6~, REFTAX+7, REFTAX+9, CPTREFT+6~, CPTREFT+9, PRCREFT+5~, PRCREFT+8*
Y	LABEL+3~, LABELE+2~, FIRSTCPT+4~, FIRSTCPT+12, FIRSTCPT+13, NMIREF+6~, NMIREF+7, NMIREF+9, NMIREF+10, NMIREF+11 , REFUSAL+6~, REFUSAL+7, REFUSAL+8, RADREF+5~, RADREF+8, RADREF+11, REFTAX+6~, REFTAX+7, REFTAX+9, CPTREFT+6~ , CPTREFT+9, CPTREFT+11, CPTREFT+12, PRCREFT+5~, PRCREFT+8*, PRCREFT+10
Y(	FIRSTCPT+13*, FIRSTCPT+16
Y(0	FIRSTCPT+15, FIRSTCPT+16
Z	RADREF+5~, CPTREFT+6~, PRCREFT+5~

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP6UTL1

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 71

Entry Points

External References

Global Variables Directly Accessed

Local Variables

Legend: