Routine: BGP1D7

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
IHS GPRA Information System	5	$$TOBHF^BGP1D712 PREGSCRN^BGP1D713 ($$CPT,$$TRAN)^BGP1DU $$DATE^BGP1UTL ($$LASTDX,$$LASTPRC)^BGP1UTL1
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPROV)^APCLV
DRG Grouper	1	$$ICDDX^ICDCODE
IHS Patient	1	$$AGE^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Kernel	1	($$FMADD,$$FMDIFF,$$FMTE)^XLFDT
Taxonomy	1	$$ICD^ATXCHK

Package	Total	Caller Graph
IHS GPRA Information System	19	BGP1C12 BGP1C2X BGP1CON1 BGP1CU2 BGP1D23 BGP1D26 BGP1D41 BGP1D71 BGP1D712 BGP1D713 BGP1D722 BGP1D723 BGP1D732 BGP1D75 BGP1D8 BGP1D88 BGP1D89 BGP1DPA2 BGP1EL3

Package

Total

Caller Graph

IHS GPRA Information System

BGP1C12  BGP1C2X  BGP1CON1  BGP1CU2  BGP1D23  BGP1D26  BGP1D41  BGP1D71
BGP1D712  BGP1D713  BGP1D722  BGP1D723  BGP1D732  BGP1D75  BGP1D8  BGP1D88
BGP1D89  BGP1DPA2  BGP1EL3

Entry Points

Name	Comments	DBIA/ICR reference
TOBACCO(P,BDATE,EDATE,CESSIN)	;EP - USED FOR TOBACCO SCREEN ONLY
MA	;now check for abortion or miscarriage
I18	;EP
DX(P,BDATE,EDATE)	;EP
TAEND	;now check pregnancy if necessary
AGE	;
LOINC(A,B)	;
I023	;EP - PHN
PED(P,BDATE,EDATE)	;EP
PHNV(P,BDATE,EDATE,HOMELOC)	;
PREG(P,BDATE,EDATE,NORXCHR,NORX)	;EP
LASTHF(P,C,BDATE,EDATE)	;EP - get last factor in category C for patient P
CPTSM(P,BDATE,EDATE)	;EP - did pat have TOBACCO SCREENING cpt?
PREGSCRN	;
HOME	;
TOBACCO1	;check for tobacco documented in health factors
TOBACCO0	;lookup in health status
PROB	;
DENT(P,BDATE,EDATE)	;EP
TA	;EP - called from elder

External References

Name	Field # of Occurrence
$$START1^APCLDF	PHNV+3, DENT+2, PED+3, PREG+7, MA+2
$$CLINIC^APCLV	HOME+2, PREG+13
$$PRIMPROV^APCLV	PREG+16
$$ICD^ATXCHK	PROB+8, MA+12, DX+10
$$AGE^AUPNPAT	AGE+2
$$TOBHF^BGP1D712	TA+2
PREGSCRN^BGP1D713	PREGSCRN+1
$$CPT^BGP1DU	MA+18, MA+21, CPTSM+2
$$TRAN^BGP1DU	MA+24, MA+27
$$DATE^BGP1UTL	TA+22, TA+23, TA+24, TA+28, TA+30, TA+34, TA+39, TA+40, TA+41, TA+42 , TOBACCO0+7, LASTHF+13
$$LASTDX^BGP1UTL1	DX+2
$$LASTPRC^BGP1UTL1	MA+4
$$ICDDX^ICDCODE	DX+3, DX+11
$$VAL^XBDIQ1	TOBACCO0+1, LASTHF+13
$$VALI^XBDIQ1	PHNV+10
$$FMADD^XLFDT	I18+10, I18+12, PREG+19
$$FMDIFF^XLFDT	AGE+1
$$FMTE^XLFDT	PHNV+3, DENT+2, PED+3, PREG+7, MA+2

