Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BGP2D7

Package: IHS GPRA Information System

Routine: BGP2D7


Information

BGP2D7 ; IHS/CMI/LAB - measure 31 ;

Source Information

Source file <BGP2D7.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS GPRA Information System 5 $$TOBHF^BGP2D712  PREGSCRN^BGP2D713  ($$CPT,$$TRAN)^BGP2DU  $$DATE^BGP2UTL  ($$LASTDX,$$LASTPRC)^BGP2UTL1  
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  

Caller Graph

Caller Graph Total: 20

Package Total Caller Graph
IHS GPRA Information System 20 BGP2C12  BGP2C2X  BGP2CON1  BGP2CU2  BGP2D23  BGP2D26  BGP2D41  BGP2D71  
BGP2D712  BGP2D713  BGP2D722  BGP2D723  BGP2D732  BGP2D75  BGP2D8  BGP2D88  
BGP2D89  BGP2D9  BGP2DPA2  BGP2EL3  

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 TA+17, PED+15, PROB+8, MA+12, DX+10
$$AGE^AUPNPAT AGE+2
$$TOBHF^BGP2D712 TA+2
PREGSCRN^BGP2D713 PREGSCRN+1
$$CPT^BGP2DU MA+18, MA+21, CPTSM+2
$$TRAN^BGP2DU MA+24, MA+27
$$DATE^BGP2UTL 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^BGP2UTL1 DX+2
$$LASTPRC^BGP2UTL1 MA+4
$$ICDDX^ICDCODE PED+14, 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

Interaction Calls

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" TA+16, PED+15, 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+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+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, PREG+1~, 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+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
, 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+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*
BGPXPWD 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+1~, 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+1~, 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, PREG+1~, 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
>> I TA+17*
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!, PED+13*, PED+14*, PED+15
T TA+16*, TA+17, PED+5*, PED+6*, PED+7, PED+8, PED+9*, PED+10, PED+11, PED+12
, PED+13, 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, PREG+1~, 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+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+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, 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+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, PREG+1~, 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+1~, 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All