Routine: BGP8D3B

Package	Total	Call Graph
IHS GPRA Information System	10	OPTOM^BGP8D213 $$FLU^BGP8D3 $$ANCONT^BGP8D31 ($$DTAP,$$DTAPTD,$$HIGHRP)^BGP8D3A ($$FIRSTPDX,$$IZOSTER,$$LASTVD,$$PCV13,$$PPSV23)^BGP8D3C $$PREG^BGP8D7 $$CPTI^BGP8DU $$DATE^BGP8UTL ($$CPTREFT,$$LASTDX,$$NMIREF)^BGP8UTL1 $$EDD^BGP8UTL2
DRG Grouper	1	$$CODEN^ICPTCOD
IHS Patient	1	$$DOB^AUPNPAT
Kernel	1	$$FMADD^XLFDT
Patient Care Component Reports	1	$$VD^APCLV

Package	Total	Caller Graph
IHS GPRA Information System	4	BGP8D3 BGP8DPA4 BGP8EL3 BGP8PC5

Entry Points

Name	Comments	DBIA/ICR reference
P1
PCCONT(P,EDATE)	;
I13	;EP - PN
N	;
PREG(P,BDATE,EDATE)	;
TDE
OPTOM	;EP
N1
TD	;new tdap and td stuff for v11.1
UNK
PN	;EP - called from elder
UNK1
LASTTDAP(P,BDATE,EDATE)	;EP
PPCONT(P,EDATE)	;contraindicated

External References

Name	Field # of Occurrence
$$VD^APCLV	LASTTDAP+8
$$DOB^AUPNPAT	PN+6, PN+7, PN+12, TD+2, TD+12, LASTTDAP+22, LASTTDAP+30, PPCONT+9, PPCONT+12, PCCONT+8 , PCCONT+11
OPTOM^BGP8D213	OPTOM+1
$$FLU^BGP8D3	TD+8
$$ANCONT^BGP8D31	LASTTDAP+19, PPCONT+5, PCCONT+4
$$DTAP^BGP8D3A	TD+2
$$DTAPTD^BGP8D3A	TD+4
$$HIGHRP^BGP8D3A	I13+8, I13+9
$$FIRSTPDX^BGP8D3C	TD+26
$$IZOSTER^BGP8D3C	TD+12
$$LASTVD^BGP8D3C	TD+46
$$PCV13^BGP8D3C	PN+7, PN+9, PN+10, PN+14, PN+16
$$PPSV23^BGP8D3C	PN+6, PN+8, PN+11, PN+14
$$PREG^BGP8D7	PREG+1
$$CPTI^BGP8DU	LASTTDAP+15
$$DATE^BGP8UTL	P1, P1+1, P1+4, P1+7, LASTTDAP+11, LASTTDAP+16, LASTTDAP+20, LASTTDAP+28, LASTTDAP+31
$$CPTREFT^BGP8UTL1	PPCONT+12, PCCONT+11
$$LASTDX^BGP8UTL1	UNK+4, UNK+8, UNK+10, UNK+12
$$NMIREF^BGP8UTL1	LASTTDAP+30, PPCONT+9, PCCONT+8
$$EDD^BGP8UTL2	TD+28
$$CODEN^ICPTCOD	LASTTDAP+14, LASTTDAP+29
$$FMADD^XLFDT	PN+8, PN+9, TD+4, TD+26, TD+44, TD+47, TD+48, TD+49, TD+50, UNK+8 , UNK+10, UNK+12, PREG+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	PPCONT+5, PPCONT+8, PCCONT+4, PCCONT+7
^ATXAX("B"	PPCONT+4, PPCONT+12, PCCONT+3, PCCONT+11
^AUPNPREF - [#9000022]	LASTTDAP+25, LASTTDAP+26
^AUPNPREF("AA"	LASTTDAP+25
^AUPNREP - [#9000017]	TD+26
^AUPNVIMM - [#9000010.11]	LASTTDAP+6, LASTTDAP+7, LASTTDAP+8
^AUPNVIMM("AA"	LASTTDAP+4, LASTTDAP+5
^AUTTIMM("C"	LASTTDAP+3, LASTTDAP+24, PPCONT+9, PCCONT+8

Label References

Name	Line Occurrences
$$LASTTDAP	TD+32
$$PCCONT	PN+4
$$PPCONT	PN+3
$$PREG	I13+18
P1	TD+1
UNK	TD+53
UNK1	UNK+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
B	PN+12, PN+13, PN+15, LASTTDAP+1~, LASTTDAP+22, LASTTDAP+25, LASTTDAP+29*, LASTTDAP+30
BDATE	LASTTDAP~, LASTTDAP+9, LASTTDAP+15, PREG~, PREG+1
BGPA19BD	PN+15*, PN+16, TDE!
BGPA65	TDE!
BGPA65BD	PN+13*, PN+14, TDE!
>> BGPACTCL	I13+7, I13+8, I13+10, I13+12, I13+14, I13+16, I13+19
>> BGPACTUP	I13+5, I13+9, I13+11, I13+13, I13+15, I13+17, I13+20
>> BGPAGEB	I13+5, I13+7, I13+8, I13+9, I13+10, I13+11, I13+12, I13+13, I13+14, I13+15 , I13+16, I13+17, I13+19, I13+20, PN+14, PN+39, PN+40
>> BGPBDATE	I13+18, PN+10, PN+11, TD+8, TD+28, UNK+4
>> BGPD1	I13+7*, I13+21, N+13, N+19, N+22
>> BGPD10	I13+14*, I13+21, N+20
>> BGPD11	I13+15*, I13+21, N+20
>> BGPD12	I13+16*, I13+21, N+21
>> BGPD13	I13+17*, I13+21, N+21
>> BGPD14	I13+18*, I13+21, TD+24, N+3
>> BGPD15	I13+19*, I13+21
>> BGPD16	I13+21, TD+46, UNK+4, UNK+9*, N+2, N+3
>> BGPD17	I13+20*, I13+21
>> BGPD2	I13+6*, I13+21, N+9, N+15
>> BGPD3	I13+5*, I13+21, N+22
>> BGPD4	I13+8*, I13+21, N+9, N+14
>> BGPD5	I13+9*, I13+21, N+14
>> BGPD6	I13+10*, I13+21, N+9, N+13, N+19
>> BGPD7	I13+11*, I13+21
>> BGPD8	I13+12*, I13+21, N+9, N+13, N+19
>> BGPD9	I13+13*, I13+21
>> BGPDMD2	I13+6
BGPDTAPP	I13+1~, I13+22*, N+4
>> BGPDV	N1, N+8, N+9, N+12, N+13, N+14, N+15, N+18, N+19*, P1+9
>> BGPEDATE	I13+8, I13+9, I13+18, PN+3, PN+4, PN+6, PN+7, PN+8, PN+9, PN+10 , PN+11, PN+14, PN+16, TD+2, TD+4, TD+8, TD+12, TD+26, TD+28, TD+30 , TD+31, UNK+4
>> BGPEDD	TD+28*, TD+31, TD+37, TD+44, TD+45, TD+47, TD+49, UNK+1
BGPFLU	I13+1~, TD+8*, TD+9, N+6, N+26, TDE!
>> BGPFPRDX	TD+26*, TD+32
>> BGPIMM	LASTTDAP+23*, LASTTDAP+24
BGPLPNU	TDE!
>> BGPN1	PN+17*
>> BGPN10	TD+5*, TD+6, TD+10, TD+14, TD+15, TD+16, TD+17, TD+20, TD+21
>> BGPN11	TD+18, TD+19
>> BGPN12	TD+18, TD+19
>> BGPN13	TD+9*, TD+10, TD+14, TD+16, TD+20
>> BGPN14	TD+18
>> BGPN15	TD+10*
>> BGPN17	TD+13*, TD+14, TD+15, TD+16, TD+17, TD+20, TD+21
>> BGPN18	TD+18, TD+19
>> BGPN19	TD+14*
>> BGPN21	TD+16*
>> BGPN22	TD+18*
>> BGPN29	TD+20*
>> BGPN3	TD+18, TD+19
>> BGPN30	TD+6*, N+20
>> BGPN32	TD+15*, N+21
>> BGPN34	TD+17*, N+22
>> BGPN35	TD+19*
>> BGPN38	TD+21*
>> BGPN39	TD+33*
>> BGPN40	TD+34*
>> BGPN41	TD+59, UNK+16
>> BGPN42	TD+58, UNK+15
>> BGPN43	TD+57, UNK+14
>> BGPN44	UNK, UNK1
>> BGPN45	N+20, N+21, N+22*
>> BGPN46	PN+29, PN+30, TD+16, TD+17, P1+5, P1+8
>> BGPN47	PN+23, PN+24, PN+25*, PN+30
>> BGPN48	PN+26, PN+27, PN+28*, PN+30, TD+20, TD+21
>> BGPN49	PN+31, PN+32
>> BGPN50	PN+33, PN+34
>> BGPN51	PN+35, PN+36
>> BGPN52	PN+38, PN+39, PN+40, PN+41
>> BGPN8	PN+19, PN+21, PN+22*
>> BGPN9	TD+3*, TD+6, TD+10, TD+14, TD+15, TD+16, TD+17, TD+20, TD+21
>> BGPNMI	LASTTDAP+22*
BGPPC19	I13+1~, I13+2, PN+16, PN+24, P1+8
BGPPC1Y	I13+1~, I13+2, PN+10, PN+27, P1+8
BGPPC5Y	I13+1~, I13+2, PN+9, PN+21, P1+8
BGPPC65	I13+1~, I13+2, PN+14, PN+21, PN+32, PN+36, P1+8
>> BGPPCCON	I13+2, PN+4, PN+17, PN+22, PN+25, PN+32, PN+36, P1+1
BGPPCVEV	I13+1~, I13+2, PN+7, PN+17, PN+21, P1+6, P1+7
>> BGPPLPNU	I13+22*
BGPPNCON	I13+2*, TDE!
BGPPNEU	I13+1~
BGPPNEUD	I13+1~
BGPPP1Y	I13+1~, I13+2, PN+11, PN+24, P1+5
BGPPP5Y	I13+1~, I13+2, PN+8, PN+21, PN+28, PN+39, P1+5
BGPPP65	I13+1~, I13+2, PN+14, PN+21, PN+28, PN+32, PN+34, PN+39, P1+5
>> BGPPPCON	I13+2, PN+3, PN+17, PN+22, PN+27, PN+32, PN+34, PN+41, P1
BGPPPSEV	I13+1~, I13+2, PN+6, PN+17, PN+21, PN+39, PN+40, P1+3, P1+4
>> BGPRTYPE	TD+1, N+9, N+11, N+17
>> BGPSEX	I13+18
>> BGPSTOP	I13+21*
BGPTD	I13+1~, TD+4*, TD+5, N+5, N+25, TDE!
BGPTDAP	I13+1~, I13+22, TD+2, TD+3, N+4, N+24, TDE!
BGPTDAPP	TD+29!, TD+32*, TD+33, TD+34, TD+51, TD+53, UNK+5, UNK+7, TDE!
>> BGPTRIM	TD+23, TD+57, TD+58, TD+59, UNK, UNK+14, UNK+15, UNK+16, UNK1*, N+4
BGPVAL	TDE!
BGPVALH	TDE!
>> BGPVALUD	I13+22, TD+25, N+2, N+4, N+5, N+6
>> BGPVALUE	I13+22, N+23, N+24, N+25, N+26, N+27, P1, P1+1, P1+4, P1+5 , P1+7, P1+8, P1+9*
BGPX	LASTTDAP+1~, LASTTDAP+2, LASTTDAP+4, LASTTDAP+11, LASTTDAP+16, LASTTDAP+17, LASTTDAP+20, LASTTDAP+28, LASTTDAP+31
BGPZ	LASTTDAP+1~, LASTTDAP+19, PPCONT+2~, PPCONT+5, PPCONT+8, PPCONT+9, PCCONT+4, PCCONT+7*, PCCONT+8
BGPZOST	I13+1~, TD+12*, TD+13, N+27
C	LASTTDAP+1~, LASTTDAP+3, LASTTDAP+4, LASTTDAP+5, LASTTDAP+14, LASTTDAP+15
D	TD+30, TD+31, TD+32, LASTTDAP+1~, LASTTDAP+4, LASTTDAP+5, LASTTDAP+15, LASTTDAP+16, LASTTDAP+25*, LASTTDAP+27
>> DFN	I13+8, I13+9, I13+18, PN+3, PN+4, PN+6, PN+7, PN+8, PN+9, PN+10 , PN+11, PN+12, PN+14, PN+16, TD+2, TD+4, TD+8, TD+12, TD+26, TD+28 , TD+32, TD+46, UNK+4, UNK+8, UNK+10, UNK+12, PREG+1
>> E	LASTTDAP+22*, LASTTDAP+25
EDATE	LASTTDAP~, LASTTDAP+10, LASTTDAP+15, LASTTDAP+19, LASTTDAP+22, LASTTDAP+30, PREG~, PREG+1, PPCONT~, PPCONT+5 , PPCONT+9, PPCONT+12, PCCONT~, PCCONT+4, PCCONT+8, PCCONT+11
FB	TD+40~, TD+49*, TD+56
FE	TD+40~, TD+50*
G	TD+42, TD+54, TD+55, TD+56, TD+57, TD+58, TD+59, UNK, UNK+3, UNK+9 , UNK+11, UNK+13, UNK+14, UNK+15, UNK+16, UNK1, LASTTDAP+1~, LASTTDAP+30, LASTTDAP+31, PPCONT+2~ , PPCONT+8, PPCONT+9, PPCONT+10, PPCONT+11, PCCONT+7, PCCONT+8, PCCONT+9*, PCCONT+10
>> I	LASTTDAP+24*, LASTTDAP+25
ID	LASTTDAP+1~, LASTTDAP+6, LASTTDAP+7, LASTTDAP+8, LASTTDAP+9, LASTTDAP+10, LASTTDAP+11
P	LASTTDAP~, LASTTDAP+4, LASTTDAP+5, LASTTDAP+15, LASTTDAP+19, LASTTDAP+22, LASTTDAP+25, LASTTDAP+30, PREG~, PPCONT~ , PPCONT+5, PPCONT+9, PPCONT+12, PCCONT~, PCCONT+4, PCCONT+8, PCCONT+11
R	LASTTDAP+1~, LASTTDAP+22, LASTTDAP+27, LASTTDAP+28, LASTTDAP+29, PPCONT+2~, PPCONT+12, PPCONT+13, PCCONT+11*, PCCONT+12
SB	TD+40~, TD+47*, TD+50, TD+55
SE	TD+40~, TD+48*, TD+55
>> T1	PPCONT+4, PPCONT+5, PPCONT+8, PCCONT+3, PCCONT+4, PCCONT+7
TA	PPCONT+2~
TB	TD+40~, TD+44*, TD+46, TD+48, TD+54
TE	TD+40~, TD+45*, TD+46, TD+54
U	TD+9, TD+13, TD+26, TD+51, UNK+5, N+4, N+5, N+6, N+24, N+25 , N+26, N+27, P1, P1+1, P1+4, P1+7, LASTTDAP+6, LASTTDAP+7, LASTTDAP+8, LASTTDAP+11 , LASTTDAP+16, LASTTDAP+17, LASTTDAP+20, LASTTDAP+25, LASTTDAP+26, LASTTDAP+28, LASTTDAP+31, PPCONT+6, PPCONT+10, PPCONT+13 , PCCONT+5, PCCONT+9, PCCONT+12
X	I13+3, I13+4, I13+18, TD+51, TD+52, TD+54, TD+55, TD+56, UNK+5, UNK+6 , UNK+8, UNK+10, UNK+12, LASTTDAP+1~, LASTTDAP+5, LASTTDAP+6, LASTTDAP+7, LASTTDAP+8, LASTTDAP+19, LASTTDAP+20 , LASTTDAP+25, PPCONT+2~, PPCONT+3, PPCONT+5, PPCONT+6, PCCONT+2, PCCONT+4, PCCONT+5
Y	I13+3, I13+4, UNK+8, UNK+9, UNK+10, UNK+11, UNK+12, UNK+13, LASTTDAP+1~, LASTTDAP+25 , LASTTDAP+26

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP8D3B

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: