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

Package: IHS GPRA Information System

Routine: BGP8D721


Information

BGP8D721 ; IHS/CMI/LAB - measure AHR.A ;

Source Information

Source file <BGP8D721.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
IHS GPRA Information System 11 $$ASAALLEG^BGP8CU1  $$BETAALG1^BGP8D72  ($$ACEALG,$$ACECONT,$$ACERX,$$STATALG,$$STATCON,$$STATRX)^BGP8D722  BETACONT^BGP8D724  $$CHD^BGP8D729  $$VAPI^BGP8D81  $$DAYS^BGP8D82  ($$CPTI,$$TRANI)^BGP8DU  
$$DATE^BGP8UTL  $$LASTDX^BGP8UTL1  GETMEDS^BGP8UTL2  
Kernel 2 ($$FMADD,$$FMDIFF)^XLFDT  $$UP^XLFSTR  
DRG Grouper 1 $$CODEN^ICPTCOD  
IHS Patient 1 $$DOB^AUPNPAT  
IHS VA Utilities 1 $$VAL^XBDIQ1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS GPRA Information System 2 BGP8D731  BGP8D75  

Entry Points

Name Comments DBIA/ICR reference
BETACONT(P,BDATE,EDATE,NMIBD,NMIED) ;EP - BETA BLOCKER CONTRAINDICATION
ASAPRIO ;now add in any before BEG DATE
ASAREF(P,BDATE,EDATE) ;EP
IAHRA ;EP
BETAREF(P,BDATE,EDATE) ;EP
ASA1
ASACONTR(P,BDATE,EDATE,BGPNDAYS) ;does patient have an aspirin allergy
BETAPRIO ;now add in any before BEG DATE
BETA(P,BDATE,EDATE,BGPNDAYS) ;EP
ASAC2 ;now check for dx 459
WAR2
WAR1
BETA2
BETA1
ASAALLEG(P,EDATE) ;EP
WARPRIO ;now add in any before BEG DATE
ASA(P,BDATE,EDATE,BGPNDAYS) ;EP
ASA2

External References

