Routine: BGP6D731

Package	Total	Call Graph
IHS GPRA Information System	8	($$AMA,$$BETAALG1,$$EXPIRED,$$TRANS)^BGP6D72 ($$ASA,$$ASAALLEG,$$BETA,$$BETACONT)^BGP6D721 ($$ACEALG,$$ACECONT,$$ACERX,$$STATALG,$$STATCON,$$STATRX)^BGP6D722 $$VAPI^BGP6D81 ($$CPTI,$$TRANI)^BGP6DU $$DATE^BGP6UTL $$LASTDX^BGP6UTL1 ($$ICD,GETMEDS)^BGP6UTL2
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

Name	Comments	DBIA/ICR reference
WAR71
HEM	;now check for dx 459
ASACONTR(P,BGPADM,BGPDD,BDATE,EDATE)	;does patient have an aspirin allergy
IPAMT	;EP
AMI(P,BDATE,EDATE)	;

External References

Name	Field # of Occurrence
$$START1^APCLDF	AMI+3
$$DOB^AUPNPAT	IPAMT+15, IPAMT+22, IPAMT+29, IPAMT+37, HEM+1
$$AMA^BGP6D72	AMI+15
$$BETAALG1^BGP6D72	IPAMT+16
$$EXPIRED^BGP6D72	AMI+17
$$TRANS^BGP6D72	AMI+16
$$ASA^BGP6D721	IPAMT+19
$$ASAALLEG^BGP6D721	IPAMT+23
$$BETA^BGP6D721	IPAMT+12
$$BETACONT^BGP6D721	IPAMT+15
$$ACEALG^BGP6D722	IPAMT+30
$$ACECONT^BGP6D722	IPAMT+29
$$ACERX^BGP6D722	IPAMT+26
$$STATALG^BGP6D722	IPAMT+37
$$STATCON^BGP6D722	IPAMT+36
$$STATRX^BGP6D722	IPAMT+33
$$VAPI^BGP6D81	ASACONTR+13
$$CPTI^BGP6DU	HEM+18
$$TRANI^BGP6DU	HEM+20
$$DATE^BGP6UTL	WAR71+8, WAR71+11, HEM+2, HEM+13, HEM+19, HEM+21
$$LASTDX^BGP6UTL1	HEM+1
$$ICD^BGP6UTL2	AMI+20
GETMEDS^BGP6UTL2	ASACONTR+3
$$CODEN^ICPTCOD	HEM+18, HEM+20
$$VAL^XBDIQ1	AMI+22, HEM+13
$$FMADD^XLFDT	IPAMT+5, IPAMT+12, IPAMT+15, IPAMT+16, IPAMT+19, IPAMT+22, IPAMT+23, IPAMT+26, IPAMT+29, IPAMT+30 , IPAMT+33, IPAMT+36, IPAMT+37, ASACONTR+3
$$FMDIFF^XLFDT	WAR71+10
$$FMTE^XLFDT	AMI+3
$$UP^XLFSTR	AMI+23

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	ASACONTR+10, HEM+8
^ATXAX("B"	AMI+5, ASACONTR+5, ASACONTR+13, HEM+6
^AUPNPREF - [#9000022]	HEM+12, HEM+13
^AUPNPREF("AA"	HEM+7, HEM+9, HEM+11
^AUPNVINP - [#9000010.02]	AMI+40
^AUPNVINP("AD"	AMI+12, AMI+39
^AUPNVMED - [#9000010.14]	ASACONTR+7, ASACONTR+9, WAR71+1, WAR71+2, WAR71+9
^AUPNVPOV - [#9000010.07]	AMI+19, AMI+20, AMI+21
^AUPNVPOV("AD"	AMI+19
^AUPNVSIT - [#9000010]	AMI+7, AMI+8, AMI+9, AMI+10, AMI+12, AMI+37, WAR71+4, WAR71+7, WAR71+10, WAR71+11
^DPT - [#2]	IPAMT+8, IPAMT+9
^PSDRUG - [#50]	ASACONTR+11, WAR71+8, WAR71+11
^TMP($J	IPAMT+50!, IPAMT+57!, AMI+2!, AMI+4, AMI+6

Name	Line Occurrences
$$AMI	IPAMT+5
$$ASACONTR	IPAMT+22
HEM	ASACONTR+4
WAR71	ASACONTR+10, ASACONTR+12, ASACONTR+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	AMI+20*
>> A	AMI+3*
>> B	AMI+3, AMI+12, AMI+13, AMI+18*
BDATE	AMI~, AMI+3, ASACONTR~, HEM+18, HEM+20
BGPACE	IPAMT+25!, IPAMT+56!
BGPACE(	IPAMT+46, IPAMT+47, IPAMT+54
BGPACE("ADR"	IPAMT+30*
BGPACE("CONTRA"	IPAMT+29*
BGPACE("RX"	IPAMT+26*, IPAMT+27
>> BGPACTCL	IPAMT+4
>> BGPADDAT	IPAMT+10*, IPAMT+12, IPAMT+15, IPAMT+16, IPAMT+19, IPAMT+22, IPAMT+23, IPAMT+26, IPAMT+29, IPAMT+30 , IPAMT+33, IPAMT+36, IPAMT+37
BGPADM	ASACONTR~, ASACONTR+3, WAR71+6, WAR71+8, WAR71+10
>> BGPAGEB	IPAMT+3
>> BGPAMI	IPAMT+5*, IPAMT+6, IPAMT+10, IPAMT+15, IPAMT+22, IPAMT+29
BGPASA	IPAMT+18!, IPAMT+56!
BGPASA(	IPAMT+44, IPAMT+45, IPAMT+53
BGPASA("ADR"	IPAMT+23*
BGPASA("CONTRA"	IPAMT+22*
BGPASA("RX"	IPAMT+19*, IPAMT+20
>> BGPBDATE	IPAMT+5, IPAMT+29, IPAMT+30
BGPBETA	IPAMT+11!, IPAMT+56!
BGPBETA(	IPAMT+42, IPAMT+43, IPAMT+52
BGPBETA("ADR"	IPAMT+16*
BGPBETA("CONTRA"	IPAMT+15*
BGPBETA("RX"	IPAMT+12*, IPAMT+13
>> BGPD1	IPAMT+1, IPAMT+7
>> BGPD2	IPAMT+1, IPAMT+8
>> BGPD3	IPAMT+1, IPAMT+9
>> BGPD4	IPAMT+1*
>> BGPD5	IPAMT+1*
>> BGPD6	IPAMT+1*
>> BGPD7	IPAMT+1*
>> BGPD8	IPAMT+1*
>> BGPD9	IPAMT+1*
BGPDD	ASACONTR~, ASACONTR+3, WAR71+8
>> BGPEDATE	IPAMT+15, IPAMT+22, IPAMT+29
BGPG	ASACONTR+2, WAR71+8, WAR71+11, WAR71+13, HEM+1!, HEM+2, HEM+5, HEM+13, HEM+16
BGPIHD	IPAMT+56!
BGPMEDS1	IPAMT+56!, ASACONTR+1!, ASACONTR+3, ASACONTR+4
BGPMEDS1(	ASACONTR+6
>> BGPN1	IPAMT+1, IPAMT+17, IPAMT+39
>> BGPN10	IPAMT+1, IPAMT+27, IPAMT+29, IPAMT+30, IPAMT+31, IPAMT+46, IPAMT+54
>> BGPN11	IPAMT+1*, IPAMT+46, IPAMT+54
>> BGPN12	IPAMT+1, IPAMT+29, IPAMT+30*, IPAMT+31, IPAMT+46, IPAMT+54
>> BGPN13	IPAMT+1, IPAMT+38, IPAMT+39
>> BGPN14	IPAMT+1, IPAMT+34, IPAMT+36, IPAMT+37, IPAMT+38, IPAMT+48, IPAMT+55
>> BGPN15	IPAMT+1*, IPAMT+48, IPAMT+55
>> BGPN16	IPAMT+1, IPAMT+36, IPAMT+37*, IPAMT+38, IPAMT+48, IPAMT+55
>> BGPN17	IPAMT+1, IPAMT+39, IPAMT+41
>> BGPN2	IPAMT+1, IPAMT+13, IPAMT+15, IPAMT+16, IPAMT+17, IPAMT+42, IPAMT+52
>> BGPN3	IPAMT+1*, IPAMT+42, IPAMT+52
>> BGPN4	IPAMT+1, IPAMT+15, IPAMT+16*, IPAMT+17, IPAMT+42, IPAMT+52
>> BGPN5	IPAMT+1, IPAMT+24, IPAMT+39
>> BGPN6	IPAMT+1, IPAMT+20, IPAMT+22, IPAMT+23, IPAMT+24, IPAMT+44, IPAMT+53
>> BGPN7	IPAMT+1*, IPAMT+44, IPAMT+53
>> BGPN8	IPAMT+1, IPAMT+22, IPAMT+23*, IPAMT+24, IPAMT+44, IPAMT+53
>> BGPN9	IPAMT+1, IPAMT+31, IPAMT+39
BGPSTAT	IPAMT+32!, IPAMT+56!
BGPSTAT(	IPAMT+48, IPAMT+49, IPAMT+55
BGPSTAT("ADR"	IPAMT+37*
BGPSTAT("CONTRA"	IPAMT+36*
BGPSTAT("RX"	IPAMT+33*, IPAMT+34
>> BGPSTOP	IPAMT+3, IPAMT+4, IPAMT+6*
>> BGPVALUE	IPAMT+2, IPAMT+40, IPAMT+41, IPAMT+42, IPAMT+43, IPAMT+44, IPAMT+45, IPAMT+46, IPAMT+47, IPAMT+48 , IPAMT+49, IPAMT+52, IPAMT+53, IPAMT+54, IPAMT+55*
>> BGPX	AMI+6*
>> D	AMI+6, AMI+19, AMI+36, AMI+37, AMI+39, ASACONTR+9, ASACONTR+10, ASACONTR+11, ASACONTR+13, WAR71+8 , WAR71+11, HEM+9, HEM+11
>> DFN	IPAMT+5, IPAMT+8, IPAMT+9, IPAMT+12, IPAMT+15, IPAMT+16, IPAMT+19, IPAMT+22, IPAMT+23, IPAMT+26 , IPAMT+29, IPAMT+30, IPAMT+33, IPAMT+36, IPAMT+37
>> E	AMI+3, AMI+6, WAR71+7*, WAR71+8
EDATE	AMI~, AMI+3, ASACONTR~, HEM+1, HEM+10, HEM+18, HEM+20
G	AMI+2!, AMI+6, AMI+37, AMI+38, ASACONTR+8, ASACONTR+10, ASACONTR+12, ASACONTR+13, ASACONTR+14
G(	AMI+37*, AMI+39
G(0	AMI+39, AMI+40
>> H	AMI+11, AMI+12, AMI+14, AMI+15, AMI+16, AMI+17, AMI+39*, AMI+40
>> J	WAR71+1*, WAR71+6
>> K	ASACONTR+2*
>> M	AMI+6*
>> N	AMI+22, AMI+23, AMI+24, AMI+25, AMI+26, AMI+27, AMI+28, AMI+29, AMI+30, AMI+31 , AMI+32, AMI+33, AMI+34, AMI+35, ASACONTR+11, ASACONTR+12, HEM+11, HEM+12, HEM+13
P	AMI~, AMI+3, ASACONTR~, ASACONTR+3, HEM+1, HEM+7, HEM+9, HEM+11, HEM+18, HEM+20
>> R	ASACONTR+2*
>> S	WAR71+9*, WAR71+11
>> T	AMI+5, AMI+20, ASACONTR+5, ASACONTR+10, HEM+6*, HEM+8
U	IPAMT+6, IPAMT+8, IPAMT+9, IPAMT+10, IPAMT+15, IPAMT+22, IPAMT+29, IPAMT+42, IPAMT+43, IPAMT+44 , IPAMT+45, IPAMT+46, IPAMT+47, IPAMT+48, IPAMT+49, IPAMT+52, IPAMT+53, IPAMT+54, IPAMT+55, AMI+6 , AMI+8, AMI+9, AMI+10, AMI+12, AMI+20, AMI+21, AMI+37, AMI+40, ASACONTR+6, ASACONTR+9 , ASACONTR+11, WAR71+1, WAR71+2, WAR71+7, WAR71+8, WAR71+9, WAR71+10, WAR71+11, HEM+2, HEM+12 , HEM+13, HEM+19, HEM+21
>> V	AMI+6, AMI+7, AMI+8, AMI+9, AMI+10, AMI+12, AMI+19, AMI+37, AMI+39, AMI+40 , WAR71+2*, WAR71+3, WAR71+4, WAR71+7, WAR71+10, WAR71+11
>> X	IPAMT+42, IPAMT+43, IPAMT+44, IPAMT+45, IPAMT+46, IPAMT+47, IPAMT+48, IPAMT+49, IPAMT+52, IPAMT+53 , IPAMT+54, IPAMT+55, ASACONTR+6, HEM+7, HEM+8, HEM+9, HEM+11, HEM+18, HEM+19, HEM+20 , HEM+21
>> Y	AMI+19, AMI+20, AMI+21, AMI+22, ASACONTR+6, ASACONTR+7, ASACONTR+9, WAR71+1, WAR71+2, WAR71+9 , HEM+10
>> Z	WAR71+10*, WAR71+11

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP6D731

Information

Source Information

Call Graph

Call Graph Total: 14

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: