Routine: BGP8D721

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

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

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP8D721

Call Graph Total: 16

Caller Graph Total: 2