Routine: BGP0DPA2

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

BGP0DPA2 ; IHS/CMI/LAB - COMP NATIONAL GPRA FOR PTS W/APPT 09 Jan 2009 3:36 PM 26 Jun 2009 3:40 PM 03 Jun 2010 8:04 AM ;

Source Information

Source file <BGP0DPA2.m>

Call Graph

Call Graph Total: 20

Package	Total	Call Graph
IHS GPRA Information System	12	($$DEP,$$DEPEDU,$$DEPSCR)^BGP0D25 I0302ASC^BGP0D41 ($$ALHF,$$ALPED,$$DVDX,$$DVEX,$$DVPED)^BGP0D5 $$ALDX^BGP0D5A ($$BMIOR,$$OB,$$OW)^BGP0D6 ($$BE,$$COLO,$$CRC,$$FOB,$$SIG)^BGP0D61 ($$CPTSM,$$DX,$$TOBACCO)^BGP0D7 $$PED^BGP0D711 ($$FIRSTIHD,$$V2IHD)^BGP0D721 IE2^BGP0D8 $$DATE^BGP0UTL $$LASTDXI^BGP0UTL1
DRG Grouper	2	$$ICDDX^ICDCODE $$CPT^ICPTCOD
Patient Care Component Reports	2	$$START1^APCLDF $$VD^APCLV
IHS Patient	1	($$AGE,$$DOB)^AUPNPAT
Kernel	1	($$FMADD,$$FMDIFF,$$FMTE)^XLFDT
Taxonomy	1	$$ICD^ATXCHK
VA Fileman	1	^%DT

Entry Points

Name	Comments	DBIA/ICR reference
LIFE	;
BMI	;
BP	;
TOB	;
TF(P,BDATE,EDATE)	;
I021X	;
I019X	;
TITLE(I)	;
BFRX	;
IE2	;EP
I021	;EP
I020	;EP - Alcohol Screening
LDL	;
I031A	;EP
I031AX	;
I0302A	;EP
IAA	;EP
BFR	;EP
DENTSRV(P,BDATE,EDATE)	;EP
I0302AX	;EP
I014	;EP
I016	;EP
I017	;EP - colorectal cancer
GETIFC(P,BDATE,EDATE,BGPRET)	;EP
I020X	;
I019	;EP - tobacco cessation
IAAX	;
SEAL(P,BDATE,EDATE)	;

External References

Name	Field # of Occurrence
^%DT	IAA+5
$$START1^APCLDF	SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+6
$$VD^APCLV	DENTSRV+15
$$ICD^ATXCHK	TF+16
$$AGE^AUPNPAT	I031A+11, I031A+12, I031A+13
$$DOB^AUPNPAT	I017+9, I017+13, I017+19, I017+25, I019+5, I019+7, I019+9, I019+17, I020+6, I020+8 , I020+10, IAA+4, IAA+6, IAA+8, I014+3, I014+4, I016+3, I021+6, I021+8, I021+10 , I0302A+5, I031A+8
$$DEP^BGP0D25	IAA+4
$$DEPEDU^BGP0D25	IAA+8
$$DEPSCR^BGP0D25	IAA+6
I0302ASC^BGP0D41	I0302A+6
$$ALHF^BGP0D5	I020+6
$$ALPED^BGP0D5	I020+10
$$DVDX^BGP0D5	I021+8
$$DVEX^BGP0D5	I021+6
$$DVPED^BGP0D5	I021+10
$$ALDX^BGP0D5A	I020+8
$$BMIOR^BGP0D6	I031A+8
$$OB^BGP0D6	I031A+12
$$OW^BGP0D6	I031A+11
$$BE^BGP0D61	I017+25
$$COLO^BGP0D61	I017+19
$$CRC^BGP0D61	I017+5
$$FOB^BGP0D61	I017+9
$$SIG^BGP0D61	I017+13
$$CPTSM^BGP0D7	I019+9
$$DX^BGP0D7	I019+7
$$TOBACCO^BGP0D7	I019+5
$$PED^BGP0D711	I019+17
$$FIRSTIHD^BGP0D721	I0302A+4
$$V2IHD^BGP0D721	I0302A+5
IE2^BGP0D8	IE2+3
$$DATE^BGP0UTL	I017+39, I017+42, I019+18, I019+21, I020+13, I020+16, I020+19, IAA+10, IAA+13, I014+9 , I016+8, I021+13, I021+15, IE2+9, I031A+9, I031A+15, I031A+16, BFR+10
$$LASTDXI^BGP0UTL1	DENTSRV+10
$$ICDDX^ICDCODE	TF+19
$$CPT^ICPTCOD	SEAL+21
$$FMADD^XLFDT	I017+42, I019+5, I019+7, I019+9, I019+19, I020+12, IAA+11, I021+12, I031A+10, I031A+16
$$FMDIFF^XLFDT	I017+11, I017+17, I017+23, I017+29, I014+6, I014+7, BFR+3, GETIFC+8
$$FMTE^XLFDT	SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+6

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	TF+10
^ATXAX("B"	TF+5, TF+16
^AUPNVCPT - [#9000010.18]	SEAL+19, SEAL+22, TF+14, TF+16
^AUPNVCPT("AD"	SEAL+18, TF+13
^AUPNVDEN - [#9000010.05]	SEAL+9, SEAL+12, SEAL+13, TF+9, TF+10
^AUPNVDEN("AD"	SEAL+8, TF+8
^AUPNVIF - [#9000010.44]	GETIFC+3, GETIFC+4
^AUPNVIF("AC"	GETIFC+2
^AUPNVPOV - [#9000010.07]	TF+19
^AUPNVPOV("AD"	TF+18
^AUPNVSIT - [#9000010]	DENTSRV+15, GETIFC+6, GETIFC+7
^AUTTADA - [#9999999.31]	SEAL+9
^BGPINDTC - [#90377.02]	TITLE+1
^DPT - [#2]	BFR+3, GETIFC+8
^TMP($J	SEAL+3!, SEAL+7, TF+3!, TF+7, I0302A+3!

Label References

Name	Line Occurrences
$$DENTSRV	I014+4
$$SEAL	I014+3
$$TF	I016+3
$$TITLE	I017+34, I019+18, I019+21, I020+13, I020+15, IAA+10, IAA+13, I014+8, I014+9, I016+7 , I016+8, I021+13, I021+15, IE2+8, I0302A+9, I031A+9, I031A+15, BFR+7, BFR+10
BFRX	BFR+7
GETIFC	BFR+6
I019X	I019+18
I020X	I020+13, I020+17
I021X	I021+13, I021+14
I0302AX	I0302A+8
I031AX	I031A+9, I031A+14
IAAX	IAA+10, IAA+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SEAL+1~, SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+1~, TF+6, IE2+10!, I0302AX+1!
>> %DT	IAA+5*
A	SEAL+1~, SEAL+4, SEAL+6, SEAL+9, SEAL+10, SEAL+19, SEAL+20, SEAL+21, TF+1~, TF+4* , TF+6, TF+9, TF+10, TF+14, TF+15, TF+16, TF+19, TF+20, IE2+10!, I0302AX+1! , I031A+13, I031A+15
B	IE2+10!, I0302AX+1!
BDATE	SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~, TF+6 , IE2+10!, I0302AX+1!, GETIFC~
BGP1320	I019+2!, I019X+2!
>> BGPACTUP	I017+6, I019+4, I020+1, IAA+1, I021+1
BGPADAY	BFR+3*, BFR+4, BFR+5, BFRX+1!
>> BGPAGEB	I017+3, I017+4, I020+3, I020+4, IAA+2, I014+1, I014+2, I016+1, I016+2, I021+3 , I021+4, I0302A+2, I031A+3, I031A+4
>> BGPAGEE	I031A+5, I031A+8
>> BGPBD	I017+42, I019+18, I020+13, IAA+10, I021+13, IE2+9, I031A+9
>> BGPBDATE	I019+5, I019+7, I019+9, I016+5, I016+6, BFR+6
BGPBE	I017+2!, I017+25*, I017+28, I017+40, I017+44!
BGPBFR	BFR+2!, BFR+6, BFR+7, BFRX+1!
BGPBFR(	BFR+9, BFR+10
BGPBMI	I0302AX+1!, I031A+8*, I031A+9, I031A+10, I031A+11, I031A+12, I031A+13, I031A+15, I031A+16, I031AX+1!
BGPBMIH	I031AX+1!
BGPBP	I0302AX+1!
BGPC	SEAL+1~, SEAL+5, SEAL+24, SEAL+25, SEAL+26, DENTSRV+2, DENTSRV+3, DENTSRV+6, DENTSRV+8, DENTSRV+11 , DENTSRV+15, DENTSRV+16, TF+2, TF+7, TF+8, TF+10, TF+13, TF+16, TF+18, TF+20* , TF+22
BGPCOLO	I017+2!, I017+19*, I017+22, I017+36, I017+44!
BGPD	I020+5, I020+7, I020+9, I020+11, I020+12, I020+13, I020+16, I020X+1!, IAA+3, IAA+5 , IAA+7, IAA+9, IAA+10, IAA+11, IAA+13, IAAX+1!, I021+5, I021+7, I021+9, I021+11 , I021+12, I021+15, I021X+1!
BGPD1	I019+1, I019X+1!, IE2+7, IE2+11!, I0302AX+2!, I031A+7, I031AX+1!
BGPD2	I019+1, I019+14, I019+15, I019X+1!, IE2+11!, I0302AX+2!
BGPD3	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPD4	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPD5	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPD6	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPD7	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPD8	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPD9	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
BGPDEP	I0302AX+1!
>> BGPED	I019+19, I020+14, I020+19, IAA+12, I021+14, I031A+10
>> BGPEDATE	I017+5, I017+9, I017+13, I017+19, I017+25, I019+17, I020+6, I020+8, I020+10, IAA+4 , IAA+6, IAA+8, I021+6, I021+8, I021+10, I0302A+4, I0302A+5, I031A+8, BFR+6
BGPEDUC	IE2+10!, I0302AX+1!
BGPF	I017+44!
BGPFOB	I017+2!, I017+9, I017+10, I017+39, I017+44!, I019+17, I019+18, I019+19, I019+21
BGPG	SEAL+1~, SEAL+2!, DENTSRV+1!, DENTSRV+4!, DENTSRV+7!, DENTSRV+9!, DENTSRV+10*, DENTSRV+11, DENTSRV+12!, DENTSRV+13 , TF+2!, GETIFC+1!
BGPG(	DENTSRV+14, DENTSRV+15
BGPG(1	DENTSRV+3, DENTSRV+6, DENTSRV+8
>> BGPGPRAI	I017+34, I019+18, I019+21, I020+13, I020+15, IAA+10, IAA+13, I014+8, I014+9, I016+7 , I016+8, I021+13, I021+15, IE2+8, I0302A+9, I031A+9, I031A+15, BFR+7, BFR+10
BGPHIV	IE2+10!, I0302AX+1!
BGPIN	I017+2!, I017+7, I017+11, I017+31, I017+44!, I019+3*, I019X+2!
BGPIN1	I017+2!, I017+7, I017+17, I017+31, I017+44!, I019+3, I019+19, I019+20, I019X+2!, I031A+7* , I031A+10*, I031A+14, I031A+16
BGPIN2	I017+2!, I017+7, I017+23, I017+31, I017+44!
BGPIN3	I017+2!, I017+7, I017+29, I017+31, I017+44!
>> BGPISSO	IE2+2*
>> BGPISSV	I017+34, I017+43, I019+18, I019+21, I020+13, I020+15, I020+16, I020+17, I020+18, I020+19 , IAA+10, IAA+13, I014+8, I014+9, I016+7, I016+8, I021+13, I021+15, IE2+5, IE2+8 , IE2+9, I0302A+7, I0302A+9, LIFE+2, I031A+9, I031A+15, I031A+16, BFR+7, BFR+10*
BGPJ	TF+1~
>> BGPLAST	I017+8, I017+12, I017+18, I017+24, I017+30*, I017+31, I017+42
BGPLDL	I0302AX+1!
>> BGPLDS	I014+3, I014+8, I014+9, I016+3, I016+5, I016+6, I016+7, I016+8
BGPLIFE	I0302AX+1!
BGPN	I019+16, I019X+2!, I020+5, I020X+1!, IAA+3, IAAX+1!, I021+5, I021X+1!
BGPN1	I017+33, I017+44!, I019+1, I019X+1!, I020+5, I020+6, I020+7, I020+8, I020+9, I020+10 , I020+11, I020X+1!, IAA+3, IAA+4, IAA+5, IAA+6, IAA+7, IAA+8, IAA+9, IAAX+1! , I021+5, I021+6, I021+7, I021+8, I021+9, I021+10, I021+11, I021X+1!, IE2+10!, IE2+11! , BP+1, I0302AX+2!, I031A+7, I031A+11
BGPN2	I019+1, I019X+1!, IE2+11!, LDL+1, I0302AX+2!, I031A+7, I031A+12*
BGPN3	I019+1*, I019X+1!, IE2+11!, TOB+1, I0302AX+2!
BGPN4	I019+1, I019X+1!, IE2+6, IE2+9, IE2+11!, I0302A+11, BMI+1, I0302AX+2!
BGPN5	I019+1*, I019X+1!, IE2+11!, LIFE+1, I0302AX+2!
BGPN6	I019+1*, I019X+1!, IE2+11!, I0302AX+2!
>> BGPN8	I0302A+11
>> BGPN9	I0302A+8
BGPNBE	I017+44!
BGPNCOLO	I017+44!
BGPNFOB	I017+44!, I019+19*, I019+21
BGPNS	I020+5, I020+12, I020+14, I020+19, I020X+1!, IAA+3, IAA+11, IAA+12, IAA+13, IAAX+1! , I021+5, I021+12, I021+13, I021+14, I021+15, I021X+1!
BGPNSIG	I017+44!
BGPOB	I031A+12*, I031A+14, I031A+15, I031AX+1!
BGPOTH	I017+44!
BGPOW	I031A+11*, I031A+15, I031AX+1!
BGPREF	I017+44!, I020+5, I020+18, I020X+1!, IAA+3, IAAX+1!, I021+5*, I021X+1!
BGPRET	GETIFC~, GETIFC+1!
BGPRET(	GETIFC+8*
>> BGPS	I014+5, I014+7, I014+9, I016+4, I016+6, I016+8
>> BGPSCPT	I019+9*, I019+10, I019+14
BGPSDX	I019+2!, I019+7*, I019+8, I019+10, I019+12, I019+13, I019+14, I019X+2!
>> BGPSEX	I020+2, I021+2
BGPSIG	I017+2!, I017+13*, I017+16, I017+37, I017+44!
>> BGPSKIP	I017+3, I017+4, I017+5, I017+6, I017+31, I019+4, I019+15, I019+20, I020+1, I020+2 , I020+3, I020+4, I020+14, IAA+1, IAA+2, IAA+12, I014+1, I014+2, I014+3, I014+6 , I016+1, I016+2, I016+3, I016+5, I021+1, I021+2, I021+3, I021+4, I021+14, IE2+4 , IE2+6, IE2+7, I0302A+2, I0302A+4, I0302A+5, I0302A+8, I031A+1, I031A+3, I031A+4, I031A+5 , I031A+14, BFR+1, BFR+4, BFR+5
BGPSTOP	IE2+1!, IE2+4, I0302A+1!, I031A+2!, BFR+2!
BGPT	I019+16*, I019X+2!
BGPTC	I019+2!, I019X+2!
BGPTOB	I019+2!, I019X+2!, I0302AX+1!
>> BGPTOBD	I019+6, I019+8, I019+10*
>> BGPTOBP	I019+5*, I019+6, I019+14
BGPTQ	I019+2!, I019X+2!
>> BGPV	I020+5, I020+7, I020+9, I020+11, I020+16, I020+17, IAA+5, IAA+7, IAA+9*
>> BGPVA	I021+5, I021+7, I021+9, I021+11
>> BGPVAL	I0302A+10, BP+1, LDL+1, TOB+1, LIFE+2
>> BGPVAL2	I0302A+10, BMI+1, LIFE+1*, LIFE+2
BGPX	I017+35, I017+36, I017+37, I017+39, I017+40, I017+41, I017+42*, I017+43, SEAL+1~, SEAL+2!
BGPX(	SEAL+14*, SEAL+24
BGPX("CPT"	SEAL+23*, SEAL+25
BGPX("NO OS"	SEAL+15*
BGPZ	TF+1~, TF+2!
BPGNTS	I019X+2!
C	IE2+10!, I0302AX+1!, GETIFC+1!, GETIFC+4*, GETIFC+8
D	I017+10, I017+11, I017+12, I017+16, I017+17, I017+18, I017+22, I017+23, I017+24, I017+28 , I017+29, I017+30, I019+19, I014+4, I014+6, I014+7, IE2+10!, I0302AX+1!
>> DFN	I017+5, I017+9, I017+13, I017+19, I017+25, I019+5, I019+7, I019+9, I019+17, I020+6 , I020+8, I020+10, IAA+4, IAA+6, IAA+8, I014+3, I014+4, I016+3, I021+6, I021+8 , I021+10, I0302A+4, I0302A+5, I031A+8, I031A+11, I031A+12, I031A+13, BFR+3, BFR+6
DT	I017+11, I017+17, I017+23, I017+29, I019+19, I014+3, I014+4, I014+6, I014+7, I016+3 , BFR+3
E	SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+6, IE2+10!, I0302AX+1!
EDATE	SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~, TF+6 , IE2+10!, I0302AX+1!, GETIFC~
F	IE2+10!, I0302AX+1!
G	SEAL+1~, SEAL+8, SEAL+11, SEAL+17, SEAL+18, DENTSRV+12, DENTSRV+13, DENTSRV+14, TF+1~, TF+8* , TF+10, TF+12, TF+13, TF+16, TF+17, TF+18, TF+20*
H	IE2+10!, I0302AX+1!
I	TITLE~, TITLE+1
P	SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~, TF+6 , IE2+10!, I0302AX+1!, GETIFC~, GETIFC+2, GETIFC+8
R	TF+1~
S	SEAL+1~, SEAL+13*, SEAL+14, SEAL+15, IE2+10!, I0302AX+1!
T	SEAL+1~, SEAL+12, SEAL+14, SEAL+15, SEAL+22, SEAL+23, TF+1~, TF+10, TF+16, IE2+10! , I0302AX+1!
U	I017+10, I017+16, I017+22, I017+28, I017+36, I017+37, I017+39, I017+40, I017+43, I019+6 , I019+8, I019+10, I019+12, I019+13, I019+14, I019+18, I019+19, I019+21, I020+7, I020+9 , I020+11, I020+13, I020+16, I020+17, I020+18, I020+19, IAA+5, IAA+7, IAA+9, IAA+10 , IAA+13, I014+4, I014+8, I014+9, SEAL+7, SEAL+9, SEAL+12, SEAL+13, SEAL+19, SEAL+21 , SEAL+22, DENTSRV+3, DENTSRV+6, DENTSRV+8, DENTSRV+11, DENTSRV+14, DENTSRV+15, I016+7, I016+8, TF+7 , TF+9, TF+10, TF+14, TF+16, TF+19, I021+7, I021+9, I021+11, I021+13, I021+15 , IE2+9, LIFE+2, I031A+9, I031A+10, I031A+11, I031A+12, I031A+13, I031A+15, I031A+16, TITLE+1 , BFR+3, BFR+7, BFR+10, GETIFC+4, GETIFC+7, GETIFC+8
V	SEAL+1~, SEAL+7, SEAL+8, SEAL+18, DENTSRV+14, DENTSRV+15, TF+7, TF+8, TF+13, TF+18 , IE2+10!, I0302AX+1!, GETIFC+4, GETIFC+5, GETIFC+6, GETIFC+7*, GETIFC+8
X	I019+11, I019+12, I019+13, I019+14, IAA+5~, SEAL+1~, SEAL+7, SEAL+24, DENTSRV+14, DENTSRV+15 , TF+1~, TF+7, IE2+10!, I0302A+10, I0302AX+1!, BFR+9, GETIFC+1!, GETIFC+2*, GETIFC+3, GETIFC+4
Y	IAA+5, SEAL+1~, SEAL+7, SEAL+8, SEAL+9, SEAL+12, SEAL+13, SEAL+18, SEAL+19, SEAL+22 , TF+1~, TF+7, TF+8, TF+9, TF+10, TF+13, TF+14, TF+16, TF+18, TF+19 , IE2+10!, I0302AX+1!, BFR+9, BFR+10
Z	TF+1~, TF+5*, TF+10, IE2+10!, I0302AX+1!

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP0DPA2

Call Graph Total: 20