Routine: BGP0D75

Customize PDF page

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

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

Information

BGP0D75 ; IHS/CMI/LAB - measure 31 ;

Source Information

Source file <BGP0D75.m>

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
IHS GPRA Information System	8	$$PREG^BGP0D7 $$BETAALG1^BGP0D72 ($$ASAALLEG,$$ASAREF,$$BETACONT,$$BETAREF)^BGP0D721 ($$ACEALG,$$ACEREF,$$STATALG,$$STATCON,$$STATREF)^BGP0D722 ($$CPTI,$$TRANI)^BGP0DU $$DATE^BGP0UTL $$LASTDXI^BGP0UTL1 GETMEDS^BGP0UTL2
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

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
AMIH(P,BDATE,EDATE)	;
IAMT	;EP
TRANS(H)	;

External References

Name	Field # of Occurrence
$$START1^APCLDF	AMIH+3, ACECONT+3, ACECONT+37, ACECONT+41
$$ICD^ATXCHK	AMIH+22
$$DOB^AUPNPAT	IAMT+17, IAMT+33, IAMT+41, WAR71+16
$$PREG^BGP0D7	ACECONT+35
$$BETAALG1^BGP0D72	IAMT+18
$$ASAALLEG^BGP0D721	IAMT+26
$$ASAREF^BGP0D721	IAMT+24
$$BETACONT^BGP0D721	IAMT+17
$$BETAREF^BGP0D721	IAMT+16
$$ACEALG^BGP0D722	IAMT+34
$$ACEREF^BGP0D722	IAMT+32
$$STATALG^BGP0D722	IAMT+41
$$STATCON^BGP0D722	IAMT+40
$$STATREF^BGP0D722	IAMT+39
$$CPTI^BGP0DU	WAR71+34
$$TRANI^BGP0DU	WAR71+36
$$DATE^BGP0UTL	RX71+9, WAR71+10, WAR71+12, WAR71+17, WAR71+29, WAR71+35, WAR71+37, ACECONT+4, ACECONT+16, ACECONT+30 , ACECONT+38
$$LASTDXI^BGP0UTL1	WAR71+16
GETMEDS^BGP0UTL2	RX7+4, ASACONTR+3
$$CODEN^ICPTCOD	WAR71+34, WAR71+36
$$VAL^XBDIQ1	AMIH+24, WAR71+29, ACECONT+4, ACECONT+16, ACECONT+30, ACECONT+38
$$FMADD^XLFDT	IAMT+6, IAMT+14, IAMT+16, IAMT+22, IAMT+24, IAMT+25, IAMT+30, IAMT+32, IAMT+33, IAMT+37 , IAMT+39, IAMT+40, READM+2, ASACONTR+3
$$FMDIFF^XLFDT	RX71+8, WAR71+11
$$FMTE^XLFDT	AMIH+3, ACECONT+3, ACECONT+37, ACECONT+41
$$UP^XLFSTR	AMIH+25

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	RX7+10, RX7+11, RX7+12, RX7+14, RX7+15, RX7+16, RX7+18, RX7+19, RX7+20, ASACONTR+10 , WAR71+23, ACECONT+10, ACECONT+24
^ATXAX("B"	IAMT+14, IAMT+21, IAMT+22, IAMT+29, IAMT+30, IAMT+37, AMIH+5, ASACONTR+5, WAR71+21, ACECONT+8 , ACECONT+22
^AUPNPREF - [#9000022]	WAR71+28, WAR71+29, ACECONT+15, ACECONT+16, ACECONT+29, ACECONT+30
^AUPNPREF("AA"	WAR71+22, WAR71+24, WAR71+27, ACECONT+9, ACECONT+11, ACECONT+14, ACECONT+23, ACECONT+25, ACECONT+28
^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+9, RX71+1, RX71+2, RX71+7, ASACONTR+7, ASACONTR+9, WAR71+1, WAR71+2, WAR71+7
^AUPNVPED - [#9000010.16]	ACECONT+43
^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+45, ACECONT+46
^DG(405.1 - [#405.1]	AMA+3, EXPIRED+3, TRANS+3
^DPT - [#2]	IAMT+11, IAMT+12
^PSDRUG - [#50]	RX7+13, RX7+17, RX7+21, RX71+9, ASACONTR+11, WAR71+10, WAR71+12
^TMP($J	IAMT+51!, AMIH+2!, AMIH+4, AMIH+6

Label References

Name	Line Occurrences
$$ACECONT	IAMT+33
$$AMA	AMIH+17
$$AMIH	IAMT+6
$$ASACONTR	IAMT+25
$$EXPIRED	AMIH+19
$$READM	IAMT+8
$$RX7	IAMT+14, IAMT+22, IAMT+30, IAMT+37
$$TRANS	AMIH+18
RX71	RX7+10, RX7+11, RX7+12, RX7+14, RX7+15, RX7+16, RX7+18, RX7+19, RX7+20, RX7+22 , RX7+23
WAR71	ASACONTR+10, ASACONTR+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	AMIH+22, ACECONT+42, ACECONT+47, ACECONT+48, ACECONT+49, ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54 , ACECONT+55, ACECONT+56, ACECONT+57
>> 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+28!, IAMT+50!
BGPACE(	IAMT+48
BGPACE("ADR"	IAMT+34*
BGPACE("CONTRA"	IAMT+33*
BGPACE("REF"	IAMT+32*
BGPACE("RX"	IAMT+30*, IAMT+31
>> BGPACTCL	IAMT+5
BGPADM	ASACONTR~, ASACONTR+3, WAR71+25, WAR71+34, WAR71+36
>> BGPAGEB	IAMT+4
>> BGPAMI	IAMT+6*, IAMT+7, IAMT+8, IAMT+9, IAMT+14, IAMT+16, IAMT+17, IAMT+22, IAMT+24, IAMT+25 , IAMT+30, IAMT+32, IAMT+33, IAMT+37, IAMT+39, IAMT+40
BGPASA	IAMT+50!
BGPASA(	IAMT+47
BGPASA("ADR"	IAMT+26*
BGPASA("CONTRA"	IAMT+25*
BGPASA("REF"	IAMT+24*
BGPASA("RX"	IAMT+22*, IAMT+23
>> BGPBDATE	IAMT+6, IAMT+25, IAMT+33, IAMT+34, IAMT+40, IAMT+41
BGPBETA	IAMT+3!, IAMT+13!, IAMT+50!
BGPBETA(	IAMT+46
BGPBETA("ADR"	IAMT+18*
BGPBETA("CONTRA"	IAMT+17*
BGPBETA("REF"	IAMT+16*
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, WAR71+26, WAR71+34, WAR71+36
BGPDN1	RX7~, RX7+22
BGPDN2	RX7~, RX7+23
>> BGPEDATE	IAMT+17, IAMT+18, IAMT+25, IAMT+26, IAMT+33, IAMT+34, IAMT+40, IAMT+41
BGPG	RX7+3, RX7+6, RX71+9, RX71+11, ASACONTR+2, ASACONTR+6, WAR71+10, WAR71+12, WAR71+14, WAR71+16!* , WAR71+17, WAR71+20, WAR71+29, WAR71+32, ACECONT+1~, ACECONT+3!, ACECONT+7, ACECONT+16, ACECONT+19, ACECONT+21* , ACECONT+30*, ACECONT+33, ACECONT+37!, ACECONT+39!
BGPG(	ACECONT+42, ACECONT+43, ACECONT+47, ACECONT+48, ACECONT+49, ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54 , ACECONT+55, ACECONT+56
BGPG(1	ACECONT+4, ACECONT+38
BGPIHD	IAMT+50!
BGPMEDS1	IAMT+50!, 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+31, IAMT+32, IAMT+33, IAMT+34, IAMT+35
>> BGPN11	IAMT+2, IAMT+32, IAMT+35
>> BGPN12	IAMT+2, IAMT+33, IAMT+34*, IAMT+35
>> BGPN13	IAMT+2, IAMT+42, IAMT+43
>> BGPN14	IAMT+2, IAMT+38, IAMT+39, IAMT+40, IAMT+41, IAMT+42
>> BGPN15	IAMT+2, IAMT+39, IAMT+42
>> BGPN16	IAMT+2, IAMT+40, IAMT+41*, IAMT+42
>> BGPN17	IAMT+2, IAMT+43, IAMT+45
>> BGPN2	IAMT+2, IAMT+15, IAMT+16, IAMT+17, IAMT+18, IAMT+19
>> BGPN3	IAMT+2, IAMT+15, IAMT+16*, IAMT+19
>> BGPN4	IAMT+2, IAMT+15, IAMT+17, IAMT+18, IAMT+19
>> BGPN5	IAMT+2, IAMT+27, IAMT+43
>> BGPN6	IAMT+2, IAMT+23, IAMT+24, IAMT+25, IAMT+26, IAMT+27
>> BGPN7	IAMT+2, IAMT+24, IAMT+27
>> BGPN8	IAMT+2, IAMT+25, IAMT+26*, IAMT+27
>> BGPN9	IAMT+2, IAMT+35, IAMT+43
BGPSTAT	IAMT+36!, IAMT+50!
BGPSTAT(	IAMT+49
BGPSTAT("ADR"	IAMT+41*
BGPSTAT("CONTRA"	IAMT+40*
BGPSTAT("REF"	IAMT+39*
BGPSTAT("RX"	IAMT+37*, IAMT+38
>> BGPSTOP	IAMT+4, IAMT+5, IAMT+7, IAMT+8
BGPTC1	RX7~, RX7+18
BGPTC2	RX7~, RX7+19
BGPTC3	RX7~, RX7+20
BGPTD1	RX7~, RX7+10
BGPTD2	RX7~, RX7+11
BGPTD3	RX7~, RX7+12
BGPTN1	RX7~, RX7+14
BGPTN2	RX7~, RX7+15
BGPTN3	RX7~, RX7+16
>> BGPV	IAMT+9*
>> BGPVALUE	IAMT+3, IAMT+44, IAMT+45, IAMT+46, IAMT+47, IAMT+48, IAMT+49*
>> BGPX	AMIH+6*
>> C	IAMT+21, IAMT+22, RX7+17, RX7+18, RX7+19, RX7+20
D	AMIH+6, AMIH+21, AMIH+38, AMIH+39, AMIH+41, READM~, READM+2, READM+7, RX7+9, RX7+10 , RX7+11, RX7+12, RX7+13, RX7+17, RX7+21, RX71+9, ASACONTR+9, ASACONTR+10, ASACONTR+11, WAR71+10 , WAR71+12, WAR71+24, WAR71+27, ACECONT+11, ACECONT+12, ACECONT+14, ACECONT+25, ACECONT+26, ACECONT+28, ACECONT+42
>> D1	READM+2*
>> DFN	IAMT+6, IAMT+8, IAMT+11, IAMT+12, IAMT+14, IAMT+16, IAMT+17, IAMT+18, IAMT+22, IAMT+24 , IAMT+25, IAMT+26, IAMT+30, IAMT+32, IAMT+33, IAMT+34, IAMT+37, IAMT+39, 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+37, ACECONT+41
ED	READM+1~, READM+2*, READM+8, ACECONT+1~
EDATE	AMIH~, AMIH+3, AMIH+16, RX7~, RX7+4, RX71+6, RX71+8, ASACONTR~, WAR71+16, ACECONT~ , ACECONT+3, ACECONT+35, ACECONT+37, ACECONT+41
G	AMIH+2!, AMIH+6, AMIH+39, AMIH+40, READM+1~, READM+2, READM+9, READM+10, RX7+8, RX7+10 , RX7+11, RX7+12, RX7+14, RX7+15, RX7+16, RX7+18, RX7+19, RX7+20, RX7+22, RX7+23 , RX7+24, ASACONTR+8, ASACONTR+10, ASACONTR+12*, ASACONTR+13
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+13, RX7+14, RX7+15, RX7+16, RX7+21, RX7+22 , RX7+23, ASACONTR+11, ASACONTR+12, WAR71+27, WAR71+28, WAR71+29, ACECONT+1~, ACECONT+14, ACECONT+15, ACECONT+16 , ACECONT+28, ACECONT+29, ACECONT+30
NMIB	ACECONT~, ACECONT+12, ACECONT+26, ACECONT+35, ACECONT+37, ACECONT+41
NMIE	ACECONT~, ACECONT+13, ACECONT+27
P	AMIH~, AMIH+3, READM~, READM+3, READM+4, RX7~, RX7+4, ASACONTR~, ASACONTR+3, WAR71+16 , WAR71+22, WAR71+24, WAR71+27, WAR71+34, WAR71+36, ACECONT~, ACECONT+3, ACECONT+9, ACECONT+11, ACECONT+14 , ACECONT+23, ACECONT+25, ACECONT+28, ACECONT+35, ACECONT+37, ACECONT+41
PV	READM~, READM+5
>> R	RX7+3, ASACONTR+2
RPBD	ACECONT~, ACECONT+2*, ACECONT+35, ACECONT+37, ACECONT+41
>> S	RX71+7, RX71+9, WAR71+7, WAR71+12
>> T	IAMT+29, IAMT+30, AMIH+5, AMIH+22, ASACONTR+5, ASACONTR+10, WAR71+21, WAR71+23, ACECONT+8, ACECONT+10 , ACECONT+22, ACECONT+24, ACECONT+42, ACECONT+43, ACECONT+44, ACECONT+45, ACECONT+46*, ACECONT+47, ACECONT+48, ACECONT+49 , ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54, ACECONT+55, ACECONT+56
U	IAMT+7, IAMT+8, IAMT+9, IAMT+11, IAMT+12, IAMT+14, IAMT+16, IAMT+17, IAMT+22, IAMT+24 , IAMT+25, IAMT+30, IAMT+32, IAMT+33, IAMT+37, IAMT+39, IAMT+40, IAMT+46, IAMT+47, IAMT+48 , IAMT+49, 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+9 , RX7+13, RX7+17, RX7+21, RX71+1, RX71+2, RX71+7, RX71+8, RX71+9, ASACONTR+6, ASACONTR+9 , ASACONTR+11, WAR71+1, WAR71+2, WAR71+7, WAR71+8, WAR71+10, WAR71+11, WAR71+12, WAR71+14, WAR71+17 , WAR71+28, WAR71+29, WAR71+35, WAR71+37, ACECONT+4, ACECONT+15, ACECONT+16, ACECONT+29, ACECONT+30, ACECONT+35 , ACECONT+38, ACECONT+43, ACECONT+46, ACECONT+47, ACECONT+48, ACECONT+49, ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53 , ACECONT+54, ACECONT+55, ACECONT+56, ACECONT+57
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, 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, WAR71+22, WAR71+23, WAR71+24, WAR71+27, WAR71+29, WAR71+34, WAR71+35, WAR71+36, WAR71+37 , ACECONT+1~, ACECONT+3, ACECONT+9, ACECONT+10, ACECONT+11, ACECONT+14, ACECONT+16, ACECONT+23, ACECONT+24, ACECONT+25 , ACECONT+28, ACECONT+30, ACECONT+35, ACECONT+37, ACECONT+41, ACECONT+42*, ACECONT+43, ACECONT+47, ACECONT+48, ACECONT+49 , ACECONT+50, ACECONT+51, ACECONT+52, ACECONT+53, ACECONT+54, ACECONT+55, ACECONT+56
Y	AMIH+21, AMIH+22, AMIH+23, AMIH+24, RX7+6, RX7+7, RX7+9, RX71+1, RX71+2, RX71+7 , ASACONTR+6, ASACONTR+7, ASACONTR+9, WAR71+1, WAR71+2, WAR71+7, WAR71+25, WAR71+26, ACECONT+1~, ACECONT+3 , ACECONT+12, ACECONT+13, ACECONT+26, ACECONT+27, ACECONT+37, ACECONT+40, ACECONT+41
Z	RX71+8, RX71+9, WAR71+11, WAR71+12, ACECONT+1~

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP0D75

Call Graph Total: 15