Routine: BGP7C1

Package	Total	Call Graph
IHS GPRA Information System	4	EN^BGP7C11 SMOKER^BGP7C12 ($$CPTI,$$TRANI)^BGP7DU ($$DATE,XTMP)^BGP7UTL
DRG Grouper	2	$$ICDDX^ICDCODE $$CODEN^ICPTCOD
Kernel	2	($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR
Patient Care Component Reports	2	$$START1^APCLDF $$PRIMPOV^APCLV
IHS Patient	1	($$AGE,$$DOB,$$HRN)^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component	1	^APCDCHKJ
Taxonomy	1	$$ICD^ATXCHK

Package	Total	Caller Graph
IHS GPRA Information System	3	BGP7C12 BGP7C3 BGP7CL

Name	Comments	DBIA/ICR reference
WARRX	;gather up warfarin meds
ASAALLEG(P,BGPD,BGPY)	;EP does patient have an aspirin allergy
ASARX	;
AMI	;EP
EXP(Y,Z,ADM)	;
ASAALG	;
ANTIRX	;gather up warfarin meds
AMIDX(V)	;
TRANS(H)	;
GETMEDS(P,BGPMBD,BGPMED,TAX1,TAX2,TAX3,EXP,ADM,BGPDNAME)	;EP
ASAPOV	;
WARRX1(P,BGPA,BGPD,BGPY)	;
ASACONT	;
ASACONTR(P,BGPA,BGPDDT,BGPV,BGPY)	;does patient have an aspirin allergy
ASARX1(P,BGPA,BGPD,BGPY)	;
DSCH(H)	;
ANTIRX1(P,BGPA,BGPD,BGPY)	;
PROC1	;current time period
EXPIRED(H,D)	;
TRANSIN(H)	;
AMA(H,D)	;
PROC	;EP
DEATHAMA(H)	;was discharge death or AMA?

Name	Field # of Occurrence
^APCDCHKJ	PROC+1
$$START1^APCLDF	GETMEDS+4, ASAPOV+1, ASAPOV+7
$$PRIMPOV^APCLV	AMI+5, AMI+25, AMIDX+1
$$ICD^ATXCHK	ASAPOV+18, AMIDX+5
$$AGE^AUPNPAT	AMI+3, AMI+7, AMI+23
$$DOB^AUPNPAT	ASAPOV+1, ASAPOV+7
$$HRN^AUPNPAT	AMI+3, AMI+23
EN^BGP7C11	ANTIRX+7
SMOKER^BGP7C12	ANTIRX+6
$$CPTI^BGP7DU	ASARX1+9, ASARX1+16, ASACONTR+31
$$TRANI^BGP7DU	ASARX1+11, ASARX1+18, ASACONTR+33
$$DATE^BGP7UTL	AMI+4, AMI+24, GETMEDS+19, ASARX1+10, ASARX1+12, ASARX1+17, ASARX1+19, ASAPOV+4, ASAPOV+5, ASAPOV+10 , ASAPOV+18, ASAPOV+24, ASACONTR+27, ASACONTR+32, ASACONTR+34
XTMP^BGP7UTL	PROC+5
$$ICDDX^ICDCODE	AMI+35, ASAPOV+5, ASAPOV+15, ASACONTR+13
$$CODEN^ICPTCOD	ASARX1+9, ASARX1+11, ASARX1+16, ASARX1+18, ASACONTR+31, ASACONTR+33
$$VAL^XBDIQ1	AMI+8, AMI+14, AMI+26, AMI+27, AMI+36, ASAPOV+3, ASAPOV+9, ASAPOV+16, ASACONTR+15, ASACONTR+27
$$FMADD^XLFDT	PROC+6, EXP+7, ASARX1+4, ASARX1+5, ASARX1+14, WARRX1+4, WARRX1+5, WARRX1+12, ANTIRX1+4, ANTIRX1+5 , ANTIRX1+8, ASAALLEG+5, ASACONTR+4, ASACONTR+5, ASACONTR+19, ASACONTR+31, ASACONTR+33
$$FMTE^XLFDT	GETMEDS+4, ASAPOV+1, ASAPOV+7
$$UP^XLFSTR	AMI+36, ASAPOV+3, ASAPOV+9, ASAPOV+16, ASAPOV+23

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	GETMEDS+13, GETMEDS+15, GETMEDS+16, ASACONTR+21
^ATXAX("B"	GETMEDS+5, GETMEDS+6, GETMEDS+7, ASAPOV+13, ASACONTR+18, AMIDX+3
^AUPNPREF - [#9000022]	ASACONTR+26, ASACONTR+27
^AUPNPREF("AA"	ASACONTR+20, ASACONTR+22, ASACONTR+25
^AUPNPROB - [#9000011]	ASAPOV+15, ASAPOV+17, ASAPOV+18
^AUPNPROB("AC"	ASAPOV+14
^AUPNVINP - [#9000010.02]	PROC+8, DEATHAMA+1, AMA+1, AMA+2, EXPIRED+1, EXPIRED+2, DSCH+1, TRANSIN+1, TRANS+1
^AUPNVINP("B"	PROC+7, PROC+8
^AUPNVMED - [#9000010.14]	GETMEDS+9, GETMEDS+11, GETMEDS+19, EXP+3
^AUPNVPOV - [#9000010.07]	AMI+33, AMI+34, AMI+35, ASAPOV+5, ASACONTR+12
^AUPNVPOV("AD"	AMI+32, ASACONTR+11
^AUPNVSIT - [#9000010]	PROC1+1, PROC1+2
^BGPCMSIA - [#90532.01]	PROC1+12
^DG(405.1 - [#405.1]	DEATHAMA+3, AMA+4, EXPIRED+4, TRANSIN+3, TRANS+3
^DPT - [#2]	PROC1+9, AMI+3, AMI+16, AMI+17, AMI+19, AMI+23, AMI+28, AMI+31, AMI+38, ASAALG+1 , ASAALG+4, ASAALG+6, ASACONT+1, ASACONT+4, ASACONT+6, ASARX+1, ASARX+5, WARRX+1, WARRX+5, ANTIRX+1 , ANTIRX+5
^GMR(120.8 - [#120.8]	ASAPOV+21, ASAPOV+22, ASAPOV+23, ASAPOV+24
^PSDRUG - [#50]	GETMEDS+12, GETMEDS+14, GETMEDS+17
^PSRX - [#52]	EXP+5
^PSRX("APCC"	EXP+4
^TMP($J	GETMEDS+1!, GETMEDS+8, GETMEDS+19, EXP+7
^XTMP("BGP7C1"	PROC+4!, AMI+16, AMI+17, AMI+19, AMI+28, AMI+31, AMI+38, ASAALG+1, ASAALG+4, ASAALG+6 , ASACONT+1, ASACONT+4, ASACONT+6, ASARX+1, ASARX+5, WARRX+1, WARRX+5, ANTIRX+1, ANTIRX+5*

Name	Line Occurrences
$$AMIDX	AMI+2
$$DSCH	AMI+4, AMI+24, ASAALG+3, ASACONT+3, ASARX+3, WARRX+3, ANTIRX+3
$$EXP	GETMEDS+18
ANTIRX1	ANTIRX+3
ASAALLEG	ASAALG+3
ASACONTR	ASACONT+3
ASARX1	ASARX+3
GETMEDS	ASARX1+6, ASARX1+15, WARRX1+6, WARRX1+13, ANTIRX1+6, ANTIRX1+9, ASACONTR+7, ASACONTR+9
PROC1	PROC+8
WARRX1	WARRX+3

Name	Field # of Occurrence
^(	AMI+38*, EXP+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADM	GETMEDS~, GETMEDS+18, EXP~, EXP+6, EXP+7
BD	ASARX1+2~, ASARX1+5, ASARX1+6, ASARX1+9, ASARX1+11, ASARX1+13, ASARX1+15, ASARX1+16, ASARX1+18, WARRX1+2~ , WARRX1+5, WARRX1+6, WARRX1+11, WARRX1+13, ANTIRX1+2~, ANTIRX1+5, ANTIRX1+6, ANTIRX1+7, ANTIRX1+9, ASAALLEG+2~ , ASACONTR+2~, ASACONTR+4*, ASACONTR+7
BGPA	ASARX1~, ASARX1+4, ASARX1+5, ASARX1+13, WARRX1~, WARRX1+4, WARRX1+5, WARRX1+11, ANTIRX1~, ANTIRX1+4 , ANTIRX1+5, ANTIRX1+7, ASACONTR~, ASACONTR+4, ASACONTR+5, ASACONTR+7
BGPASAAL	ASAALG+2!, ASAALG+3, ASAALG+4, ASACONT+2!, ASACONT+3, ASACONT+4, ASARX+2!, ASARX+3, WARRX+2!, WARRX+3 , ANTIRX+2!, ANTIRX+3
BGPASAAL(	ASAALG+5, ASAALG+6, ASACONT+5, ASACONT+6, ASARX+4, ASARX+5, WARRX+4, WARRX+5, ANTIRX+4, ANTIRX+5
>> BGPBD	PROC+6
>> BGPBT	PROC+2*
BGPC	GETMEDS+22, ASARX1+2~, ASARX1+3, ASARX1+10, ASARX1+12, ASARX1+17, ASARX1+19, WARRX1+2~, WARRX1+3, ANTIRX1+2~ , ANTIRX1+3, ASAALLEG+2~, ASAALLEG+4, ASAPOV+4, ASAPOV+5, ASAPOV+10, ASAPOV+18, ASAPOV+24, ASACONTR+2~, ASACONTR+3* , ASACONTR+15, ASACONTR+27, ASACONTR+32, ASACONTR+34
>> BGPC1	GETMEDS+3*
BGPCOUNT	PROC+4!
BGPCOUNT("L1"	AMI+20*
BGPCOUNT("L2"	AMI+29*
BGPD	ASARX1~, ASARX1+14, WARRX1~, WARRX1+12, ANTIRX1~, ANTIRX1+8, ASAALLEG~, ASAALLEG+5, ASAPOV+1, ASAPOV+7 , ASAPOV+17, ASAPOV+22
BGPDDT	ASACONTR~, ASACONTR+9, ASACONTR+19, ASACONTR+24, ASACONTR+31, ASACONTR+33
BGPDNAME	GETMEDS~, GETMEDS+2*, GETMEDS+17
>> BGPED	PROC+7
>> BGPET	PROC+9*
BGPG	ASARX1+2~, ASARX1+20!, ASAALLEG+2~, ASAPOV+1!, ASAPOV+7!, ASACONTR+2~
BGPG(	ASAPOV+2, ASAPOV+4, ASAPOV+5, ASAPOV+8, ASAPOV+10
>> BGPH	PROC+3*, PROC+4, AMI+16, AMI+17, AMI+19, AMI+28, AMI+31, AMI+38, ASAALG+1, ASAALG+4 , ASAALG+6, ASACONT+1, ASACONT+4, ASACONT+6, ASARX+1, ASARX+5, WARRX+1, WARRX+5, ANTIRX+1, ANTIRX+5
>> BGPHOSP	PROC1+6
>> BGPIND	PROC1+10*, PROC1+11, PROC1+12, AMI+16, AMI+17, AMI+19, AMI+20, AMI+28, AMI+29, AMI+31 , AMI+38, ASAALG+1, ASAALG+4, ASAALG+6, ASACONT+1, ASACONT+4, ASACONT+6, ASARX+1, ASARX+5, WARRX+1 , WARRX+5, ANTIRX+1, ANTIRX+5
>> BGPIND(	PROC1+10
>> BGPJ	PROC+3*, PROC+4, AMI+16, AMI+17, AMI+19, AMI+28, AMI+31, AMI+38, ASAALG+1, ASAALG+4 , ASAALG+6, ASACONT+1, ASACONT+4, ASACONT+6, ASARX+1, ASARX+5, WARRX+1, WARRX+5, ANTIRX+1, ANTIRX+5
BGPMBD	GETMEDS~, GETMEDS+4
BGPMED	GETMEDS~, GETMEDS+4
>> BGPORDER	PROC1+11*, AMI+16, AMI+17, AMI+19, AMI+28, AMI+31, AMI+38, ASAALG+1, ASAALG+4, ASAALG+6 , ASACONT+1, ASACONT+4, ASACONT+6, ASARX+1, ASARX+5, WARRX+1, WARRX+5, ANTIRX+1, ANTIRX+5
>> BGPSD	PROC+6, PROC+7, PROC+8
>> BGPSKIP	AMI+6, AMI+7, AMI+22
BGPV	ASACONTR~, ASACONTR+11
>> BGPVINP	PROC+8*, AMI+4, AMI+8, AMI+14, AMI+24, AMI+26, AMI+27, ASAALG+3, ASACONT+3, ASARX+3 , WARRX+3, ANTIRX+3
>> BGPVSIT	PROC+8*, PROC1+1, PROC1+2, AMI+2, AMI+5, AMI+16, AMI+17, AMI+19, AMI+25, AMI+28 , AMI+31, AMI+32, AMI+38, ASAALG+1, ASAALG+4, ASAALG+6, ASACONT+1, ASACONT+3, ASACONT+4, ASACONT+6 , ASARX+1, ASARX+5, WARRX+1, WARRX+5, ANTIRX+1, ANTIRX+5
>> BGPVSIT0	PROC1+2*, PROC1+3, PROC1+4, PROC1+5, PROC1+6, PROC1+7, PROC1+8, AMI+3, AMI+4, AMI+7 , AMI+23, AMI+24, ASACONT+3, ASARX+3, WARRX+3, ANTIRX+3
>> BGPX	AMI+3, AMI+4, AMI+5, AMI+7, AMI+9, AMI+15, AMI+17, AMI+23, AMI+24, AMI+25* , AMI+26, AMI+27, AMI+28
BGPY	ASARX1~, ASARX1+3!, WARRX1~, WARRX1+3!, ANTIRX1~, ANTIRX1+3!, ASAALLEG~, ASAALLEG+4!, ASACONTR~, ASACONTR+3!
BGPY(	GETMEDS+22, ASARX1+10, ASARX1+12, ASARX1+17, ASARX1+19, ASAPOV+4, ASAPOV+5, ASAPOV+10, ASAPOV+18, ASAPOV+24 , ASACONTR+15, ASACONTR+27, ASACONTR+32, ASACONTR+34
BGPY("B"	GETMEDS+22*
BGPZ	AMI+6!, AMI+18, GETMEDS+3!
BGPZ(	AMI+18, GETMEDS+19*, GETMEDS+21, GETMEDS+22
BGPZ(1	AMI+7*
BGPZ1	AMI+18!, AMI+19
>> C	AMI+32, AMI+37, AMI+38, GETMEDS+12, GETMEDS+13, GETMEDS+14, GETMEDS+15, AMIDX+1*, AMIDX+2, AMIDX+5
D	GETMEDS+11, GETMEDS+12, GETMEDS+14, GETMEDS+16, GETMEDS+17, GETMEDS+22, ASARX1+2~, ASACONTR+22*, ASACONTR+23, ASACONTR+25 , AMA~, AMA+1, EXPIRED~, EXPIRED+1
>> DFN	PROC1+8*, PROC1+9, AMI+3, AMI+7, AMI+16, AMI+17, AMI+19, AMI+23, AMI+28, AMI+31 , AMI+38, ASAALG+1, ASAALG+3, ASAALG+4, ASAALG+6, ASACONT+1, ASACONT+3, ASACONT+4, ASACONT+6, ASARX+1 , ASARX+3, ASARX+5, WARRX+1, WARRX+3, WARRX+5, ANTIRX+1, ANTIRX+3, ANTIRX+5, ASAPOV+7
DUZ(2	AMI+3, AMI+23
E	GETMEDS+4, EXP+5, EXP+6, ASARX1+2~, WARRX1+2~, ANTIRX1+2~, ASAPOV+1, ASAPOV+7, ASACONTR+2~
ED	ASARX1+2~, ASARX1+4, ASARX1+6, ASARX1+9, ASARX1+11, ASARX1+14, ASARX1+15, ASARX1+16, ASARX1+18, WARRX1+2~ , WARRX1+4, WARRX1+6, WARRX1+12, WARRX1+13, ANTIRX1+2~, ANTIRX1+4, ANTIRX1+6, ANTIRX1+8, ANTIRX1+9, ASAALLEG+2~ , ASAALLEG+5, ASACONTR+2~, ASACONTR+5, ASACONTR+7
EXP	GETMEDS~, GETMEDS+18
G	GETMEDS+10, GETMEDS+13, GETMEDS+15, GETMEDS+16, GETMEDS+17, GETMEDS+19, EXP+1~, EXP+2, EXP+6, EXP+7 , EXP+8, ASARX1+2~
H	DEATHAMA~, DEATHAMA+1, AMA~, AMA+1, AMA+2, EXPIRED~, EXPIRED+1, EXPIRED+2, DSCH~, DSCH+1 , TRANSIN~, TRANSIN+1, TRANS~, TRANS+1
>> I	AMI+35, AMI+38, ASAPOV+15, ASAPOV+18, ASACONTR+12, ASACONTR+13, ASACONTR+14, ASACONTR+15
N	AMI+36, AMI+38, GETMEDS+21, GETMEDS+22, EXP+3, EXP+7, ASAALLEG+2~, ASAPOV+3, ASAPOV+4, ASAPOV+5 , ASAPOV+9, ASAPOV+10, ASAPOV+16, ASAPOV+18, ASAPOV+23, ASAPOV+24, ASACONTR+2~, ASACONTR+25, ASACONTR+26, ASACONTR+27
P	GETMEDS~, GETMEDS+4, ASARX1~, ASARX1+6, ASARX1+9, ASARX1+11, ASARX1+15, ASARX1+16, ASARX1+18, WARRX1~ , WARRX1+6, WARRX1+13, ANTIRX1~, ANTIRX1+6, ANTIRX1+9, ASAALLEG~, ASAPOV+1, ASAPOV+7, ASAPOV+14, ASAPOV+21 , ASACONTR~, ASACONTR+7, ASACONTR+9, ASACONTR+20, ASACONTR+22, ASACONTR+25, ASACONTR+31, ASACONTR+33
>> T	GETMEDS+5, GETMEDS+16, ASAPOV+13, ASAPOV+18, ASACONTR+18, ASACONTR+21, AMIDX+3, AMIDX+4, AMIDX+5
>> T1	GETMEDS+6*, GETMEDS+15
>> T2	GETMEDS+7*, GETMEDS+13
TAX1	GETMEDS~, GETMEDS+5
TAX2	GETMEDS~, GETMEDS+6
TAX3	GETMEDS~, GETMEDS+7
U	PROC+8, PROC1+3, PROC1+4, PROC1+5, PROC1+6, PROC1+7, PROC1+8, PROC1+9, AMI+3, AMI+4 , AMI+5, AMI+7, AMI+9, AMI+15, AMI+16, AMI+17, AMI+19, AMI+23, AMI+24, AMI+25 , AMI+26, AMI+27, AMI+28, AMI+31, AMI+34, AMI+35, AMI+38, ASAALG+1, ASAALG+4, ASAALG+6 , ASACONT+1, ASACONT+3, ASACONT+4, ASACONT+6, ASARX+1, ASARX+3, ASARX+5, WARRX+1, WARRX+3, WARRX+5 , ANTIRX+1, ANTIRX+3, ANTIRX+5, GETMEDS+8, GETMEDS+11, GETMEDS+12, GETMEDS+14, GETMEDS+17, GETMEDS+19, EXP+3 , EXP+5, ASARX1+10, ASARX1+12, ASARX1+17, ASARX1+19, ASAPOV+2, ASAPOV+4, ASAPOV+5, ASAPOV+8, ASAPOV+10 , ASAPOV+15, ASAPOV+17, ASAPOV+18, ASAPOV+22, ASAPOV+23, ASAPOV+24, ASACONTR+12, ASACONTR+13, ASACONTR+26, ASACONTR+27 , ASACONTR+32, ASACONTR+34, DEATHAMA+1, DEATHAMA+3, AMA+1, AMA+2, AMA+4, EXPIRED+1, EXPIRED+2, EXPIRED+4 , DSCH+1, TRANSIN+1, TRANSIN+3, TRANS+1, TRANS+3
V	AMIDX~, AMIDX+1
X	AMI+18, AMI+32, AMI+33, AMI+34, AMI+35, AMI+36, ASAALG+5, ASAALG+6, ASACONT+5, ASACONT+6 , ASARX+4, ASARX+5, WARRX+4, WARRX+5, ANTIRX+4, ANTIRX+5, GETMEDS+4, GETMEDS+8, GETMEDS+18, GETMEDS+19 , EXP+7, ASARX1+2~, ASARX1+9, ASARX1+10, ASARX1+11, ASARX1+12, ASARX1+16, ASARX1+17, ASARX1+18, ASARX1+19 , WARRX1+2~, ANTIRX1+2~, ASAALLEG+2~, ASAPOV+1, ASAPOV+2, ASAPOV+4, ASAPOV+5, ASAPOV+7, ASAPOV+8, ASAPOV+10 , ASAPOV+14, ASAPOV+15, ASAPOV+16, ASAPOV+17, ASAPOV+18, ASAPOV+21, ASAPOV+22, ASAPOV+23, ASAPOV+24, ASACONTR+2~ , ASACONTR+11, ASACONTR+12, ASACONTR+15, ASACONTR+20, ASACONTR+21, ASACONTR+22, ASACONTR+25, ASACONTR+27, ASACONTR+31, ASACONTR+32 , ASACONTR+33, ASACONTR+34, DEATHAMA+1, DEATHAMA+2, DEATHAMA+3, DEATHAMA+4, DEATHAMA+5, DEATHAMA+6, DEATHAMA+7, DEATHAMA+8 , AMA+2, AMA+3, AMA+4, AMA+5, EXPIRED+2, EXPIRED+3, EXPIRED+4, EXPIRED+5, TRANSIN+1, TRANSIN+2 , TRANSIN+3, TRANSIN+4, TRANS+1, TRANS+2, TRANS+3*, TRANS+4
Y	GETMEDS+4, GETMEDS+8, GETMEDS+9, GETMEDS+11, GETMEDS+18, GETMEDS+19, EXP~, EXP+3, EXP+4, ASARX1+2~ , WARRX1+2~, ANTIRX1+2~, ASAALLEG+2~, ASAPOV+1, ASAPOV+2, ASAPOV+3, ASAPOV+5, ASAPOV+7, ASAPOV+8, ASAPOV+9 , ASAPOV+15, ASAPOV+18, ASACONTR+2~, ASACONTR+23, ASACONTR+24
Z	AMI+8, AMI+9, AMI+14, AMI+15, EXP~, EXP+4, EXP+5, ASARX1+2~, WARRX1+2~, ANTIRX1+2~ , ASAALLEG+2~, ASAPOV+5, ASACONTR+2~, ASACONTR+19*, ASACONTR+23

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP7C1

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: