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 |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BGP7D75

Package: IHS GPRA Information System

Routine: BGP7D75


Information

BGP7D75 ; IHS/CMI/LAB - measure 31 ;

Source Information

Source file <BGP7D75.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
IHS GPRA Information System 9 $$PREG^BGP7D7  $$BETAALG1^BGP7D72  ($$ASAALLEG,$$BETACONT)^BGP7D721  ($$ACEALG,$$STATALG,$$STATCON)^BGP7D722  $$VAPI^BGP7D81  ($$CPTI,$$IPLSNOND,$$PLTAXND,$$TRANI)^BGP7DU  $$DATE^BGP7UTL  $$LASTDX^BGP7UTL1  
($$ICD,GETMEDS)^BGP7UTL2  
Kernel 2 ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT  $$UP^XLFSTR  
DRG Grouper 1 $$CODEN^ICPTCOD  
IHS Patient 1 $$DOB^AUPNPAT  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Patient Care Component Reports 1 $$START1^APCLDF  

Entry Points

Name Comments DBIA/ICR reference
RX71
RX7(P,BDATE,EDATE,BGPDD,BGPTD1,BGPTD2,BGPTD3,BGPTN1,BGPTN2,BGPTN3,BGPTC1,BGPTC2,BGPTC3,BGPDN1,BGPDN2) ;
ASACONTR(P,BDATE,EDATE,BGPADM,BGPDD) ;does patient have an aspirin allergy
READM(P,D,PV) ;EP
EXPIRED(H) ;
ACECONT(P,BDATE,EDATE,NMIB,NMIE,RPBD) ;EP does patient have an ACEI Contra
DSCH(H) ;
WAR71
AMA(H) ;EP
HEM ;now check for dx 459
AMIH(P,BDATE,EDATE) ;
IAMT ;EP
TRANS(H) ;

External References