Name Field # of Occurrence
$$DOB^AUPNPAT IAHRA+14, IAHRA+28, IAHRA+29, IAHRA+35, ASAC2+1, ASAALLEG+2
$$ASAALLEG^BGP8CU1 ASAALLEG+2
$$BETAALG1^BGP8D72 IAHRA+15
$$ACEALG^BGP8D722 IAHRA+29
$$ACECONT^BGP8D722 IAHRA+28
$$ACERX^BGP8D722 IAHRA+25
$$STATALG^BGP8D722 IAHRA+35
$$STATCON^BGP8D722 IAHRA+34
$$STATRX^BGP8D722 IAHRA+32
BETACONT^BGP8D724 BETACONT+1
$$CHD^BGP8D729 IAHRA+5
$$VAPI^BGP8D81 ASACONTR+14
$$DAYS^BGP8D82 BETA1+5, ASA1+5, WAR1+5
$$CPTI^BGP8DU ASAC2+18
$$TRANI^BGP8DU ASAC2+20
$$DATE^BGP8UTL BETA1+8, BETA2+12, BETAREF+10, ASA1+8, ASA2+12, ASAREF+10, ASAREF+22, WAR1+8, WAR2+13, ASAC2+2
, ASAC2+14, ASAC2+19, ASAC2+21
$$LASTDX^BGP8UTL1 ASAC2+1
GETMEDS^BGP8UTL2 BETA+4, BETAPRIO+2, ASA+3, ASAPRIO+2, ASACONTR+3, WARPRIO+2
$$CODEN^ICPTCOD ASAC2+18, ASAC2+20
$$VAL^XBDIQ1 ASAC2+14
$$FMADD^XLFDT BETAPRIO+2, ASAPRIO+2, WARPRIO+2
$$FMDIFF^XLFDT BETA2+6, ASA2+6, WAR2+7
$$UP^XLFSTR BETA+10, BETAPRIO+6, ASA+10, ASAPRIO+6, ASACONTR+8, WARPRIO+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] BETA+13, BETA+15, BETAPRIO+9, BETAPRIO+11, BETAREF+4, ASA+13, ASA+15, ASA+17, ASAPRIO+9, ASAPRIO+11
, ASAPRIO+13, ASAREF+4, ASAREF+16, ASACONTR+11, WARPRIO+9, ASAC2+8
^ATXAX("B" BETA+6, BETA+7, BETAREF+2, ASA+5, ASA+6, ASA+7, ASAREF+2, ASAREF+14, ASACONTR+5, ASACONTR+14
, ASAC2+6
^AUPNPREF - [#9000022] BETAREF+9, ASAREF+9, ASAREF+21, ASAC2+13, ASAC2+14
^AUPNPREF("AA" BETAREF+3, BETAREF+5, BETAREF+8, ASAREF+3, ASAREF+5, ASAREF+8, ASAREF+15, ASAREF+17, ASAREF+20, ASAC2+7
, ASAC2+9, ASAC2+12
^AUPNVMED - [#9000010.14] BETA+9, BETA+10, BETA+12, BETA1+1, BETA1+2, BETAPRIO+5, BETAPRIO+6, BETAPRIO+8, BETA2+1, BETA2+2
, BETA2+7, ASA+9, ASA+10, ASA+12, ASA1+1, ASA1+2, ASAPRIO+5, ASAPRIO+6, ASAPRIO+8, ASA2+1
, ASA2+2, ASA2+7, ASACONTR+7, ASACONTR+8, ASACONTR+10, WAR1+1, WAR1+2, WARPRIO+5, WARPRIO+6, WARPRIO+8
, WAR2+1, WAR2+2, WAR2+8
^AUPNVSIT - [#9000010] BETA1+4, BETA1+8, BETA2+4, BETA2+6, BETA2+12, ASA1+4, ASA1+8, ASA2+4, ASA2+6, ASA2+12
, WAR1+4, WAR1+8, WAR2+4, WAR2+7, WAR2+13
^PSDRUG - [#50] BETA+14, BETAPRIO+10, BETAREF+10, ASA+14, ASA+16, ASAPRIO+10, ASAPRIO+12, ASAREF+10, ASAREF+22, ASACONTR+12
, WARPRIO+10
^TMP($J IAHRA+48!

Label References

Name Line Occurrences
$$ASA IAHRA+18
$$ASAALLEG IAHRA+22
$$ASACONTR IAHRA+21
$$BETA IAHRA+11
$$BETACONT IAHRA+14
ASA1 ASA+13, ASA+15
ASA2 ASAPRIO+9, ASAPRIO+11
ASAC2 ASACONTR+4, WARPRIO+3
BETA1 BETA+13
BETA2 BETAPRIO+9
WAR1 ASACONTR+11, ASACONTR+13, ASACONTR+14
WAR2 WARPRIO+9, WARPRIO+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BDATE BETA~, BETA+4, BETAPRIO+2, BETA2+6, BETAREF~, BETAREF+6, BETACONT~, ASA~, ASA+3, ASAPRIO+2
, ASA2+6, ASAREF~, ASAREF+6, ASAREF+18, ASACONTR~, ASACONTR+3, WARPRIO+2, ASAC2+10, ASAC2+18, ASAC2+20
BGPACE IAHRA+24!
BGPACE( IAHRA+44, IAHRA+45
BGPACE("ADR" IAHRA+29*
BGPACE("CONTRA" IAHRA+28*
BGPACE("RX" IAHRA+25*, IAHRA+26
>> BGPACTCL IAHRA+4
>> BGPAGEB IAHRA+3
BGPASA IAHRA+17!
BGPASA( IAHRA+42, IAHRA+43
BGPASA("ADR" IAHRA+22*
BGPASA("CONTRA" IAHRA+21*
BGPASA("RX" IAHRA+18*, IAHRA+19
>> BGPBDATE IAHRA+5, IAHRA+11, IAHRA+14, IAHRA+18, IAHRA+21, IAHRA+25, IAHRA+28, IAHRA+32, IAHRA+34, IAHRA+35
BGPBETA IAHRA+10!
BGPBETA( IAHRA+40, IAHRA+41
BGPBETA("ADR" IAHRA+15*
BGPBETA("CONTRA" IAHRA+14*
BGPBETA("RX" IAHRA+11*, IAHRA+12
>> BGPD1 IAHRA+1*, IAHRA+7*
>> BGPD2 IAHRA+1*, IAHRA+9*
>> BGPD3 IAHRA+1*, IAHRA+8*, IAHRA+38
>> BGPD4 IAHRA+1*
>> BGPD5 IAHRA+1*
>> BGPD6 IAHRA+1*
>> BGPD7 IAHRA+1*
>> BGPD8 IAHRA+1*
>> BGPD9 IAHRA+1*
>> BGPDMD2 IAHRA+8, IAHRA+9
>> BGPEDATE IAHRA+5, IAHRA+11, IAHRA+14, IAHRA+15, IAHRA+18, IAHRA+21, IAHRA+22, IAHRA+25, IAHRA+28, IAHRA+29
, IAHRA+32, IAHRA+34, IAHRA+35
BGPG ASAC2+1!*, ASAC2+2, ASAC2+5*, ASAC2+14*, ASAC2+17, ASAALLEG+1!
>> BGPIHD IAHRA+5*, IAHRA+6
BGPMEDS1 BETA+1~, BETA+2!, BETA+4, BETA+5, BETAPRIO+1!, BETAPRIO+2, BETAPRIO+3, ASA+1!, ASA+3, ASA+4
, ASAPRIO+1!, ASAPRIO+2, ASAPRIO+3, ASACONTR+1!, ASACONTR+3, ASACONTR+4, WARPRIO+1!, WARPRIO+2, WARPRIO+3
BGPMEDS1( BETA+8, BETAPRIO+4, ASA+8, ASAPRIO+4, ASACONTR+6, WARPRIO+4
>> BGPN1 IAHRA+1*, IAHRA+16*, IAHRA+37
>> BGPN10 IAHRA+1*, IAHRA+26*, IAHRA+28, IAHRA+29, IAHRA+30, IAHRA+44
>> BGPN11 IAHRA+1*, IAHRA+44
>> BGPN12 IAHRA+1*, IAHRA+28*, IAHRA+29*, IAHRA+30, IAHRA+44
>> BGPN13 IAHRA+1*, IAHRA+36*, IAHRA+37
>> BGPN14 IAHRA+1*, IAHRA+33*, IAHRA+34, IAHRA+35, IAHRA+36, IAHRA+46
>> BGPN15 IAHRA+1*, IAHRA+46
>> BGPN16 IAHRA+1*, IAHRA+34*, IAHRA+35*, IAHRA+36, IAHRA+46
>> BGPN17 IAHRA+1*, IAHRA+37*, IAHRA+39
>> BGPN2 IAHRA+1*, IAHRA+12*, IAHRA+14, IAHRA+15, IAHRA+16, IAHRA+40
>> BGPN3 IAHRA+1*, IAHRA+40
>> BGPN4 IAHRA+1*, IAHRA+14*, IAHRA+15*, IAHRA+16, IAHRA+40
>> BGPN5 IAHRA+1*, IAHRA+23*, IAHRA+37
>> BGPN6 IAHRA+1*, IAHRA+19*, IAHRA+21, IAHRA+22, IAHRA+23, IAHRA+42
>> BGPN7 IAHRA+1*, IAHRA+42
>> BGPN8 IAHRA+1*, IAHRA+21*, IAHRA+22*, IAHRA+23, IAHRA+42
>> BGPN9 IAHRA+1*, IAHRA+30*, IAHRA+37
BGPNDAYS BETA~, BETA1+10, BETA2+13, ASA~, ASA1+10, ASA2+13, ASACONTR~, WAR1+9, WAR2+14
BGPSTAT IAHRA+31!
BGPSTAT( IAHRA+46, IAHRA+47
BGPSTAT("ADR" IAHRA+35*
BGPSTAT("CONTRA" IAHRA+34*
BGPSTAT("RX" IAHRA+32*, IAHRA+33
>> BGPSTOP IAHRA+3*, IAHRA+4*, IAHRA+6*
>> BGPVALUE IAHRA+2*, IAHRA+38*, IAHRA+39*, IAHRA+40*, IAHRA+41*, IAHRA+42*, IAHRA+43*, IAHRA+44*, IAHRA+45*, IAHRA+46*
, IAHRA+47*
>> C ASA+16*, ASA+17, ASAPRIO+12*, ASAPRIO+13
D BETA+1~, BETA+12*, BETA+13, BETA+14, BETAPRIO+8*, BETAPRIO+9, BETAPRIO+10, BETA2+6*, BETA2+8, BETAREF+1~
, BETAREF+5*, BETAREF+6, BETAREF+8, ASA+12*, ASA+13, ASA+14, ASA+16, ASAPRIO+8*, ASAPRIO+9, ASAPRIO+10
, ASAPRIO+12, ASA2+6*, ASA2+8, ASAREF+5*, ASAREF+6, ASAREF+8, ASAREF+17*, ASAREF+18, ASAREF+20, ASACONTR+10*
, ASACONTR+11, ASACONTR+12, ASACONTR+14, WARPRIO+8*, WARPRIO+9, WARPRIO+10, WAR2+7*, WAR2+9, ASAC2+9*, ASAC2+10
, ASAC2+11, ASAC2+12
>> DFN IAHRA+5, IAHRA+11, IAHRA+14, IAHRA+15, IAHRA+18, IAHRA+21, IAHRA+22, IAHRA+25, IAHRA+28, IAHRA+29
, IAHRA+32, IAHRA+34, IAHRA+35
EDATE BETA~, BETA+4, BETA1+5, BETAREF~, BETAREF+7, BETACONT~, ASA~, ASA+3, ASA1+5, ASAREF~
, ASAREF+7, ASAREF+19, ASACONTR~, ASACONTR+3, WAR1+5, WAR2+7, ASAC2+1, ASAC2+11, ASAC2+18, ASAC2+20
, ASAALLEG~, ASAALLEG+2
G BETA+1~, BETA+11*, BETA+13*, BETA+15*, BETA+16, BETAPRIO+7*, BETAPRIO+9*, BETAPRIO+11*, BETAPRIO+12, BETAREF+1~
, BETAREF+3*, BETAREF+5, BETAREF+8, BETAREF+10*, BETAREF+13, ASA+11*, ASA+13*, ASA+15*, ASA+17*, ASA+18
, ASAPRIO+7*, ASAPRIO+9*, ASAPRIO+11*, ASAPRIO+13*, ASAPRIO+14, ASAREF+3*, ASAREF+5, ASAREF+8, ASAREF+10*, ASAREF+13
, ASAREF+15*, ASAREF+17, ASAREF+20, ASAREF+22*, ASAREF+25, ASACONTR+9*, ASACONTR+11*, ASACONTR+13*, ASACONTR+14*, ASACONTR+15
, WARPRIO+7*, WARPRIO+9*, WARPRIO+11*, WARPRIO+12
J BETA+1~, BETA1+1*, BETA2+1*, BETA2+5, ASA1+1*, ASA2+1*, ASA2+5, WAR1+1*, WAR2+1*, WAR2+6
K BETA+1~, BETA+3*, BETA1+6*, BETA1+10, BETA2+10*, BETA2+13, BETA2+14, ASA+2*, ASA1+6*, ASA1+10
, ASA2+10*, ASA2+13, ASA2+14, ASACONTR+2*, WAR1+6*, WAR1+9, WAR2+11*, WAR2+14
N BETA+1~, BETA+14*, BETA+15, BETAPRIO+10*, BETAPRIO+11, BETAREF+1~, BETAREF+8*, BETAREF+9, ASA+14*, ASA+15
, ASAPRIO+10*, ASAPRIO+11, ASAREF+8*, ASAREF+9, ASAREF+20*, ASAREF+21, ASACONTR+12*, ASACONTR+13, WARPRIO+10*, WARPRIO+11
, ASAC2+12*, ASAC2+13, ASAC2+14
NMIBD BETACONT~
NMIED BETACONT~
P BETA~, BETA+4, BETAPRIO+2, BETAREF~, BETAREF+3, BETAREF+5, BETAREF+8, BETACONT~, ASA~, ASA+3
, ASAPRIO+2, ASAREF~, ASAREF+3, ASAREF+5, ASAREF+8, ASAREF+15, ASAREF+17, ASAREF+20, ASACONTR~, ASACONTR+3
, WARPRIO+2, ASAC2+1, ASAC2+7, ASAC2+9, ASAC2+12, ASAC2+18, ASAC2+20, ASAALLEG~, ASAALLEG+2
R BETA+1~, BETA+3*, BETA1+7*, BETA1+8*, BETA2+11*, BETA2+12*, BETA2+13, ASA+2*, ASA1+7*, ASA1+8*
, ASA2+11*, ASA2+12*, ASA2+13, ASACONTR+2*, WAR1+7*, WAR1+8*, WAR2+12*, WAR2+13*
S BETA+1~, BETA1+5*, BETA1+6, BETA1+8, BETA2+7*, BETA2+8*, BETA2+9*, BETA2+10, BETA2+12, ASA1+5*
, ASA1+6, ASA1+8, ASA2+7*, ASA2+8*, ASA2+9*, ASA2+10, ASA2+12, WAR1+5*, WAR1+6, WAR1+8
, WAR2+8*, WAR2+9*, WAR2+10*, WAR2+11, WAR2+13
T BETA+1~, BETA+6*, BETA+13, BETAPRIO+9, BETAREF+1~, BETAREF+2*, BETAREF+4, ASA+5*, ASA+13, ASAPRIO+9
, ASAREF+2*, ASAREF+4, ASAREF+14*, ASAREF+16, ASACONTR+5*, ASACONTR+11, WARPRIO+9, ASAC2+6*, ASAC2+8
T1 BETA+1~, BETA+7*, BETA+15, BETAPRIO+11, ASA+6*, ASA+15, ASAPRIO+11
>> T2 ASA+7*, ASA+17, ASAPRIO+13
U IAHRA+40, IAHRA+41, IAHRA+42, IAHRA+43, IAHRA+44, IAHRA+45, IAHRA+46, IAHRA+47, BETA+8, BETA+10
, BETA+12, BETA+14, BETA1+1, BETA1+2, BETA1+8, BETA1+10, BETAPRIO+4, BETAPRIO+6, BETAPRIO+8, BETAPRIO+10
, BETA2+1, BETA2+2, BETA2+6, BETA2+7, BETA2+12, BETA2+13, BETA2+14, BETAREF+9, BETAREF+10, ASA+8
, ASA+10, ASA+12, ASA+14, ASA+16, ASA1+1, ASA1+2, ASA1+8, ASA1+10, ASAPRIO+4, ASAPRIO+6
, ASAPRIO+8, ASAPRIO+10, ASAPRIO+12, ASA2+1, ASA2+2, ASA2+6, ASA2+7, ASA2+12, ASA2+13, ASA2+14
, ASAREF+9, ASAREF+10, ASAREF+21, ASAREF+22, ASACONTR+6, ASACONTR+8, ASACONTR+10, ASACONTR+12, WAR1+1, WAR1+2
, WAR1+8, WAR1+9, WARPRIO+4, WARPRIO+6, WARPRIO+8, WARPRIO+10, WAR2+1, WAR2+2, WAR2+7, WAR2+8
, WAR2+13, WAR2+14, ASAC2+2, ASAC2+13, ASAC2+14, ASAC2+19, ASAC2+21, ASAALLEG+4
V BETA+1~, BETA1+2*, BETA1+3, BETA1+4, BETA1+5, BETA1+8, BETA2+2*, BETA2+3, BETA2+4, BETA2+6
, BETA2+12, ASA1+2*, ASA1+3, ASA1+4, ASA1+5, ASA1+8, ASA2+2*, ASA2+3, ASA2+4, ASA2+6
, ASA2+12, WAR1+2*, WAR1+3, WAR1+4, WAR1+5, WAR1+8, WAR2+2*, WAR2+3, WAR2+4, WAR2+7
, WAR2+13
X IAHRA+40*, IAHRA+41, IAHRA+42*, IAHRA+43, IAHRA+44*, IAHRA+45, IAHRA+46*, IAHRA+47, BETA+1~, BETA+8*
, BETAPRIO+4*, BETAREF+1~, BETAREF+3*, BETAREF+4, BETAREF+5, BETAREF+8, BETAREF+10, ASA+8*, ASAPRIO+4*, ASAREF+3*
, ASAREF+4, ASAREF+5, ASAREF+8, ASAREF+10, ASAREF+15*, ASAREF+16, ASAREF+17, ASAREF+20, ASAREF+22, ASACONTR+6*
, WARPRIO+4*, ASAC2+7*, ASAC2+8, ASAC2+9, ASAC2+12, ASAC2+14, ASAC2+18*, ASAC2+19, ASAC2+20*, ASAC2+21
, ASAALLEG+2*, ASAALLEG+3, ASAALLEG+4*, ASAALLEG+5
Y BETA+1~, BETA+8*, BETA+9, BETA+10, BETA+12, BETA1+1, BETA1+2, BETA1+5, BETAPRIO+4*, BETAPRIO+5
, BETAPRIO+6, BETAPRIO+8, BETA2+1, BETA2+2, BETA2+7, BETAREF+1~, BETAREF+6*, BETAREF+7, BETAREF+10, ASA+8*
, ASA+9, ASA+10, ASA+12, ASA1+1, ASA1+2, ASA1+5, ASAPRIO+4*, ASAPRIO+5, ASAPRIO+6, ASAPRIO+8
, ASA2+1, ASA2+2, ASA2+7, ASAREF+6*, ASAREF+7, ASAREF+10, ASAREF+18*, ASAREF+19, ASAREF+22, ASACONTR+6*
, ASACONTR+7, ASACONTR+8, ASACONTR+10, WAR1+1, WAR1+2, WAR1+5, WARPRIO+4*, WARPRIO+5, WARPRIO+6, WARPRIO+8
, WAR2+1, WAR2+2, WAR2+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All