Routine: BGP3DPA2

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

BGP3DPA2 ; IHS/CMI/LAB - COMP NATIONAL GPRA FOR PTS W/APPT 03 Jun 2013 8:04 AM ;

Source Information

Source file <BGP3DPA2.m>

Call Graph

Call Graph Total: 20

Package	Total	Call Graph
IHS GPRA Information System	12	($$DEP,$$DEPEDU,$$DEPSCR)^BGP3D25 I0302ASC^BGP3D41 ($$ALHF,$$ALPED,$$DVDX,$$DVEX,$$DVPED)^BGP3D5 $$ALDX^BGP3D5A ($$BMIOR,$$OB,$$OW)^BGP3D6 ($$COLO,$$CRC,$$FOB,$$SIG)^BGP3D62 I91^BGP3D71 $$PED^BGP3D711 $$CHD^BGP3D729 IE2^BGP3D8 $$DATE^BGP3UTL $$LASTDX^BGP3UTL1
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, TF+11, TF+17, TF+21
$$ICD^ATXCHK	TF+17
$$AGE^AUPNPAT	I031A+11, I031A+12, I031A+13
$$DOB^AUPNPAT	I017+9, I017+13, I017+19, I019+7, I020+6, I020+8, I020+10, IAA+4, IAA+6, IAA+8 , I014+3, I014+4, I016+3, I021+6, I021+8, I021+10, I031A+8
$$DEP^BGP3D25	IAA+4
$$DEPEDU^BGP3D25	IAA+8
$$DEPSCR^BGP3D25	IAA+6
I0302ASC^BGP3D41	I0302A+8
$$ALHF^BGP3D5	I020+6
$$ALPED^BGP3D5	I020+10
$$DVDX^BGP3D5	I021+8
$$DVEX^BGP3D5	I021+6
$$DVPED^BGP3D5	I021+10
$$ALDX^BGP3D5A	I020+8
$$BMIOR^BGP3D6	I031A+8
$$OB^BGP3D6	I031A+12
$$OW^BGP3D6	I031A+11
$$COLO^BGP3D62	I017+19
$$CRC^BGP3D62	I017+5
$$FOB^BGP3D62	I017+9
$$SIG^BGP3D62	I017+13
I91^BGP3D71	I019+2
$$PED^BGP3D711	I019+7
$$CHD^BGP3D729	I0302A+6
IE2^BGP3D8	IE2+3
$$DATE^BGP3UTL	I017+38, I017+41, I019+8, 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
$$LASTDX^BGP3UTL1	DENTSRV+10
$$ICDDX^ICDCODE	TF+20
$$CPT^ICPTCOD	SEAL+21
$$FMADD^XLFDT	I017+41, I020+12, IAA+11, I021+12, I031A+10, I031A+16
$$FMDIFF^XLFDT	I017+11, I017+17, I017+23, 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+11
^ATXAX("B"	TF+5, TF+17
^AUPNVCPT - [#9000010.18]	SEAL+19, SEAL+22, TF+15, TF+17
^AUPNVCPT("AD"	SEAL+18, TF+14
^AUPNVDEN - [#9000010.05]	SEAL+9, SEAL+12, SEAL+13, TF+10, TF+11
^AUPNVDEN("AD"	SEAL+8, TF+9
^AUPNVIF - [#9000010.44]	GETIFC+3, GETIFC+4
^AUPNVIF("AC"	GETIFC+2
^AUPNVPOV - [#9000010.07]	TF+20
^AUPNVPOV("AD"	TF+19
^AUPNVSIT - [#9000010]	DENTSRV+15, GETIFC+6, GETIFC+7
^AUTTADA - [#9999999.31]	SEAL+9
^BGPINDHC - [#90550.02]	TITLE+1
^DPT - [#2]	BFR+3, GETIFC+8
^TMP($J	SEAL+3!, SEAL+7, TF+3!, TF+8, I0302A+3!

Label References

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	I019X+3!, SEAL+1~, SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+1~, TF+6, IE2+10! , I0302AX+1!
>> %DT	IAA+5*
A	I019X+3!, SEAL+1~, SEAL+4, SEAL+6, SEAL+9, SEAL+10, SEAL+19, SEAL+20, SEAL+21, TF+1~ , TF+4, TF+6, TF+10, TF+11, TF+15, TF+16, TF+17, TF+20, TF+21, IE2+10! , I0302AX+1!, I031A+13*, I031A+15
B	I019X+3!, IE2+10!, I0302AX+1!
BDATE	I019X+3!, SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~ , TF+6, IE2+10!, I0302AX+1!, GETIFC~
BGP1320	I019X+2!, I019X+4!
>> BGPACTUP	I017+6, 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
BGPALLED	I019X+3!
>> BGPBD	I017+41, I020+13, IAA+10, I021+13, IE2+9, I031A+9
>> BGPBDATE	I019+8, I016+5, I016+6, I0302A+6, BFR+3, BFR+6
BGPBE	I017+2!, I017+43!
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+11, TF+17, TF+21*, TF+23
BGPCHD	I0302A+6*, I0302A+7!, I0302AX+2!
BGPCOLO	I017+2!, I017+19*, I017+22, I017+35, I017+43!
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	I019X+1!, IE2+7, IE2+11!, I0302AX+2!, I031A+7*, I031AX+1!
BGPD2	I019X+1!, IE2+11!, I0302AX+2!
BGPD3	I019X+1!, IE2+11!, I0302AX+2!
BGPD4	I019X+1!, IE2+11!, I0302AX+2!
BGPD5	I019X+1!, IE2+11!, I0302AX+2!
BGPD6	I019X+1!, IE2+11!, I0302AX+2!
BGPD7	I019X+1!, IE2+11!, I0302AX+2!
BGPD8	I019X+1!, IE2+11!, I0302AX+2!
BGPD9	I019X+1!, IE2+11!, I0302AX+2!
BGPDEP	I0302AX+1!
>> BGPED	I020+14, I020+19, IAA+12, I021+14, I031A+10
>> BGPEDATE	I017+5, I017+9, I017+13, I017+19, I019+7, I020+6, I020+8, I020+10, IAA+4, IAA+6 , IAA+8, I021+6, I021+8, I021+10, I0302A+6, I031A+8, BFR+6
BGPEDUC	IE2+10!, I0302AX+1!
BGPF	I017+43!
BGPFOB	I017+2!, I017+9*, I017+10, I017+38, I017+43!
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+33, I019+8, I020+13, I020+15, IAA+10, IAA+13, I014+8, I014+9, I016+7, I016+8 , I021+13, I021+15, IE2+8, I0302A+11, I031A+9, I031A+15, BFR+7, BFR+10
BGPHIV	IE2+10!, I0302AX+1!
BGPIN	I017+2!, I017+7, I017+11, I017+31, I017+43!, I019X+2!
BGPIN1	I017+2!, I017+7, I017+17, I017+31, I017+43!, I019X+2!, I031A+7, I031A+10, I031A+14, I031A+16
BGPIN2	I017+2!, I017+7, I017+23, I017+31, I017+43!
BGPIN3	I017+2!, I017+7*, I017+31, I017+43!
BGPINFO	I019+1*, I019+3!
>> BGPISSO	IE2+2*
>> BGPISSV	I017+33, I017+42, I019+8, 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+9, I0302A+11, 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+31, I017+41
BGPLDL	I0302AX+1!
>> BGPLDS	I014+3, I014+8, I014+9, I016+3, I016+5, I016+6, I016+7, I016+8
BGPLIFE	I0302AX+1!
BGPN	I019X+2!, I020+5, I020X+1!, IAA+3, IAAX+1!, I021+5*, I021X+1!
BGPN1	I017+32, I017+43!, 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+6, IE2+9, IE2+10! , IE2+11!, BP+1, I0302AX+2!, I031A+7, I031A+11*
BGPN2	I019X+1!, IE2+11!, LDL+1, I0302AX+2!, I031A+7, I031A+12
BGPN3	I019X+1!, IE2+11!, TOB+1, I0302AX+2!
BGPN4	I019X+1!, IE2+11!, I0302A+13*, BMI+1, I0302AX+2!
BGPN5	I019X+1!, IE2+11!, LIFE+1, I0302AX+2!
BGPN6	I019X+1!, IE2+11!, I0302AX+2!
>> BGPN8	I0302A+13
>> BGPN9	I0302A+10
BGPNBE	I017+43!
BGPNCOLO	I017+43!
BGPNFOB	I017+43!
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+43!
BGPOB	I031A+12*, I031A+14, I031A+15, I031AX+1!
BGPOTH	I017+43!
BGPOW	I031A+11*, I031A+15, I031AX+1!
BGPQ	I019+5, I019X+3!
BGPREF	I017+43!, I020+5, I020+18, I020X+1!, IAA+3, IAAX+1!, I021+5*, I021X+1!
BGPREM	I019X+4!
BGPRET	GETIFC~, GETIFC+1!
BGPRET(	GETIFC+8*
>> BGPS	I014+5, I014+7, I014+9, I016+4, I016+6, I016+8
BGPSDX	I019X+2!, I019X+4!
>> BGPSEX	I020+2, I021+2
BGPSIG	I017+2!, I017+13*, I017+16, I017+36, I017+43!
>> BGPSKIP	I017+3, I017+4, I017+5, I017+6, I017+31, I019+4, I019+5, I019+6, 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+7, I0302A+10, 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	I019X+2!
BGPTC	I019X+2!, I019X+3!
BGPTC1	I019+6, I019+7*, I019+8, I019X+4!
BGPTOB	I019X+2!, I019X+4!, I0302AX+1!
BGPTOBD	I019X+4!
BGPTOBS	I019X+4!
BGPTOM	I019X+4!
BGPTQ	I019X+2!, I019X+3!
BGPTU	I019+4, I019X+4!
BGPTUC	I019X+4!
BGPTUHF	I019X+4!
BGPTUQ	I019X+4!
>> 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+12, BP+1, LDL+1, TOB+1, LIFE+2
>> BGPVAL2	I0302A+12, BMI+1, LIFE+1*, LIFE+2
BGPX	I017+34, I017+35, I017+36, I017+38, I017+40, I017+41, I017+42, 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!
BJPC	TF+1~
BPGNTS	I019X+2!
C	I019X+3!, 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, I019X+3! , I014+4, I014+6, I014+7, IE2+10!, I0302AX+1!
>> DFN	I017+5, I017+9, I017+13, I017+19, I019+7, 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+6, I031A+8, I031A+11 , I031A+12, I031A+13, BFR+3, BFR+6
DT	I017+11, I017+17, I017+23, I014+3, I014+4, I014+6, I014+7, I016+3
E	I019X+3!, SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+6, IE2+10!, I0302AX+1!
EDATE	I019X+3!, SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~ , TF+6, IE2+10!, I0302AX+1!, GETIFC~
F	I019X+3!, IE2+10!, I0302AX+1!
G	SEAL+1~, SEAL+8, SEAL+11, SEAL+17, SEAL+18, DENTSRV+12, DENTSRV+13, DENTSRV+14, TF+1~, TF+9* , TF+13, TF+14, TF+18, TF+19
H	I019X+3!, IE2+10!, I0302AX+1!
I	TITLE~, TITLE+1
P	I019X+3!, 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	I019X+3!, SEAL+1~, SEAL+13*, SEAL+14, SEAL+15, IE2+10!, I0302AX+1!
T	I019X+3!, SEAL+1~, SEAL+12, SEAL+14, SEAL+15, SEAL+22, SEAL+23, TF+1~, TF+11, TF+17 , IE2+10!, I0302AX+1!
U	I017+10, I017+16, I017+22, I017+35, I017+36, I017+38, I017+42, I019+6, I019+8, 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+8, TF+10, TF+11, TF+15, TF+17, TF+20, 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	I019X+3!, SEAL+1~, SEAL+7, SEAL+8, SEAL+18, DENTSRV+14, DENTSRV+15, TF+8, TF+9, TF+11 , TF+14, TF+17, TF+19, TF+21, IE2+10!, I0302AX+1!, GETIFC+4, GETIFC+5, GETIFC+6, GETIFC+7* , GETIFC+8
X	I019X+3!, IAA+5~, SEAL+1~, SEAL+7, SEAL+24, DENTSRV+14, DENTSRV+15, TF+1~, TF+8, IE2+10! , I0302A+12, I0302AX+1!, BFR+9, GETIFC+1!, GETIFC+2, GETIFC+3, GETIFC+4
Y	I019X+3!, IAA+5, SEAL+1~, SEAL+7, SEAL+8, SEAL+9, SEAL+12, SEAL+13, SEAL+18, SEAL+19 , SEAL+22, TF+1~, TF+8, TF+9, TF+10, TF+11, TF+14, TF+15, TF+17, TF+19* , TF+20, IE2+10!, I0302AX+1!, BFR+9*, BFR+10
Z	I019X+3!, TF+1~, TF+5*, TF+11, IE2+10!, I0302AX+1!

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP3DPA2

Call Graph Total: 20