Routine: BGP5D721

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

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

Source Information

Source file <BGP5D721.m>

Call Graph

Call Graph Total: 18

Package	Total	Call Graph
IHS GPRA Information System	12	$$ASAALLEG^BGP5CU1 $$V2^BGP5D1 $$BETAALG1^BGP5D72 ($$ACEALG,$$ACECONT,$$ACERX,$$STATALG,$$STATCON,$$STATRX)^BGP5D722 BETACONT^BGP5D724 $$CHD^BGP5D729 $$VAPI^BGP5D81 $$DAYS^BGP5D82 ($$CPTI,$$TRANI)^BGP5DU $$DATE^BGP5UTL $$LASTDX^BGP5UTL1 ($$ICD,GETMEDS)^BGP5UTL2
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

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
IHS GPRA Information System	2	BGP5D731 BGP5D75

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
IHD(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
FIRSTIHD(P,EDATE)	;EP
V2IHD(P,BDATE,EDATE)	;EP
BETA2
BETA1
WARPRIO	;now add in any before BEG DATE
ASAALLEG(P,EDATE)	;EP
ASA2
ASA(P,BDATE,EDATE,BGPNDAYS)	;EP
BETAREF(P,BDATE,EDATE)	;EP

External References

Name	Field # of Occurrence
$$START1^APCLDF	FIRSTIHD+5, V2IHD+5
$$DOB^AUPNPAT	IAHRA+14, IAHRA+28, IAHRA+29, IAHRA+36, IHD+7, ASAC2+1, ASAALLEG+2
$$ASAALLEG^BGP5CU1	ASAALLEG+2
$$V2^BGP5D1	IHD+4
$$BETAALG1^BGP5D72	IAHRA+15
$$ACEALG^BGP5D722	IAHRA+29
$$ACECONT^BGP5D722	IAHRA+28
$$ACERX^BGP5D722	IAHRA+25
$$STATALG^BGP5D722	IAHRA+36
$$STATCON^BGP5D722	IAHRA+35
$$STATRX^BGP5D722	IAHRA+32
BETACONT^BGP5D724	BETACONT+1
$$CHD^BGP5D729	IAHRA+5
$$VAPI^BGP5D81	ASACONTR+14
$$DAYS^BGP5D82	BETA1+5, ASA1+5, WAR1+5
$$CPTI^BGP5DU	ASAC2+18
$$TRANI^BGP5DU	ASAC2+20
$$DATE^BGP5UTL	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^BGP5UTL1	ASAC2+1
$$ICD^BGP5UTL2	V2IHD+16
GETMEDS^BGP5UTL2	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	FIRSTIHD+7, BETA2+6, ASA2+6, WAR2+7
$$FMTE^XLFDT	V2IHD+5
$$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"	V2IHD+7, 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
^AUPNVPOV - [#9000010.07]	V2IHD+16
^AUPNVPOV("AD"	V2IHD+16
^AUPNVSIT - [#9000010]	V2IHD+10, V2IHD+11, V2IHD+12, V2IHD+13, V2IHD+14, V2IHD+15, 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
^AUPNVSIT("AC"	V2IHD+2
^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+49!, IHD+5!, V2IHD+4!, V2IHD+6, V2IHD+9, V2IHD+20!

Label References

Name	Line Occurrences
$$ASA	IAHRA+18
$$ASAALLEG	IAHRA+22
$$ASACONTR	IAHRA+21
$$BETA	IAHRA+11
$$BETACONT	IAHRA+14
$$FIRSTIHD	IHD+6
$$V2IHD	IHD+7
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
%	V2IHD+3~, V2IHD+16*
A	V2IHD+3~, V2IHD+5*
B	V2IHD+3~, V2IHD+5*
BDATE	IHD~, IHD+4, V2IHD~, V2IHD+5, 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+45, IAHRA+46
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+43, IAHRA+44
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+35, IAHRA+36
BGPBETA	IAHRA+10!
BGPBETA(	IAHRA+41, IAHRA+42
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+39
>> 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+35, IAHRA+36
BGPG	FIRSTIHD+2~, FIRSTIHD+3!, ASAC2+1!, ASAC2+2, ASAC2+5, ASAC2+14*, ASAC2+17, ASAALLEG+1!
BGPG(1	FIRSTIHD+6, FIRSTIHD+7
>> 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+38
>> BGPN10	IAHRA+1, IAHRA+26, IAHRA+28, IAHRA+29, IAHRA+30, IAHRA+45
>> BGPN11	IAHRA+1*, IAHRA+45
>> BGPN12	IAHRA+1, IAHRA+28, IAHRA+29*, IAHRA+30, IAHRA+45
>> BGPN13	IAHRA+1, IAHRA+37, IAHRA+38
>> BGPN14	IAHRA+1, IAHRA+33, IAHRA+35, IAHRA+36, IAHRA+37, IAHRA+47
>> BGPN15	IAHRA+1*, IAHRA+47
>> BGPN16	IAHRA+1, IAHRA+35, IAHRA+36*, IAHRA+37, IAHRA+47
>> BGPN17	IAHRA+1, IAHRA+38, IAHRA+40
>> BGPN2	IAHRA+1, IAHRA+12, IAHRA+14, IAHRA+15, IAHRA+16, IAHRA+41
>> BGPN3	IAHRA+1*, IAHRA+41
>> BGPN4	IAHRA+1, IAHRA+14, IAHRA+15*, IAHRA+16, IAHRA+41
>> BGPN5	IAHRA+1, IAHRA+23, IAHRA+38
>> BGPN6	IAHRA+1, IAHRA+19, IAHRA+21, IAHRA+22, IAHRA+23, IAHRA+43
>> BGPN7	IAHRA+1*, IAHRA+43
>> BGPN8	IAHRA+1, IAHRA+21, IAHRA+22*, IAHRA+23, IAHRA+43
>> BGPN9	IAHRA+1, IAHRA+30, IAHRA+38
BGPNDAYS	BETA~, BETA1+10, BETA2+13, ASA~, ASA1+10, ASA2+13, ASACONTR~, WAR1+9, WAR2+14
BGPSTAT	IAHRA+31!
BGPSTAT(	IAHRA+47, IAHRA+48
BGPSTAT("ADR"	IAHRA+36*
BGPSTAT("CONTRA"	IAHRA+35*
BGPSTAT("RX"	IAHRA+32*, IAHRA+33
>> BGPSTOP	IAHRA+3, IAHRA+4, IAHRA+6*
>> BGPVALUE	IAHRA+2, IAHRA+39, IAHRA+40, IAHRA+41, IAHRA+42, IAHRA+43, IAHRA+44, IAHRA+45, IAHRA+46, IAHRA+47 , IAHRA+48*
>> C	ASA+16, ASA+17, ASAPRIO+12, ASAPRIO+13
D	V2IHD+16, V2IHD+17, 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+35, IAHRA+36
E	FIRSTIHD+2~, FIRSTIHD+5, V2IHD+3~, V2IHD+5
EDATE	IHD~, IHD+4, IHD+6, IHD+7, FIRSTIHD~, FIRSTIHD+7, V2IHD~, V2IHD+5, 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	V2IHD+3~, V2IHD+9, V2IHD+18, V2IHD+21, 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	IHD~, IHD+4, IHD+6, IHD+7, FIRSTIHD~, FIRSTIHD+1, FIRSTIHD+5, V2IHD~, V2IHD+1, V2IHD+2 , V2IHD+5, 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	V2IHD+3~, V2IHD+7, V2IHD+8, V2IHD+16, 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+41, IAHRA+42, IAHRA+43, IAHRA+44, IAHRA+45, IAHRA+46, IAHRA+47, IAHRA+48, FIRSTIHD+7, V2IHD+9 , V2IHD+11, V2IHD+12, V2IHD+13, V2IHD+14, V2IHD+15, V2IHD+16, 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	V2IHD+3~, V2IHD+9, V2IHD+10, V2IHD+11, V2IHD+12, V2IHD+13, V2IHD+14, V2IHD+15, V2IHD+16, 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+41, IAHRA+42, IAHRA+43, IAHRA+44, IAHRA+45, IAHRA+46, IAHRA+47, IAHRA+48, FIRSTIHD+2~, FIRSTIHD+5* , FIRSTIHD+7, FIRSTIHD+8, V2IHD+3~, V2IHD+9, 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	FIRSTIHD+2~, FIRSTIHD+4, FIRSTIHD+5, V2IHD+3~, V2IHD+16, 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: BGP5D721

Call Graph Total: 18

Caller Graph Total: 2