Name Field # of Occurrence
$$START1^APCLDF AMIH+3, ACECONT+3, ACECONT+39, ACECONT+43
$$DOB^AUPNPAT IAMT+17, IAMT+34, IAMT+41, HEM+1
$$PREG^BGP7D7 ACECONT+37
$$BETAALG1^BGP7D72 IAMT+18
$$ASAALLEG^BGP7D721 IAMT+27
$$BETACONT^BGP7D721 IAMT+17
$$ACEALG^BGP7D722 IAMT+35
$$STATALG^BGP7D722 IAMT+41
$$STATCON^BGP7D722 IAMT+40
$$VAPI^BGP7D81 ASACONTR+14
$$CPTI^BGP7DU HEM+21
$$IPLSNOND^BGP7DU HEM+4, ACECONT+6
$$PLTAXND^BGP7DU HEM+3, ACECONT+5
$$TRANI^BGP7DU HEM+23
$$DATE^BGP7UTL RX71+9, WAR71+10, WAR71+12, HEM+2, HEM+3, HEM+4, HEM+16, HEM+22, HEM+24, ACECONT+4
, ACECONT+5, ACECONT+6, ACECONT+18, ACECONT+32, ACECONT+40, ACECONT+61
$$LASTDX^BGP7UTL1 HEM+1
$$ICD^BGP7UTL2 AMIH+22
GETMEDS^BGP7UTL2 RX7+4, ASACONTR+3
$$CODEN^ICPTCOD HEM+21, HEM+23
$$VAL^XBDIQ1 AMIH+24, HEM+16, ACECONT+18, ACECONT+32
$$FMADD^XLFDT IAMT+6, IAMT+14, IAMT+17, IAMT+23, IAMT+26, IAMT+31, IAMT+34, IAMT+38, IAMT+40, READM+2
, ASACONTR+3
$$FMDIFF^XLFDT RX71+8, WAR71+11
$$FMTE^XLFDT AMIH+3, ACECONT+3, ACECONT+39, ACECONT+43
$$UP^XLFSTR AMIH+25, RX7+8, ASACONTR+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] RX7+11, RX7+12, RX7+13, RX7+15, RX7+16, RX7+17, RX7+19, RX7+20, RX7+21, ASACONTR+11
, HEM+10, ACECONT+12, ACECONT+26
^ATXAX("B" IAMT+14, IAMT+22, IAMT+23, IAMT+30, IAMT+31, IAMT+38, AMIH+5, ASACONTR+5, ASACONTR+14, HEM+8
, ACECONT+10, ACECONT+24
^AUPNPREF - [#9000022] HEM+15, HEM+16, ACECONT+17, ACECONT+18, ACECONT+31, ACECONT+32
^AUPNPREF("AA" HEM+9, HEM+11, HEM+14, ACECONT+11, ACECONT+13, ACECONT+16, ACECONT+25, ACECONT+27, ACECONT+30
^AUPNVINP - [#9000010.02] AMIH+16, AMIH+42, AMA+1, EXPIRED+1, DSCH+1, TRANS+1
^AUPNVINP("AD" AMIH+13, AMIH+41
^AUPNVMED - [#9000010.14] RX7+7, RX7+8, RX7+10, RX71+1, RX71+2, RX71+7, ASACONTR+7, ASACONTR+8, ASACONTR+10, WAR71+1
, WAR71+2, WAR71+7
^AUPNVPED - [#9000010.16] ACECONT+46
^AUPNVPOV - [#9000010.07] AMIH+21, AMIH+22, AMIH+23
^AUPNVPOV("AD" AMIH+21
^AUPNVSIT - [#9000010] AMIH+7, AMIH+8, AMIH+9, AMIH+10, AMIH+39, READM+6, RX71+4, RX71+8, RX71+9, WAR71+4
, WAR71+8, WAR71+10, WAR71+11, WAR71+12
^AUPNVSIT("AAH" READM+3, READM+4
^AUTTEDT - [#9999999.09] ACECONT+48, ACECONT+49
^BGPSNOMG - [#90558.21] ACECONT+60
^BGPSNOMG("B" ACECONT+44
^DG(405.1 - [#405.1] AMA+3, EXPIRED+3, TRANS+3
^DPT - [#2] IAMT+11, IAMT+12
^PSDRUG - [#50] RX7+14, RX7+18, RX7+22, RX71+9, ASACONTR+12, WAR71+10, WAR71+12
^TMP($J IAMT+55!, AMIH+2!, AMIH+4, AMIH+6

Label References

Name Line Occurrences
$$ACECONT IAMT+34
$$AMA AMIH+17
$$AMIH IAMT+6
$$ASACONTR IAMT+26
$$EXPIRED AMIH+19
$$READM IAMT+8
$$RX7 IAMT+14, IAMT+23, IAMT+31, IAMT+38
$$TRANS AMIH+18
HEM ASACONTR+4
RX71 RX7+11, RX7+12, RX7+13, RX7+15, RX7+16, RX7+17, RX7+19, RX7+20, RX7+21, RX7+23
, RX7+24
WAR71 ASACONTR+11, ASACONTR+13, ASACONTR+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % AMIH+22*, ACECONT+45*, ACECONT+50*, ACECONT+51*, ACECONT+52*, ACECONT+53*, ACECONT+54*, ACECONT+55*, ACECONT+56*, ACECONT+57*
, ACECONT+58*, ACECONT+59*, ACECONT+60*, ACECONT+61
>> A AMIH+3*
>> B AMIH+3*, AMIH+13, AMIH+14*, AMIH+20*
BD ACECONT+1~
BDATE AMIH~, AMIH+3, RX7~, RX7+4, ASACONTR~, ACECONT~, ACECONT+3
BGPACE IAMT+29!, IAMT+54!
BGPACE( IAMT+50, IAMT+51
BGPACE("ADR" IAMT+35*
BGPACE("CONTRA" IAMT+34*
BGPACE("RX" IAMT+31*, IAMT+32
>> BGPACTCL IAMT+5
BGPADM ASACONTR~, ASACONTR+3, HEM+12, HEM+21, HEM+23
>> BGPAGEB IAMT+4
>> BGPAMI IAMT+6*, IAMT+7, IAMT+8, IAMT+9, IAMT+14, IAMT+17, IAMT+23, IAMT+26, IAMT+31, IAMT+34
, IAMT+38, IAMT+40
BGPASA IAMT+21!, IAMT+54!
BGPASA( IAMT+48, IAMT+49
BGPASA("ADR" IAMT+27*
BGPASA("CONTRA" IAMT+26*
BGPASA("RX" IAMT+23*, IAMT+24
>> BGPBDATE IAMT+6, IAMT+26, IAMT+34, IAMT+35, IAMT+40, IAMT+41
BGPBETA IAMT+3!, IAMT+13!, IAMT+54!
BGPBETA( IAMT+46, IAMT+47
BGPBETA("ADR" IAMT+18*
BGPBETA("CONTRA" IAMT+17*
BGPBETA("RX" IAMT+14*, IAMT+15
BGPC ACECONT+1~
>> BGPD1 IAMT+1*, IAMT+10*
>> BGPD2 IAMT+1*, IAMT+11*
>> BGPD3 IAMT+1*, IAMT+12*
>> BGPD4 IAMT+1*
>> BGPD5 IAMT+1*
>> BGPD6 IAMT+1*
>> BGPD7 IAMT+1*
>> BGPD8 IAMT+1*
>> BGPD9 IAMT+1*
BGPDD RX7~, ASACONTR~, ASACONTR+3, WAR71+6, WAR71+10, WAR71+11, HEM+13, HEM+21, HEM+23
BGPDN1 RX7~, RX7+23
BGPDN2 RX7~, RX7+24
>> BGPEDATE IAMT+17, IAMT+18, IAMT+26, IAMT+27, IAMT+34, IAMT+35, IAMT+40, IAMT+41
BGPG RX7+3*, RX7+6*, RX71+9*, RX71+11, ASACONTR+2*, ASACONTR+6, WAR71+10*, WAR71+12*, WAR71+14, HEM+1!*
, HEM+2, HEM+7*, HEM+16*, HEM+19, ACECONT+1~, ACECONT+3!, ACECONT+9*, ACECONT+18*, ACECONT+21, ACECONT+23*
, ACECONT+32*, ACECONT+35, ACECONT+39!, ACECONT+41!
BGPG( ACECONT+45, ACECONT+46, ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54, ACECONT+55, ACECONT+56, ACECONT+57
, ACECONT+58, ACECONT+59, ACECONT+60
BGPG(1 ACECONT+4, ACECONT+40
BGPIHD IAMT+54!
BGPMEDS1 IAMT+54!, RX7+2!, RX7+4, RX7+5, ASACONTR+1!, ASACONTR+3, ASACONTR+4
BGPMEDS1( RX7+6, ASACONTR+6
>> BGPN1 IAMT+2*, IAMT+19*, IAMT+43
>> BGPN10 IAMT+2*, IAMT+32*, IAMT+34, IAMT+35, IAMT+36, IAMT+50
>> BGPN11 IAMT+2*, IAMT+50
>> BGPN12 IAMT+2*, IAMT+34*, IAMT+35*, IAMT+36, IAMT+50
>> BGPN13 IAMT+2*, IAMT+42*, IAMT+43
>> BGPN14 IAMT+2*, IAMT+39*, IAMT+40, IAMT+41, IAMT+42, IAMT+52
>> BGPN15 IAMT+2*, IAMT+52
>> BGPN16 IAMT+2*, IAMT+40*, IAMT+41*, IAMT+42, IAMT+52
>> BGPN17 IAMT+2*, IAMT+43*, IAMT+45
>> BGPN2 IAMT+2*, IAMT+15*, IAMT+17, IAMT+18, IAMT+19, IAMT+46
>> BGPN3 IAMT+2*, IAMT+15*, IAMT+46
>> BGPN4 IAMT+2*, IAMT+15*, IAMT+17*, IAMT+18*, IAMT+19, IAMT+46
>> BGPN5 IAMT+2*, IAMT+28*, IAMT+43
>> BGPN6 IAMT+2*, IAMT+24*, IAMT+26, IAMT+27, IAMT+28, IAMT+48
>> BGPN7 IAMT+2*, IAMT+48
>> BGPN8 IAMT+2*, IAMT+26*, IAMT+27*, IAMT+28, IAMT+48
>> BGPN9 IAMT+2*, IAMT+36*, IAMT+43
BGPSTAT IAMT+37!, IAMT+54!
BGPSTAT( IAMT+52, IAMT+53
BGPSTAT("ADR" IAMT+41*
BGPSTAT("CONTRA" IAMT+40*
BGPSTAT("RX" IAMT+38*, IAMT+39
>> BGPSTOP IAMT+4*, IAMT+5*, IAMT+7*, IAMT+8*
BGPTC1 RX7~, RX7+19
BGPTC2 RX7~, RX7+20
BGPTC3 RX7~, RX7+21
BGPTD1 RX7~, RX7+11
BGPTD2 RX7~, RX7+12
BGPTD3 RX7~, RX7+13
BGPTN1 RX7~, RX7+15
BGPTN2 RX7~, RX7+16
BGPTN3 RX7~, RX7+17
>> BGPV IAMT+9*
>> BGPVALUE IAMT+3*, IAMT+44*, IAMT+45*, IAMT+46*, IAMT+47*, IAMT+48*, IAMT+49*, IAMT+50*, IAMT+51*, IAMT+52*
, IAMT+53*
>> BGPX AMIH+6*
>> C IAMT+22*, IAMT+23, RX7+18*, RX7+19, RX7+20, RX7+21
D AMIH+6*, AMIH+21*, AMIH+38*, AMIH+39, AMIH+41*, READM~, READM+2, READM+7, RX7+10*, RX7+11
, RX7+12, RX7+13, RX7+14, RX7+18, RX7+22, RX71+9, ASACONTR+10*, ASACONTR+11, ASACONTR+12, ASACONTR+14
, WAR71+10, WAR71+12, HEM+11*, HEM+14, ACECONT+13*, ACECONT+14, ACECONT+16, ACECONT+27*, ACECONT+28, ACECONT+30
, ACECONT+45*
>> D1 READM+2*
>> DFN IAMT+6, IAMT+8, IAMT+11, IAMT+12, IAMT+14, IAMT+17, IAMT+18, IAMT+23, IAMT+26, IAMT+27
, IAMT+31, IAMT+34, IAMT+35, IAMT+38, IAMT+40, IAMT+41
E AMIH+3*, AMIH+6*, READM+1~, READM+6*, READM+7, READM+8, WAR71+8*, WAR71+10, ACECONT+1~, ACECONT+3*
, ACECONT+39*, ACECONT+43*
ED READM+1~, READM+2*, READM+8, ACECONT+1~
EDATE AMIH~, AMIH+3, AMIH+16, RX7~, RX7+4, RX71+6, RX71+8, ASACONTR~, HEM+1, HEM+3
, HEM+4, ACECONT~, ACECONT+3, ACECONT+5, ACECONT+6, ACECONT+37, ACECONT+39, ACECONT+43
G AMIH+2!, AMIH+6*, AMIH+39*, AMIH+40, READM+1~, READM+2*, READM+9*, READM+10, RX7+9*, RX7+11*
, RX7+12*, RX7+13*, RX7+15*, RX7+16*, RX7+17*, RX7+19*, RX7+20*, RX7+21*, RX7+23*, RX7+24*
, RX7+25, ASACONTR+9*, ASACONTR+11*, ASACONTR+13*, ASACONTR+14*, ASACONTR+15
G( AMIH+39*, AMIH+41
G(0 AMIH+41, AMIH+42
H AMIH+12*, AMIH+13*, AMIH+15, AMIH+16, AMIH+17, AMIH+18, AMIH+19, AMIH+41*, AMIH+42, AMA~
, AMA+1, EXPIRED~, EXPIRED+1, DSCH~, DSCH+1, TRANS~, TRANS+1
>> J RX71+1*, RX71+6, WAR71+1*, WAR71+6
>> K RX7+3*, ASACONTR+2*
>> M AMIH+6*
N AMIH+24*, AMIH+25*, AMIH+26, AMIH+27, AMIH+28, AMIH+29, AMIH+30, AMIH+31, AMIH+32, AMIH+33
, AMIH+34, AMIH+35, AMIH+36, AMIH+37, RX7+14*, RX7+15, RX7+16, RX7+17, RX7+22*, RX7+23
, RX7+24, ASACONTR+12*, ASACONTR+13, HEM+14*, HEM+15, HEM+16, ACECONT+1~, ACECONT+16*, ACECONT+17, ACECONT+18
, ACECONT+30*, ACECONT+31, ACECONT+32
NMIB ACECONT~, ACECONT+14, ACECONT+28, ACECONT+37, ACECONT+39, ACECONT+43
NMIE ACECONT~, ACECONT+15, ACECONT+29
P AMIH~, AMIH+3, READM~, READM+3, READM+4, RX7~, RX7+4, ASACONTR~, ASACONTR+3, HEM+1
, HEM+3, HEM+4, HEM+9, HEM+11, HEM+14, HEM+21, HEM+23, ACECONT~, ACECONT+3, ACECONT+5
, ACECONT+6, ACECONT+11, ACECONT+13, ACECONT+16, ACECONT+25, ACECONT+27, ACECONT+30, ACECONT+37, ACECONT+39, ACECONT+43
PV READM~, READM+5
>> R RX7+3*, ASACONTR+2*
RPBD ACECONT~, ACECONT+2*, ACECONT+37, ACECONT+39, ACECONT+43
>> S RX71+7*, RX71+9, WAR71+7*, WAR71+12
SN ACECONT+1~, ACECONT+44*, ACECONT+60
>> T IAMT+30*, IAMT+31, AMIH+5*, AMIH+22, ASACONTR+5*, ASACONTR+11, HEM+8*, HEM+10, ACECONT+10*, ACECONT+12
, ACECONT+24*, ACECONT+26, ACECONT+45*, ACECONT+46*, ACECONT+47, ACECONT+48, ACECONT+49*, ACECONT+50, ACECONT+51, ACECONT+52
, ACECONT+53, ACECONT+54, ACECONT+55, ACECONT+56, ACECONT+57, ACECONT+58, ACECONT+59, ACECONT+60
U IAMT+7, IAMT+8, IAMT+9, IAMT+11, IAMT+12, IAMT+14, IAMT+17, IAMT+23, IAMT+26, IAMT+31
, IAMT+34, IAMT+38, IAMT+40, IAMT+46, IAMT+47, IAMT+48, IAMT+49, IAMT+50, IAMT+51, IAMT+52
, IAMT+53, AMIH+6, AMIH+8, AMIH+9, AMIH+10, AMIH+16, AMIH+22, AMIH+23, AMIH+39, AMIH+42
, READM+6, AMA+1, AMA+3, EXPIRED+1, EXPIRED+3, DSCH+1, TRANS+1, TRANS+3, RX7+6, RX7+8
, RX7+10, RX7+14, RX7+18, RX7+22, RX71+1, RX71+2, RX71+7, RX71+8, RX71+9, ASACONTR+6
, ASACONTR+8, ASACONTR+10, ASACONTR+12, WAR71+1, WAR71+2, WAR71+7, WAR71+8, WAR71+10, WAR71+11, WAR71+12
, WAR71+14, HEM+2, HEM+3, HEM+4, HEM+15, HEM+16, HEM+22, HEM+24, ACECONT+4, ACECONT+5
, ACECONT+6, ACECONT+17, ACECONT+18, ACECONT+31, ACECONT+32, ACECONT+37, ACECONT+40, ACECONT+46, ACECONT+49, ACECONT+50
, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54, ACECONT+55, ACECONT+56, ACECONT+57, ACECONT+58, ACECONT+59, ACECONT+60
, ACECONT+61
V AMIH+6*, AMIH+7, AMIH+8, AMIH+9, AMIH+10, AMIH+13, AMIH+21, AMIH+39, AMIH+41*, AMIH+42
, READM+1~, READM+3*, READM+4*, READM+5, READM+6, RX71+2*, RX71+3, RX71+4, RX71+8, RX71+9
, WAR71+2*, WAR71+3, WAR71+4, WAR71+8, WAR71+10, WAR71+11, WAR71+12
X IAMT+46*, IAMT+47, IAMT+48*, IAMT+49, IAMT+50*, IAMT+51, IAMT+52*, IAMT+53, READM+1~, READM+3*
, READM+4, AMA+1*, AMA+2, AMA+3*, AMA+4, EXPIRED+1*, EXPIRED+2, EXPIRED+3*, EXPIRED+4, TRANS+1*
, TRANS+2, TRANS+3*, TRANS+4, RX7+6*, ASACONTR+6*, HEM+3*, HEM+4*, HEM+9*, HEM+10, HEM+11
, HEM+14, HEM+21*, HEM+22, HEM+23*, HEM+24, ACECONT+1~, ACECONT+3*, ACECONT+5*, ACECONT+6*, ACECONT+11*
, ACECONT+12, ACECONT+13, ACECONT+16, ACECONT+25*, ACECONT+26, ACECONT+27, ACECONT+30, ACECONT+37*, ACECONT+39*, ACECONT+43*
, ACECONT+45*, ACECONT+46, ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54, ACECONT+55, ACECONT+56, ACECONT+57
, ACECONT+58, ACECONT+59, ACECONT+60
Y AMIH+21*, AMIH+22, AMIH+23, AMIH+24, RX7+6*, RX7+7, RX7+8, RX7+10, RX71+1, RX71+2
, RX71+7, ASACONTR+6*, ASACONTR+7, ASACONTR+8, ASACONTR+10, WAR71+1, WAR71+2, WAR71+7, HEM+12, HEM+13
, ACECONT+1~, ACECONT+3*, ACECONT+14*, ACECONT+15, ACECONT+28*, ACECONT+29, ACECONT+39*, ACECONT+42*, ACECONT+43
Z RX71+8*, RX71+9, WAR71+11*, WAR71+12, ACECONT+1~
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All