Routine: BGP3D721

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

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

Source Information

Source file <BGP3D721.m>

Call Graph

Call Graph Total: 18

Package	Total	Call Graph
IHS GPRA Information System	11	$$ASAALLEG^BGP3CU1 $$V2^BGP3D1 $$BETAALG1^BGP3D72 ($$ACEALG,$$ACECONT,$$ACERX,$$STATALG,$$STATCON,$$STATRX)^BGP3D722 BETACONT^BGP3D724 $$CHD^BGP3D729 $$DAYS^BGP3D82 ($$CPTI,$$TRANI)^BGP3DU $$DATE^BGP3UTL $$LASTDX^BGP3UTL1 GETMEDS^BGP3UTL2
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
Taxonomy	1	$$ICD^ATXCHK

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
IHS GPRA Information System	2	BGP3D731 BGP3D75

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
$$ICD^ATXCHK	V2IHD+17
$$DOB^AUPNPAT	IAHRA+14, IAHRA+28, IAHRA+29, IAHRA+36, IHD+7, ASAC2+1, ASAALLEG+2
$$ASAALLEG^BGP3CU1	ASAALLEG+2
$$V2^BGP3D1	IHD+4
$$BETAALG1^BGP3D72	IAHRA+15
$$ACEALG^BGP3D722	IAHRA+29
$$ACECONT^BGP3D722	IAHRA+28
$$ACERX^BGP3D722	IAHRA+25
$$STATALG^BGP3D722	IAHRA+36
$$STATCON^BGP3D722	IAHRA+35
$$STATRX^BGP3D722	IAHRA+32
BETACONT^BGP3D724	BETACONT+1
$$CHD^BGP3D729	IAHRA+5
$$DAYS^BGP3D82	BETA1+5, ASA1+5, WAR1+5
$$CPTI^BGP3DU	ASAC2+18
$$TRANI^BGP3DU	ASAC2+20
$$DATE^BGP3UTL	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^BGP3UTL1	ASAC2+1
GETMEDS^BGP3UTL2	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]	V2IHD+16, 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 , 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+17
^AUPNVPOV("AD"	V2IHD+17
^AUPNVSIT - [#9000010]	V2IHD+10, V2IHD+11, V2IHD+12, V2IHD+13, V2IHD+14, V2IHD+15, V2IHD+16, 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+21!

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
WAR2	WARPRIO+9, WARPRIO+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	V2IHD+3~, V2IHD+17*
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
>> BGPMFITI	V2IHD+16
>> 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+17, V2IHD+18, 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, 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+19, V2IHD+22, 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, 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+17, 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, V2IHD+17, 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, V2IHD+17 , 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+17, 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: BGP3D721

Call Graph Total: 18

Caller Graph Total: 2