Name	Line Occurrences
Function Call: WRITE	Prompt: BGPBOMB Line Location: AGE+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	LOINC+3, LOINC+5
^ATXAX("B"	PROB+2, MA+6, MA+17, MA+20, MA+23, MA+26, DX+4, CPTSM+2
^AUPNHF("AA"	TOBACCO0+1, TOBACCO0+3
^AUPNPROB - [#9000011]	PROB+4, PROB+5, PROB+6, PROB+7, PROB+9, MA+8, MA+9, MA+10, MA+11, DX+6 , DX+7, DX+8, DX+9, DX+11
^AUPNPROB("AC"	PROB+3, MA+7, DX+5
^AUPNVDEN - [#9000010.05]	DENT+8
^AUPNVDEN("AD"	DENT+8
^AUPNVHF("AA"	LASTHF+5, LASTHF+6, LASTHF+9
^AUPNVPED - [#9000010.16]	PED+6
^AUPNVPRV - [#9000010.06]	PHNV+8
^AUPNVPRV("AD"	PHNV+8
^AUPNVSIT - [#9000010]	HOME+4, AGE+1, AGE+2, DENT+5, DENT+6, DENT+7, DENT+8
^AUTTADA - [#9999999.31]	DENT+8
^AUTTEDT - [#9999999.09]	PED+8, PED+9
^AUTTHF - [#9999999.64]	TOBACCO0+6
^AUTTHF("AC"	LASTHF+4
^AUTTHF("B"	LASTHF+1
^DD(9000010.06	PHNV+10
^DIC(7 - [#7]	PHNV+11
^DPT - [#2]	AGE+1
^LAB(95.3 - [#95.3]	LOINC+2, LOINC+4
^TMP($J	TAEND+5!, I023+7!, PHNV+2!, PHNV+4, PHNV+5, DENT+1!, DENT+3, DENT+4

Label References

Name	Line Occurrences
$$CPTSM	TA+6
$$DENT	TA+5
$$DX	TA+3
$$LASTHF	TOBACCO1+2, TOBACCO1+4, TOBACCO1+6, TOBACCO1+8
$$PED	TA+4
$$PHNV	I023+4
$$PREG	I18+10
AGE	PHNV+16
HOME	PHNV+15
MA	PREG+21
PREGSCRN	TAEND+3
PROB	PREG+9
TAEND	TA+13
TOBACCO0	TOBACCO+5
TOBACCO1	TOBACCO+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	TA+15, TA+16, TA+17, TA+22, TA+28, TAEND+4!, PHNV+10, PHNV+11, PHNV+12, PHNV+14 , HOME+2, HOME+4, PED+5, PED+10, PED+11, PED+12, PED+13, PED+14, PED+15, PED+16* , PED+17, PED+18, PED+19, PED+20, PED+21, PED+22, PED+23, PED+24, PED+25, PED+26 , PED+27, PED+28, PED+29, PED+30, PED+31, PED+32, PED+33, PED+34, PED+35, PED+36 , PED+37, PED+38, MA+18, MA+19, MA+21, MA+22, MA+24, MA+25, MA+27, MA+28 , LOINC+1~, LOINC+2, LOINC+3, LOINC+4*, LOINC+5
A	TAEND+4!, PHNV+2, PHNV+3, DENT+2, LOINC~, LOINC+2, LOINC+4
B	TAEND+4!, PHNV+3, DENT+2, DENT+8, PREG+1~, PREG+2, PREG+10, PREG+19, PREG+21, PROB+1 , LOINC~, LOINC+3, LOINC+5
BDATE	TAEND+4!, PHNV~, PHNV+3, DENT~, DENT+2, PED~, PED+3, PREG~, PREG+7, PROB+6 , MA+4, DX~, DX+2, DX+8, TOBACCO~, TOBACCO1+2, TOBACCO1+4, TOBACCO1+6, TOBACCO1+8, TOBACCO0+5 , LASTHF~, LASTHF+8, CPTSM~, CPTSM+2
BGP	TOBACCO+1!
BGP1320	I18+1, TA+5, TA+10, TA+42, TAEND+4!
BGP20M	I18+12*, TAEND+4!
>> BGP365	I023+4
>> BGPACTCL	TA+43, TAEND+1
>> BGPACTUP	I18+3, I023+2
>> BGPAGEB	I18+2, I18+4, I18+5, I18+6, I18+7, I18+8, I18+9
>> BGPBDATE	TA+2, TA+3, TA+4, TA+5, TA+6
>> BGPBOMB	AGE+7
BGPD	PREG+1~, PREG+2, PREG+18, PROB+11, PROB+12*, MA+2, MA+9, MA+18, MA+21, MA+24 , MA+27
>> BGPD1	I18+1, I18+3, I18+11, TA+43, TAEND+1
>> BGPD2	I18+1, I18+4, I18+11
>> BGPD3	I18+1, I18+5, I18+11
>> BGPD4	I18+1, I18+6, I18+11
>> BGPD5	I18+1, I18+7, I18+11
>> BGPD6	I18+1, I18+8, I18+11
>> BGPD7	I18+1, I18+9, I18+11
>> BGPD8	I18+1, I18+10, I18+11, TA+43, TAEND+1, TAEND+3
>> BGPD9	I18+1*
BGPDX	PREG+1~
BGPDX(	PREG+18*
>> BGPEDATE	I18+10, I18+12, TA+2, TA+3, TA+4, TA+5, TA+6, I023+4
BGPG	PED+1!, PED+4, PREG+1~, PREG+5!, PREG+9, MA+2!, MA+4*, MA+5, DX+1!
BGPG(	PED+5, PED+6, PED+10, PED+11, PED+12, PED+13, PED+14, PED+15, PED+16, PED+17 , PED+18, PED+19, PED+20, PED+21, PED+22, PED+23, PED+24, PED+25, PED+26, PED+27 , PED+28, PED+29, PED+30, PED+31, PED+32, PED+33, PED+34, PED+35, PED+36, PED+37 , PREG+10, PREG+12, PREG+13, PREG+16
BGPG(1	MA+3, DX+2*, DX+3
>> BGPHOME	I023+4
BGPN1	I18+1, TA+7, TA+8, TA+9, TA+10, TA+11, TA+13, TA+37, TAEND+3, I023+1! , I023+3, I023+5
>> BGPN10	I18+1*
BGPN2	I18+1, TA+20, TA+21, TA+22, TA+23, TA+24, I023+1!, I023+3*
BGPN3	I18+1, TA+27, TA+28, TA+30, I023+1!
BGPN4	I18+1, TA+33, TA+34*, I023+1!
>> BGPN5	I18+1, TA+36
>> BGPN6	I18+1*
>> BGPN7	I18+1*
>> BGPN8	I18+1*
>> BGPN9	I18+1*
>> BGPRTYPE	TAEND+3
>> BGPSCPT	TA+6*, TA+11, TA+23, TA+24, TA+29, TA+30, TA+34, TA+40
BGPSDX	TA+3*, TA+8, TA+16, TA+17, TA+22, TA+28, TA+39, TAEND+4!
>> BGPSEX	I18+10
>> BGPSTOP	I18+2, I18+11, I023+2*
BGPTOB	TA+2, TA+7, TA+14, TA+20, TA+21, TA+36, TA+38, TOBACCO+1!, TOBACCO+4, TOBACCO+6 , TOBACCO1+1!, TOBACCO1+2, TOBACCO1+3, TOBACCO1+4, TOBACCO1+5, TOBACCO1+6, TOBACCO1+7, TOBACCO1+8, TOBACCO0+7
>> BGPVAL	TA+12, TA+20, TA+21, TA+22, TA+23, TA+24, TA+27, TA+28, TA+30, TA+33 , TA+34, TA+36, TA+37, TA+38, TA+39, TA+40, TA+41, TA+42*, TA+44, TAEND+2
BGPVALUE	TA+12, TA+44, TAEND+2, I023+1!, I023+4, I023+5, I023+6*
BGPXPBD	I18+1, TA+4, TA+9, TA+41, TAEND+4!
C	TAEND+4!, PHNV+5, PHNV+13, PHNV+14, PHNV+17, HOME+2, HOME+4, AGE+3, AGE+4, AGE+5 , AGE+6, PREG+13, PREG+14, PREG+15, PREG+16, PREG+17, LASTHF~, LASTHF+1, LASTHF+2, LASTHF+4
CESSIN	TOBACCO~, TOBACCO+2*, TOBACCO1+6
CNT	PREG+1~, PREG+2, PREG+18, PREG+21
D	TAEND+4!, PHNV+7, PHNV+8, PED+5, PREG+12, PREG+18, PREG+19, TOBACCO1+2!, TOBACCO1+4!, TOBACCO1+6! , TOBACCO1+8!, LASTHF+3, LASTHF+6, LASTHF+7, LASTHF+8, LASTHF+9, LASTHF+11*, LASTHF+12, LASTHF+13
>> DAYS	AGE+1*, AGE+3, AGE+4
>> DFN	I18+10, TA+2, TA+3, TA+4, TA+5, TA+6, I023+4
E	TAEND+4!, PHNV+3, DENT+2, PED+3, PREG+7, MA+2, TOBACCO0+3, TOBACCO0+4, TOBACCO0+5, TOBACCO0+7 , TOBACCO0+8!
EDATE	TAEND+4!, PHNV~, PHNV+3, DENT~, DENT+2, PED~, PED+3, PREG~, PREG+7, PREG+19 , PROB+5, MA+2, MA+4, MA+10, MA+18, MA+21, MA+24, MA+27, DX~, DX+2 , DX+7, TOBACCO~, TOBACCO1+2, TOBACCO1+4, TOBACCO1+6, TOBACCO1+8, TOBACCO0+4, LASTHF~, LASTHF+7, CPTSM~ , CPTSM+2
F	TA+14*, TA+20, TA+21, TA+27, TA+33, TA+36, TAEND+4!
>> G	DENT+4, DENT+8, DENT+10, DENT+11, PROB+3, PROB+9, PROB+11, PROB+12, MA+7, MA+13 , MA+15, DX+5, DX+11, DX+13
H	TAEND+4!, TOBACCO1+2!, TOBACCO1+4!, TOBACCO1+6!, TOBACCO1+8!, LASTHF+3, LASTHF+4, LASTHF+5, LASTHF+6, LASTHF+9
HOMELOC	PHNV~, PHNV+1*, HOME+3, HOME+4
>> HV	HOME+1, HOME+2, HOME+4*, AGE+3, AGE+4, AGE+5, AGE+6
NORX	PREG~, PREG+4*, PREG+15
NORXCHR	PREG~, PREG+3*, PREG+14, PREG+17
O	TOBACCO1+2!, TOBACCO1+4!, TOBACCO1+6!, TOBACCO1+8!, LASTHF+3!
O(	LASTHF+9*, LASTHF+13
O(0	LASTHF+11
P	TAEND+4!, PHNV~, PHNV+3, AGE+1, AGE+2, DENT~, DENT+2, PED~, PED+3, PREG~ , PREG+7, PROB+3, MA+2, MA+4, MA+7, MA+18, MA+21, MA+24, MA+27, DX~ , DX+2, DX+5, TOBACCO~, TOBACCO1+2, TOBACCO1+4, TOBACCO1+6, TOBACCO1+8, TOBACCO0+1, TOBACCO0+3, LASTHF~ , LASTHF+5, LASTHF+6, LASTHF+9, CPTSM~, CPTSM+2
>> Q	PHNV+8*, PHNV+9, PHNV+10
S	TAEND+4!
>> T	PED+5, PED+6, PED+7, PED+8, PED+9, PED+10, PED+11, PED+12, PED+13, PED+14 , PED+15, PED+16, PED+17, PED+18, PED+19, PED+20, PED+21, PED+22, PED+23, PED+24 , PED+25, PED+26, PED+27, PED+28, PED+29, PED+30, PED+31, PED+32, PED+33, PED+34 , PED+35, PED+36, PED+37, PROB+2, PROB+8, MA+6, MA+12, MA+17, MA+18, MA+20* , MA+21, MA+23, MA+24, MA+26, MA+27, DX+4*, DX+10
U	TA+16, TA+17, TA+20, TA+21, TA+22, TA+23, TA+24, TA+27, TA+28, TA+29 , TA+30, TA+33, TA+34, TA+36, TA+38, TA+39, TA+40, TA+41, TA+42, I023+6 , PHNV+5, PHNV+8, PHNV+10, PHNV+11, PHNV+13, PHNV+14, HOME+2, HOME+4, AGE+1, AGE+2 , AGE+3, AGE+4, AGE+5, AGE+6, DENT+4, DENT+6, DENT+7, DENT+8, DENT+11, PED+6 , PED+9, PED+10, PED+11, PED+12, PED+13, PED+14, PED+15, PED+16, PED+17, PED+18 , PED+19, PED+20, PED+21, PED+22, PED+23, PED+24, PED+25, PED+26, PED+27, PED+28 , PED+29, PED+30, PED+31, PED+32, PED+33, PED+34, PED+35, PED+36, PED+37, PREG+12 , PREG+13, PREG+16, PROB+4, PROB+5, PROB+6, PROB+7, PROB+9, MA+8, MA+9, MA+10 , MA+11, DX+3, DX+6, DX+7, DX+8, DX+9, DX+11, TOBACCO0+6, LOINC+2, LOINC+4 , CPTSM+3
V	TA+43, TA+44, TAEND+1, TAEND+2, TAEND+4!, PHNV+5, PHNV+8, HOME+2, HOME+4, AGE+1 , AGE+2, DENT+4, DENT+5, DENT+6, DENT+7, DENT+8
X	TAEND+4!, PHNV+5, DENT+4, PED+3, PED+5, PED+6, PED+10, PED+11, PED+12, PED+13 , PED+14, PED+15, PED+16, PED+17, PED+18, PED+19, PED+20, PED+21, PED+22, PED+23 , PED+24, PED+25, PED+26, PED+27, PED+28, PED+29, PED+30, PED+31, PED+32, PED+33 , PED+34, PED+35, PED+36, PED+37, PREG+7, PREG+10, PREG+12, PREG+13, PREG+16, PROB+3* , PROB+4, PROB+5, PROB+6, PROB+7, PROB+9, MA+2, MA+7, MA+8, MA+9, MA+10 , MA+11, DX+5, DX+6, DX+7, DX+8, DX+9, DX+11, TOBACCO0+1, TOBACCO0+8!, CPTSM+1~ , CPTSM+2*, CPTSM+3
Y	TAEND+4!, PHNV+5, PHNV+7, PED+2, PED+3, PREG+6, PREG+7, PROB+7, PROB+8, MA+2 , MA+11, MA+12, DX+9, DX+10, DX+11, TOBACCO0+1, TOBACCO0+2, TOBACCO0+3, TOBACCO0+6, TOBACCO0+7 , TOBACCO0+8!
>> YRS	AGE+2*, AGE+4, AGE+5, AGE+6
Z	TAEND+4!, PHNV+7, DENT+8

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP1D7

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 19

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: