Routine: BGP8D3A

Package	Total	Call Graph
IHS GPRA Information System	5	$$ANCONT^BGP8D31 ($$CPT,$$CPTI,$$LASTITEM)^BGP8DU $$DATE^BGP8UTL $$NMIREF^BGP8UTL1 $$ICD^BGP8UTL2
Patient Care Component Reports	2	$$START1^APCLDF $$VD^APCLV
DRG Grouper	1	($$CODEN,$$CPT)^ICPTCOD
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMADD,$$FMTE)^XLFDT

Package	Total	Caller Graph
IHS GPRA Information System	4	BGP8D21 BGP8D3 BGP8D3B BGP8PC5

Name	Comments	DBIA/ICR reference
LASTTDN	;
HRPL	;
HIGHR(P,EDATE)	;EP
HRPLP	;
DTAPTD(P,BDATE,EDATE)	;EP
SEALDEV(P,BDATE,EDATE)	;EP
HIGHRP(P,EDATE)	;EP
GA(P,BDATE,EDATE)	;EP
SEAL(P,BDATE,EDATE)	;EP
SEALR(P,BDATE,EDATE)	;EP
DTAP(P,BDATE,EDATE)	;EP
TF(P,BDATE,EDATE)	;EP

Name	Field # of Occurrence
$$START1^APCLDF	SEALDEV+4, TF+6, SEAL+7, SEALR+7, HIGHR+5, DTAPTD+10, HIGHRP+5, GA+6
$$VD^APCLV	TF+10, TF+16, TF+22, TF+26, SEAL+19, SEAL+20, SEAL+28, SEALR+18, SEALR+19, SEALR+27 , GA+29
$$DOB^AUPNPAT	DTAP+19, DTAP+27, DTAPTD+16, DTAPTD+24, DTAPTD+27, DTAPTD+30
$$ANCONT^BGP8D31	DTAP+16, DTAPTD+13
$$CPT^BGP8DU	DTAPTD+8
$$CPTI^BGP8DU	DTAP+12
$$LASTITEM^BGP8DU	DTAP+7
$$DATE^BGP8UTL	SEALDEV+4, SEALDEV+6, DTAP+8, DTAP+13, DTAP+17, DTAP+25, DTAP+28, DTAPTD+5, DTAPTD+9, DTAPTD+11 , DTAPTD+14, DTAPTD+22, DTAPTD+25, DTAPTD+28, DTAPTD+31, GA+29
$$NMIREF^BGP8UTL1	DTAP+27, DTAPTD+24, DTAPTD+27, DTAPTD+30
$$ICD^BGP8UTL2	TF+16, TF+22, TF+26, HRPL+9, HRPLP+9, GA+14, GA+26
$$CODEN^ICPTCOD	DTAP+11, DTAP+26, DTAPTD+23, DTAPTD+26, DTAPTD+29
$$CPT^ICPTCOD	SEAL+26, SEALR+25
$$VAL^XBDIQ1	TF+10, TF+16, TF+22, TF+26
$$FMADD^XLFDT	HIGHR+3, HIGHRP+3
$$FMTE^XLFDT	TF+6, SEAL+7, SEALR+7, GA+6

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	TF+10, GA+10, GA+22
^ATXAX("B"	TF+5, TF+16, TF+22, TF+26, HRPL+2, DTAPTD+7, HRPLP+2, GA+5, GA+14, GA+18 , GA+26
^AUPNPREF - [#9000022]	DTAP+22, DTAP+23, DTAPTD+19, DTAPTD+20
^AUPNPREF("AA"	DTAP+22, DTAPTD+19
^AUPNPROB - [#9000011]	HRPL+4, HRPL+5, HRPL+6, HRPL+7, HRPL+8, HRPLP+4, HRPLP+5, HRPLP+6, HRPLP+7, HRPLP+8
^AUPNPROB("AC"	HRPL+3, HRPLP+3
^AUPNVCPT - [#9000010.18]	TF+14, TF+16, SEAL+24, SEAL+27, SEAL+28, SEALR+23, SEALR+26, SEALR+27, GA+12, GA+24
^AUPNVCPT("AD"	TF+13, SEAL+23, SEALR+22, GA+11, GA+23
^AUPNVDEN - [#9000010.05]	TF+9, TF+10, SEAL+10, SEAL+13, SEAL+14, SEAL+19, SEAL+20, SEALR+10, SEALR+14, SEALR+18 , SEALR+19, GA+9, GA+21
^AUPNVDEN("AD"	TF+8, SEAL+9, SEALR+9, GA+8, GA+20
^AUPNVIMM - [#9000010.11]	LASTTDN+2, LASTTDN+5
^AUPNVIMM("AC"	LASTTDN+1
^AUPNVPOV - [#9000010.07]	TF+25, TF+26
^AUPNVPOV("AD"	TF+24
^AUPNVSIT - [#9000010]	LASTTDN+6
^AUPNVTC - [#9000010.33]	TF+19, TF+20, TF+22
^AUPNVTC("AD"	TF+18
^AUTTADA - [#9999999.31]	SEAL+10, SEALR+10
^AUTTIMM - [#9999999.14]	LASTTDN+3, LASTTDN+4
^AUTTIMM("C"	DTAP+21, DTAPTD+18
^TMP($J	TF+3!, TF+7, SEAL+4!, SEAL+8, SEALR+4!, SEALR+8, GA+3!, GA+7

Name	Line Occurrences
HRPL	HIGHR+6, HIGHRP+6
LASTTDN	DTAPTD+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SEALDEV+1~, SEALDEV+4, SEALDEV+5, SEALDEV+6, SEALDEV+7, TF+1~, TF+6, SEAL+1~, SEAL+7, SEALR+1~ , SEALR+7, DTAPTD+10, GA+1~, GA+6
%DT	DTAPTD+1~
A	TF+1~, TF+4, TF+6, TF+9, TF+10, TF+14, TF+15, TF+16, TF+25, TF+26 , SEAL+1~, SEAL+5, SEAL+7, SEAL+10, SEAL+11, SEAL+19, SEAL+20, SEAL+24, SEAL+25, SEAL+26 , SEALR+1~, SEALR+5, SEALR+7, SEALR+10, SEALR+11, SEALR+18, SEALR+23, SEALR+24, SEALR+25, GA+1~ , GA+4, GA+6, GA+9, GA+10, GA+12, GA+13, GA+14, GA+21, GA+22, GA+24* , GA+25, GA+26
B	DTAP+19, DTAP+22, DTAP+26, DTAP+27, DTAPTD+1~, DTAPTD+16, DTAPTD+19, DTAPTD+23, DTAPTD+24, DTAPTD+26* , DTAPTD+27, DTAPTD+29*, DTAPTD+30
BD	DTAP+1!, DTAPTD+1~
BDATE	SEALDEV~, SEALDEV+4, TF~, TF+6, SEAL~, SEAL+7, SEALR~, SEALR+7, HIGHR+2~, HIGHR+3* , HIGHR+5, DTAP~, DTAP+7, DTAP+12, DTAPTD~, DTAPTD+8, DTAPTD+10, LASTTDN+7, HIGHRP+2~, HIGHRP+3* , HIGHRP+5, GA~, GA+6
BDM	DTAPTD+1~
BGPC	SEALDEV+1~, SEALDEV+2, TF+2, TF+7, TF+8, TF+10, TF+13, TF+16, TF+18, TF+22* , TF+24, TF+26, TF+28, SEAL+1~, SEAL+6, SEAL+29, SEAL+30, SEAL+31, SEALR+1~, SEALR+6* , SEALR+28, SEALR+29, SEALR+30, DTAP+1!, DTAPTD+1~, GA+1~, GA+2*
BGPCNT	SEAL+1~, SEAL+3, SEAL+19, SEAL+20, SEAL+28, SEALR+1~, SEALR+3, SEALR+18, SEALR+19, SEALR+27
BGPG	SEALDEV+1~, SEALDEV+3!, TF+2!, SEAL+1~, SEAL+2!, SEALR+1~, SEALR+2!, HIGHR+2~, DTAP+1!, DTAPTD+1~ , DTAPTD+10!, HIGHRP+2~, GA+2!
BGPG(	SEALDEV+6, HIGHR+7, HIGHR+8, HIGHRP+7, HIGHRP+8
BGPG(1	SEALDEV+6, HIGHR+6, DTAPTD+11, HIGHRP+6
BGPGA	GA+1~, GA+16*, GA+27, GA+30
BGPGASSC	GA+1~, GA+28*, GA+30
BGPIMM	DTAP+1!, DTAP+20, DTAP+21, DTAPTD+1~, DTAPTD+17, DTAPTD+18
BGPJ	TF+1~, GA+1~
>> BGPNMI	DTAP+19, DTAPTD+16
>> BGPSEAL	SEAL+31*
>> BGPSEALR	SEALR+30*
>> BGPSEALS(	SEAL+19, SEAL+20, SEAL+28, SEALR+18, SEALR+19, SEALR+27
BGPVARI	DTAP+1!, DTAP+3!, DTAPTD+1~, DTAPTD+8*, DTAPTD+9
BGPX	SEALDEV+1~, SEAL+1~, SEAL+2!, SEALR+1~, SEALR+2!, DTAP+1!, DTAP+7, DTAP+8, DTAP+13*, DTAP+14 , DTAPTD+1~
BGPX(	SEAL+16, SEAL+17, SEAL+18, SEAL+29, SEALR+16, SEALR+17*, SEALR+28
BGPX("CPT"	SEAL+28, SEAL+30, SEALR+27, SEALR+29
BGPX("NO OS"	SEAL+20, SEALR+19
BGPZ	TF+1~, TF+2!, DTAP+1!, DTAP+16, DTAPTD+1~, DTAPTD+13, GA+1~, GA+2!
BGPZ(	GA+10, GA+14, GA+16, GA+19, GA+22, GA+26, GA+28, GA+29
C	HIGHR+2~, HIGHR+4, HIGHR+11, HIGHR+12, DTAP+1!, DTAP+11, DTAP+12, DTAPTD+1~, HIGHRP+2~, HIGHRP+4 , HIGHRP+11*, HIGHRP+12
D	HIGHR+2~, HIGHR+8, HIGHR+9, HIGHR+10, DTAP+1!, DTAP+12, DTAP+13, DTAP+22, DTAP+24, DTAPTD+1~ , DTAPTD+19, DTAPTD+21, LASTTDN+5, LASTTDN+6, LASTTDN+7, LASTTDN+8, LASTTDN+9, LASTTDN+10, LASTTDN+11, LASTTDN+12 , LASTTDN+13, HIGHRP+2~, HIGHRP+8*, HIGHRP+9, HIGHRP+10
E	SEALDEV+4, TF+6, SEAL+7, SEALR+7, HIGHR+5, DTAP+19, DTAP+22, DTAPTD+1~, DTAPTD+10, DTAPTD+16 , DTAPTD+19, HIGHRP+5, GA+6
ED	DTAP+1!, DTAPTD+1~
EDATE	SEALDEV~, SEALDEV+4, TF~, TF+6, SEAL~, SEAL+7, SEALR~, SEALR+7, HIGHR~, HIGHR+3 , HIGHR+5, HRPL+4, HRPL+5, DTAP~, DTAP+7, DTAP+12, DTAP+16, DTAP+19, DTAP+27, DTAPTD~ , DTAPTD+8, DTAPTD+10, DTAPTD+13, DTAPTD+16, DTAPTD+24, DTAPTD+27, DTAPTD+30, LASTTDN+8, HIGHRP~, HIGHRP+3 , HIGHRP+5, HRPLP+4, HRPLP+5, GA~, GA+6
G	TF+1~, TF+8, TF+10, TF+12, TF+13, TF+16, TF+17, TF+18, TF+22, TF+23 , TF+24, TF+26, SEAL+1~, SEAL+9, SEAL+12, SEAL+22, SEAL+23, SEALR+1~, SEALR+9, SEALR+12* , SEALR+21, SEALR+22, HIGHR+2~, HIGHR+4, HIGHR+7, HIGHR+12, HIGHR+13, HRPL+1, HRPL+3, HRPL+10* , HRPL+12, DTAP+27, DTAP+28, DTAPTD+1~, DTAPTD+24, DTAPTD+25, DTAPTD+27, DTAPTD+28, DTAPTD+30, DTAPTD+31 , HIGHRP+2~, HIGHRP+4, HIGHRP+7, HIGHRP+12, HIGHRP+13, HRPLP+1, HRPLP+3, HRPLP+10, HRPLP+12, GA+1~ , GA+8, GA+11, GA+23*
>> I	TF+20, TF+21, TF+22, DTAP+21, DTAP+22, DTAPTD+18*, DTAPTD+19
LTD	DTAPTD+1~, DTAPTD+4, DTAPTD+5, DTAPTD+9, DTAPTD+11, DTAPTD+12
P	SEALDEV~, SEALDEV+4, TF~, TF+6, SEAL~, SEAL+7, SEALR~, SEALR+7, HIGHR~, HIGHR+5 , HRPL+3, DTAP~, DTAP+7, DTAP+12, DTAP+16, DTAP+19, DTAP+22, DTAP+27, DTAPTD~, DTAPTD+8 , DTAPTD+10, DTAPTD+13, DTAPTD+16, DTAPTD+19, DTAPTD+24, DTAPTD+27, DTAPTD+30, LASTTDN+1, HIGHRP~, HIGHRP+5 , HRPLP+3, GA~, GA+6
R	TF+1~, DTAP+19, DTAP+24, DTAP+25, DTAP+26, DTAPTD+16, DTAPTD+21, DTAPTD+22, DTAPTD+23, DTAPTD+26* , DTAPTD+29*, GA+1~
S	SEAL+1~, SEAL+14, SEAL+15, SEAL+16, SEAL+17, SEAL+18, SEAL+20, SEALR+1~, SEALR+14, SEALR+15 , SEALR+16, SEALR+17, SEALR+19
T	SEALDEV+1~, TF+1~, TF+10, TF+16, TF+22, SEAL+1~, SEAL+13, SEAL+17, SEAL+18, SEAL+19 , SEAL+20, SEAL+27, SEAL+28, SEALR+1~, SEALR+13, SEALR+18, SEALR+19, SEALR+26, SEALR+27, HRPL+2* , HRPL+9, DTAPTD+1~, DTAPTD+7, DTAPTD+8, HRPLP+2, HRPLP+9, GA+1~
TDD	DTAPTD+1~, DTAPTD+2!
TDD(	DTAPTD+5
TDD(0	DTAPTD+4
TDD(9999999	LASTTDN+9, LASTTDN+10, LASTTDN+11, LASTTDN+12, LASTTDN+13*
TK	DTAPTD+1~
U	SEALDEV+6, TF+7, TF+8, TF+9, TF+10, TF+14, TF+16, TF+20, TF+22, TF+25 , TF+26, SEAL+8, SEAL+10, SEAL+13, SEAL+14, SEAL+19, SEAL+20, SEAL+24, SEAL+26, SEAL+27 , SEAL+28, SEALR+8, SEALR+10, SEALR+14, SEALR+18, SEALR+19, SEALR+23, SEALR+25, SEALR+26, SEALR+27 , HIGHR+8, HRPL+4, HRPL+5, HRPL+6, HRPL+7, HRPL+8, DTAP+8, DTAP+13, DTAP+14, DTAP+17 , DTAP+22, DTAP+23, DTAP+25, DTAP+28, DTAPTD+5, DTAPTD+9, DTAPTD+11, DTAPTD+12, DTAPTD+14, DTAPTD+19 , DTAPTD+20, DTAPTD+22, DTAPTD+25, DTAPTD+28, DTAPTD+31, LASTTDN+2, LASTTDN+4, LASTTDN+5, LASTTDN+6, HIGHRP+8 , HRPLP+4, HRPLP+5, HRPLP+6, HRPLP+7, HRPLP+8, GA+7, GA+9, GA+12, GA+21, GA+24 , GA+30
V	SEALDEV+1~, SEALDEV+6, TF+7, TF+8, TF+13, TF+18, TF+24, SEAL+1~, SEAL+8, SEAL+9 , SEAL+23, SEALR+1~, SEALR+8, SEALR+9, SEALR+22, HIGHR+2~, DTAP+1!, DTAPTD+1~, HIGHRP+2~, GA+7* , GA+8, GA+10, GA+11, GA+14, GA+19*, GA+20, GA+22, GA+23, GA+26
X	SEALDEV+1~, SEALDEV+5, SEALDEV+6, TF+1~, TF+7, SEAL+1~, SEAL+8, SEAL+29, SEALR+1~, SEALR+8 , SEALR+28, HIGHR+2~, HIGHR+5, HIGHR+7, HIGHR+8, HRPL+3, HRPL+4, HRPL+5, HRPL+6, HRPL+7 , HRPL+8, DTAP+1!, DTAP+16, DTAP+17, DTAP+22, DTAPTD+1~, DTAPTD+13, DTAPTD+14, DTAPTD+19, LASTTDN+1* , LASTTDN+2, LASTTDN+5, HIGHRP+2~, HIGHRP+5, HIGHRP+7, HIGHRP+8, HRPLP+3, HRPLP+4, HRPLP+5, HRPLP+6 , HRPLP+7, HRPLP+8, GA+1~, GA+7, GA+16, GA+28, GA+29*
Y	TF+1~, TF+7, TF+8, TF+9, TF+10, TF+13, TF+14, TF+16, TF+18, TF+19 , TF+20, TF+22, TF+24, TF+25, TF+26, SEAL+1~, SEAL+8, SEAL+9, SEAL+10, SEAL+13 , SEAL+14, SEAL+19, SEAL+20, SEAL+23, SEAL+24, SEAL+27, SEAL+28, SEALR+1~, SEALR+8, SEALR+9 , SEALR+10, SEALR+14, SEALR+18, SEALR+19, SEALR+22, SEALR+23, SEALR+26, SEALR+27, HIGHR+2~, HIGHR+4 , HIGHR+5, HIGHR+7!, HRPL+6, HRPL+9, DTAP+1!, DTAP+22, DTAP+23, DTAPTD+1~, DTAPTD+19, DTAPTD+20 , LASTTDN+2, LASTTDN+3, LASTTDN+4, LASTTDN+9, LASTTDN+10, LASTTDN+11, LASTTDN+12, LASTTDN+13, HIGHRP+2~, HIGHRP+4 , HIGHRP+5, HIGHRP+7!, HRPLP+6, HRPLP+9, GA+1~, GA+7, GA+8, GA+9, GA+11, GA+12 , GA+20, GA+21, GA+23, GA+24
Y(	HIGHR+9, HIGHR+10, HIGHRP+9, HIGHRP+10
Z	TF+1~, TF+5, TF+10, DTAPTD+1~, GA+1~, GA+5, GA+10, GA+18, GA+22, GA+29 , GA+30

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP8D3A

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: