Routine: BGP9D51

Package	Total	Call Graph
IHS GPRA Information System	2	$$EAPT^BGP9D52 $$DATE^BGP9UTL
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$DSCHDATE,$$PRIMPOV,$$PRIMPROV)^APCLV
DRG Grouper	1	$$CODEN^ICDCODE
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Taxonomy	1	$$ICD^ATXCHK

Name	Comments	DBIA/ICR reference
BHCLINIC(V)	;EP
EXCL(P,ISD,PSD,ISD1)	;
BHPPCHK(V)	;EP
BHMHO(V)	;EP
ICRSAMM	;EP
PRVV(V,T)	;does this visit have a primary provider with a class in taxonomy T
BHTTOC(V)	;EP is type of contact 8,15
BHOTOC(V)	;EP is type of contact 2, 16
CPTV(V,T)	;does this visit have a cpt code in taxonomy T
BHCPTV(V,T)	;does this visit have a cpt code in taxonomy T
BHNMHO(V)	;EP
OPC(P,BDATE,EDATE)	;
PPCHK(V)	;EP
BHMHT(V)	;EP
BHPRVV(V,T)	;does this visit have a primary provider with a class in taxonomy T
POVV(V,T)	;does this visit have a pov of a code in taxonomy T
BHPOVV(V,T)	;does this visit have a pov of a code in taxonomy T
CRIT2DEN(P,BDATE,EDATE)	;
NDC(A,B)	;
NMHO(V)	;EP
MHT(V)	;EP
CRIT1DEN(P,BDATE,EDATE)	;
MHO(V)	;EP

Name	Field # of Occurrence
$$START1^APCLDF	CRIT1DEN+6, CRIT2DEN+5, EXCL+2, EXCL+7, EXCL+27, OPC+8
$$CLINIC^APCLV	OPC+15, MHO+3, NMHO+3, BHNMHO+3
$$DSCHDATE^APCLV	CRIT1DEN+15, CRIT1DEN+26
$$PRIMPOV^APCLV	CRIT1DEN+14, EXCL+34, EXCL+39
$$PRIMPROV^APCLV	PRVV+7
$$ICD^ATXCHK	CRIT1DEN+15, CRIT1DEN+25, EXCL+35, EXCL+36, EXCL+37, EXCL+44, CPTV+8, CPTV+12, POVV+11, BHCPTV+11 , BHPOVV+17
$$EAPT^BGP9D52	ICRSAMM+15, ICRSAMM+16
$$DATE^BGP9UTL	ICRSAMM+25
$$CODEN^ICDCODE	BHPOVV+15
$$FMADD^XLFDT	ICRSAMM+6, ICRSAMM+9, ICRSAMM+14, ICRSAMM+15, ICRSAMM+16, EXCL+2, EXCL+7, EXCL+27
$$FMTE^XLFDT	CRIT1DEN+6, CRIT2DEN+5, OPC+8

Name	Line Occurrences
Function Call: WRITE	Prompt: BGPBOMB Line Location: CPTV+5
Function Call: WRITE	Prompt: BGPBOMB Line Location: POVV+5
Function Call: WRITE	Prompt: BGPBOMB Line Location: PRVV+5
Function Call: WRITE	Prompt: BGPBOMB Line Location: BHCPTV+5
Function Call: WRITE	Prompt: BGPBOMB Line Location: BHPOVV+5
Function Call: WRITE	Prompt: BGPBOMB Line Location: BHPRVV+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	BHPOVV+12
^AMHREC - [#9002011]	OPC+21, OPC+22, OPC+27, OPC+28, BHCPTV+6, BHMHO+3, BHNMHO+3, BHOTOC+2, BHCLINIC+2, BHCLINIC+3 , BHTTOC+2
^AMHREC("AE"	OPC+20
^AMHRPRO - [#9002011.01]	BHPOVV+9, BHPOVV+10
^AMHRPRO("AD"	BHPOVV+8
^AMHRPROC - [#9002011.04]	BHCPTV+9, BHCPTV+10
^AMHRPROC("AD"	BHCPTV+8
^AMHRPROV - [#9002011.02]	BHPRVV+8, BHPRVV+9
^AMHRPROV("AD"	BHPRVV+7
^AMHTSET - [#9002012.1]	OPC+28, BHOTOC+4, BHTTOC+4
^ATXAX - [#9002226]	NDC+4, CRIT2DEN+14, EXCL+16, PRVV+9, BHPRVV+11
^ATXAX("B"	CRIT1DEN+5, CRIT2DEN+6, CRIT2DEN+7, EXCL+8, EXCL+9, EXCL+24, EXCL+25, EXCL+26, CPTV+4, POVV+4 , PRVV+4, BHCPTV+4, BHPOVV+4, BHPRVV+4
^AUPNVCPT - [#9000010.18]	CPTV+10, CPTV+11
^AUPNVCPT("AD"	CPTV+9
^AUPNVMED - [#9000010.14]	CRIT2DEN+9, CRIT2DEN+10, CRIT2DEN+12, CRIT2DEN+13, EXCL+11, EXCL+12, EXCL+14, EXCL+15
^AUPNVPOV - [#9000010.07]	CRIT1DEN+17, CRIT1DEN+19, EXCL+41, EXCL+42, POVV+9, POVV+10
^AUPNVPOV("AD"	CRIT1DEN+13, CRIT1DEN+16, EXCL+33, EXCL+40, POVV+8
^AUPNVSIT - [#9000010]	CRIT1DEN+9, CRIT1DEN+10, CRIT1DEN+11, CRIT1DEN+12, CRIT1DEN+15, CRIT1DEN+26, CRIT1DEN+27, CRIT2DEN+13, CRIT2DEN+14, EXCL+15 , EXCL+16, EXCL+29, EXCL+30, EXCL+31, EXCL+32, EXCL+35, EXCL+36, EXCL+44, OPC+12, OPC+13 , OPC+14, CPTV+6, CPTV+8, POVV+6, PRVV+6, MHO+2, MHO+3, MHT+2, NMHO+2, NMHO+3 , NMHO+4, BHPOVV+6
^BGPSITE - [#90241.02]	MHO+3, NMHO+3, BHMHO+3, BHNMHO+3
^DIC(40.7 - [#40.7]	OPC+27, BHCLINIC+5
^PSDRUG - [#50]	NDC+3
^TMP($J	ICRSAMM+1!, ICRSAMM+7!, ICRSAMM+10!, CRIT1DEN+2!, CRIT1DEN+7, CRIT1DEN+8, CRIT1DEN+29!, CRIT2DEN+3!, CRIT2DEN+8, CRIT2DEN+17! , EXCL+5!, EXCL+10, EXCL+19!, EXCL+22!, EXCL+28, EXCL+45!, OPC+7!, OPC+9, OPC+11, OPC+32!
^VA(200 - [#200]	BHPRVV+9

Name	Line Occurrences
$$BHCLINIC	BHMHO+3
$$BHCPTV	BHMHO+2, BHNMHO+2, BHNMHO+4
$$BHMHO	OPC+29
$$BHMHT	OPC+30
$$BHNMHO	OPC+31
$$BHOTOC	BHMHO+2, BHMHO+3, BHNMHO+2, BHNMHO+3, BHNMHO+4
$$BHPOVV	BHMHO+2, BHNMHO+4
$$BHPRVV	BHMHO+1, BHMHT+1, BHPPCHK+1, BHNMHO+1
$$BHTTOC	BHMHT+2
$$CPTV	MHO+2, NMHO+2, NMHO+4
$$CRIT1DEN	ICRSAMM+6
$$CRIT2DEN	ICRSAMM+9
$$EXCL	ICRSAMM+12
$$MHO	OPC+16
$$MHT	OPC+17
$$NDC	CRIT2DEN+14, EXCL+16
$$NMHO	OPC+18
$$OPC	ICRSAMM+14
$$POVV	MHO+2, NMHO+3, NMHO+4, BHNMHO+3
$$PPCHK	OPC+16, OPC+17, OPC+18, OPC+29, OPC+30, OPC+31
$$PRVV	MHO+1, MHT+1, PPCHK+1, NMHO+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ICRSAMM+26!, CRIT1DEN+1!, CRIT2DEN+1!, EXCL+1!, EXCL+2, OPC+6!, OPC+8
A	ICRSAMM+26!, NDC~, NDC+3, CRIT1DEN+1!, CRIT1DEN+6, CRIT2DEN+1!, EXCL+1!, EXCL+27, OPC+6!, OPC+10* , OPC+16, OPC+18, OPC+29, OPC+31, OPC+33, OPC+34
A(	OPC+16, OPC+18, OPC+23
B	ICRSAMM+26!, NDC~, NDC+4, CRIT1DEN+1!, CRIT1DEN+6, CRIT2DEN+1!, EXCL+1!, EXCL+27, OPC+6!, OPC+10*
B(	OPC+24
BDATE	CRIT1DEN~, CRIT1DEN+6, CRIT2DEN~, CRIT2DEN+5, OPC~, OPC+8, OPC+20
>> BGPACTCL	ICRSAMM+17
>> BGPACTUP	ICRSAMM+18
>> BGPAGEB	ICRSAMM+4
>> BGPBDATE	ICRSAMM+5, ICRSAMM+6
>> BGPBOMB	CPTV+5, POVV+5, PRVV+5, BHCPTV+5, BHPOVV+5, BHPRVV+5
>> BGPC1	ICRSAMM+6*, ICRSAMM+8, ICRSAMM+9, ICRSAMM+12, ICRSAMM+14, ICRSAMM+25
>> BGPC1B	ICRSAMM+5*, ICRSAMM+6
>> BGPC2	ICRSAMM+9*, ICRSAMM+11, ICRSAMM+12, ICRSAMM+15, ICRSAMM+16
>> BGPD1	ICRSAMM+2, ICRSAMM+17, ICRSAMM+19
>> BGPD2	ICRSAMM+2, ICRSAMM+18
>> BGPD3	ICRSAMM+2*
>> BGPD4	ICRSAMM+2*
>> BGPD5	ICRSAMM+2*
>> BGPD6	ICRSAMM+2*
>> BGPD7	ICRSAMM+2*
>> BGPD8	ICRSAMM+2*
>> BGPD9	ICRSAMM+2*
>> BGPE	ICRSAMM+12*, ICRSAMM+13
BGPG	CRIT1DEN+1!, CRIT2DEN+1!, CRIT2DEN+4, CRIT2DEN+8, CRIT2DEN+14, CRIT2DEN+18, EXCL+1!, EXCL+6, EXCL+10, EXCL+16 , EXCL+20, OPC+6!
BGPG(1	EXCL+3
>> BGPN1	ICRSAMM+3, ICRSAMM+14, ICRSAMM+20
>> BGPN2	ICRSAMM+3, ICRSAMM+15, ICRSAMM+21, ICRSAMM+22
>> BGPN3	ICRSAMM+3, ICRSAMM+16, ICRSAMM+23, ICRSAMM+24
>> BGPN4	ICRSAMM+3*
>> BGPN5	ICRSAMM+3*
>> BGPN6	ICRSAMM+3*
>> BGPN7	ICRSAMM+3*
>> BGPNDC	NDC+3*, NDC+4
>> BGPRTYPE	ICRSAMM+19
>> BGPSTOP	ICRSAMM+4, ICRSAMM+8, ICRSAMM+11, ICRSAMM+13
>> BGPV	ICRSAMM+20, ICRSAMM+21, ICRSAMM+22, ICRSAMM+23, ICRSAMM+24*, ICRSAMM+25
>> BGPVALUE	ICRSAMM+19, ICRSAMM+25
C	ICRSAMM+26!, CRIT1DEN+16, CRIT1DEN+18, CRIT1DEN+19, OPC+6!, OPC+10, OPC+16, OPC+17, OPC+18, OPC+29* , OPC+30, OPC+31, OPC+33, OPC+34
C(	OPC+16, OPC+17, OPC+18*, OPC+25
D	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+27, CRIT2DEN+1!, CRIT2DEN+12, CRIT2DEN+14, EXCL+1!, EXCL+14, EXCL+16, OPC+6! , OPC+10, OPC+17, OPC+30, OPC+34
D(	OPC+17*, OPC+26
>> DFN	ICRSAMM+6, ICRSAMM+9, ICRSAMM+12, ICRSAMM+14, ICRSAMM+15, ICRSAMM+16
DUZ(2	MHO+3, NMHO+3, BHMHO+3, BHNMHO+3
E	ICRSAMM+26!, CRIT1DEN+6, CRIT2DEN+5, EXCL+2, EXCL+7, EXCL+27, OPC+8, OPC+20*
EDATE	CRIT1DEN~, CRIT1DEN+6, CRIT2DEN~, CRIT2DEN+5, OPC~, OPC+8, OPC+20
F	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+21, CRIT1DEN+23, CRIT1DEN+25, CRIT1DEN+26, CRIT1DEN+27, CRIT2DEN+1!, EXCL+1!, EXCL+40* , OPC+6!
G	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+4, CRIT1DEN+8, CRIT1DEN+15, CRIT1DEN+26, CRIT1DEN+31, CRIT2DEN+1!, CRIT2DEN+11, EXCL+1! , EXCL+13, EXCL+23, EXCL+28, EXCL+35, EXCL+36, EXCL+44, EXCL+46, OPC+6!, OPC+11, CPTV+1~ , CPTV+7, CPTV+9, CPTV+12, CPTV+14, POVV+1~, POVV+7, POVV+8, POVV+11, POVV+13, BHCPTV+1~ , BHCPTV+7, BHCPTV+8, BHCPTV+11, BHCPTV+13, BHPOVV+1~, BHPOVV+7, BHPOVV+8, BHPOVV+17, BHPOVV+19, BHPRVV+1~ , BHPRVV+6, BHPRVV+7, BHPRVV+9, BHPRVV+10, BHPRVV+11
H	ICRSAMM+26!
ISD	EXCL~, EXCL+2
ISD1	EXCL~, EXCL+27
J	ICRSAMM+26!, OPC+20*
K	ICRSAMM+26!
M	ICRSAMM+26!
N	ICRSAMM+26!
O	ICRSAMM+26!
P	ICRSAMM+26!, CRIT1DEN~, CRIT1DEN+6, CRIT2DEN~, CRIT2DEN+5, EXCL~, EXCL+2, EXCL+7, EXCL+27, OPC~ , OPC+8, OPC+20
PSD	EXCL~, EXCL+7
Q	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+3!, CRIT1DEN+16!, CRIT2DEN+1!, EXCL+1!, EXCL+39*, EXCL+43, OPC+6!
Q(	CRIT1DEN+19*, CRIT1DEN+21!, CRIT1DEN+23!, CRIT1DEN+25
Q(0	CRIT1DEN+22, CRIT1DEN+23
R	ICRSAMM+26!
S	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+3!, CRIT1DEN+4, CRIT1DEN+27, CRIT1DEN+32, CRIT2DEN+1!, EXCL+1!, EXCL+23*, OPC+6!
S(	CRIT1DEN+15, CRIT1DEN+26, CRIT1DEN+27*, CRIT1DEN+31, CRIT1DEN+32
S(0	CRIT1DEN+31, CRIT1DEN+32
T	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+5, CRIT1DEN+15, CRIT1DEN+25, CRIT2DEN+1!, CRIT2DEN+6, CRIT2DEN+14, EXCL+1!, EXCL+8* , EXCL+16, EXCL+24, EXCL+35, OPC+6!, CPTV~, CPTV+2, CPTV+4, CPTV+5, CPTV+8, CPTV+12 , POVV~, POVV+2, POVV+4, POVV+5, POVV+11, PRVV~, PRVV+2, PRVV+4, PRVV+5, PRVV+9 , BHCPTV~, BHCPTV+2, BHCPTV+4, BHCPTV+5, BHCPTV+11, BHPOVV~, BHPOVV+2, BHPOVV+4, BHPOVV+5, BHPOVV+17 , BHPRVV~, BHPRVV+2, BHPRVV+4*, BHPRVV+5, BHPRVV+11
T1	ICRSAMM+26!, CRIT1DEN+1!, CRIT2DEN+1!, EXCL+1!, EXCL+25*, EXCL+36, EXCL+44, OPC+6!
T2	ICRSAMM+26!, CRIT1DEN+1!, CRIT2DEN+1!, CRIT2DEN+7, CRIT2DEN+14, EXCL+1!, EXCL+9, EXCL+16, EXCL+26*, EXCL+37 , OPC+6!
U	ICRSAMM+9, ICRSAMM+12, ICRSAMM+14, ICRSAMM+15, ICRSAMM+16, ICRSAMM+22, ICRSAMM+24, ICRSAMM+25, NDC+3, CRIT1DEN+8 , CRIT1DEN+10, CRIT1DEN+11, CRIT1DEN+12, CRIT1DEN+15, CRIT1DEN+19, CRIT1DEN+21, CRIT1DEN+25, CRIT1DEN+26, CRIT1DEN+27, CRIT1DEN+31 , CRIT1DEN+32, CRIT2DEN+8, CRIT2DEN+10, CRIT2DEN+12, CRIT2DEN+13, CRIT2DEN+14, EXCL+10, EXCL+12, EXCL+14, EXCL+15 , EXCL+16, EXCL+28, EXCL+30, EXCL+31, EXCL+32, EXCL+35, EXCL+36, EXCL+42, EXCL+44, OPC+11 , OPC+13, OPC+14, OPC+22, OPC+27, OPC+28, CPTV+8, CPTV+11, POVV+10, MHO+2, MHO+3 , MHT+2, NMHO+2, NMHO+3, NMHO+4, BHCPTV+10, BHPOVV+10, BHPOVV+12, BHPRVV+9, BHMHO+3, BHNMHO+3 , BHOTOC+2, BHOTOC+4, BHCLINIC+3, BHCLINIC+5, BHTTOC+2, BHTTOC+4
V	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+8, CRIT1DEN+9, CRIT1DEN+10, CRIT1DEN+11, CRIT1DEN+12, CRIT1DEN+13, CRIT1DEN+14, CRIT1DEN+15 , CRIT1DEN+16, CRIT1DEN+26, CRIT1DEN+27, CRIT2DEN+1!, CRIT2DEN+10, CRIT2DEN+13, CRIT2DEN+14, EXCL+1!, EXCL+12, EXCL+15 , EXCL+16, EXCL+28, EXCL+29, EXCL+30, EXCL+31, EXCL+32, EXCL+33, EXCL+34, EXCL+35, EXCL+36 , EXCL+39, EXCL+40, EXCL+44, OPC+6!, OPC+11, OPC+12, OPC+13, OPC+14, OPC+15, OPC+16 , OPC+17, OPC+18, OPC+20, OPC+21, OPC+22, OPC+27, OPC+28, OPC+29, OPC+30, OPC+31 , CPTV~, CPTV+3, CPTV+6, CPTV+8, CPTV+9, POVV~, POVV+3, POVV+6, POVV+8, PRVV~ , PRVV+3, PRVV+6, PRVV+7, MHO~, MHO+1, MHO+2, MHO+3, MHT~, MHT+1, MHT+2 , PPCHK~, PPCHK+1, NMHO~, NMHO+1, NMHO+2, NMHO+3, NMHO+4, BHCPTV~, BHCPTV+3, BHCPTV+6 , BHCPTV+8, BHPOVV~, BHPOVV+3, BHPOVV+6, BHPOVV+8, BHPRVV~, BHPRVV+3, BHPRVV+7, BHMHO~, BHMHO+1 , BHMHO+2, BHMHO+3, BHMHT~, BHMHT+1, BHMHT+2, BHPPCHK~, BHPPCHK+1, BHNMHO~, BHNMHO+1, BHNMHO+2 , BHNMHO+3, BHNMHO+4, BHOTOC~, BHOTOC+2, BHCLINIC~, BHCLINIC+2, BHCLINIC+3, BHTTOC~, BHTTOC+2
W	ICRSAMM+26!, CRIT1DEN+1!, CRIT2DEN+1!, EXCL+1!, EXCL+40*, EXCL+41, EXCL+42, EXCL+43, OPC+6!
X	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+8, CRIT2DEN+1!, CRIT2DEN+5, CRIT2DEN+8, EXCL+1!, EXCL+7, EXCL+10, EXCL+28 , OPC+6!, OPC+11, OPC+27, OPC+28, CPTV+1~, CPTV+8, CPTV+9, CPTV+10, CPTV+11, POVV+1~ , POVV+8, POVV+9, POVV+10, PRVV+1~, PRVV+7, PRVV+8, PRVV+9, BHCPTV+1~, BHCPTV+8, BHCPTV+9 , BHCPTV+10, BHPOVV+1~, BHPOVV+8, BHPOVV+9, BHPOVV+10, BHPRVV+1~, BHPRVV+7, BHPRVV+8, BHPRVV+9, BHOTOC+1~ , BHOTOC+2, BHOTOC+3, BHOTOC+4, BHOTOC+5, BHOTOC+6, BHCLINIC+1~, BHCLINIC+3, BHCLINIC+4, BHCLINIC+5, BHTTOC+1~ , BHTTOC+2, BHTTOC+3, BHTTOC+4*, BHTTOC+5, BHTTOC+6
Y	ICRSAMM+26!, CRIT1DEN+1!, CRIT1DEN+14, CRIT1DEN+15, CRIT1DEN+16, CRIT1DEN+17, CRIT1DEN+19, CRIT1DEN+21, CRIT1DEN+23, CRIT1DEN+25* , CRIT1DEN+31, CRIT1DEN+32, CRIT2DEN+1!, CRIT2DEN+5, CRIT2DEN+8, CRIT2DEN+9, CRIT2DEN+10, CRIT2DEN+12, CRIT2DEN+13, CRIT2DEN+14 , EXCL+1!, EXCL+7, EXCL+10, EXCL+11, EXCL+12, EXCL+14, EXCL+15, EXCL+16, EXCL+34, EXCL+35 , EXCL+36, EXCL+37, OPC+6!, OPC+22, OPC+23, OPC+24, OPC+25, OPC+26, BHPRVV+1~, BHPRVV+9*
Z	ICRSAMM+26!, CRIT1DEN+1!, CRIT2DEN+1!, EXCL+1!, EXCL+40, EXCL+42, EXCL+44, OPC+6!, OPC+8, CPTV+1~ , CPTV+11, CPTV+12, POVV+1~, POVV+10, POVV+11, BHCPTV+1~, BHCPTV+10, BHCPTV+11, BHPOVV+1~, BHPOVV+10* , BHPOVV+11, BHPOVV+12, BHPOVV+13, BHPOVV+15, BHPOVV+16, BHPOVV+17

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP9D51

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: