Routine: BGP7C2

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
Naked Globals
Local Variables

Information

BGP7C2 ; IHS/CMI/LAB - calc CMS measures 26 Sep 2004 11:28 AM ;

Source Information

Source file <BGP7C2.m>

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
IHS GPRA Information System	5	(ACEIALG1,ACEICON1,ACEIRX1)^BGP7C11 (CESS1,EN,SMOKER1)^BGP7C12 ($$DENT,$$DX,$$TOBACCO)^BGP7D7 $$DATE^BGP7UTL $$LASTPRC^BGP7UTL1
DRG Grouper	2	($$ICDDX,$$ICDOP)^ICDCODE $$CPT^ICPTCOD
Kernel	2	($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR
Patient Care Component Reports	2	$$START1^APCLDF ($$CLINIC,$$PRIMPOV)^APCLV
IHS Patient	1	($$AGE,$$DOB,$$HRN)^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Taxonomy	1	$$ICD^ATXCHK

Entry Points

Name	Comments	DBIA/ICR reference
LVAD	;
HF	;
ACEIRX	;
LVF(P,BGPD,BGPY)	;does patient have LVSD
LVAD1(P,BD,ED,BGPY)	;
CESS1(P,BDATE,EDATE,BGPY)	;
CESS	;
LVADEX(P,BD,ED)	;
HFDX(V)	;
TRANS(H)	;
CPTC(Z)	;
EF	;
LVSD	;
DSCH(H)	;
CEFPROC	;now see if any procedures
ACEIALG	;
LVSD1(P,BGPD,BGPY)	;
SMOKER1(P,BGPA,BGPD,BGPY)	;
EXPIRED(H)	;
SMOKER	;EP
TRANSIN(H)	;
CEFCPT	;now get all cpts
ACEICONT	;
CEFMEAS	;now get all measurements CEF
AMA(H)	;

External References

Name	Field # of Occurrence
$$START1^APCLDF	CEFMEAS+1, LVSD1+15, CESS1+3, CESS1+14
$$CLINIC^APCLV	CESS1+20
$$PRIMPOV^APCLV	HF+5, HF+26, HFDX+1
$$ICD^ATXCHK	CEFPROC+6, CEFCPT+6, CEFCPT+17, LVSD1+8, LVSD1+27, LVSD1+38, HFDX+5, LVAD1+6
$$AGE^AUPNPAT	HF+3, HF+7, HF+24
$$DOB^AUPNPAT	CEFMEAS+1, LVSD1+15
$$HRN^AUPNPAT	HF+3, HF+24
ACEIALG1^BGP7C11	ACEIALG+3
ACEICON1^BGP7C11	ACEICONT+3
ACEIRX1^BGP7C11	ACEIRX+3
CESS1^BGP7C12	CESS+3
EN^BGP7C12	CESS+6
SMOKER1^BGP7C12	SMOKER+3
$$DENT^BGP7D7	SMOKER1+7
$$DX^BGP7D7	SMOKER1+5
$$TOBACCO^BGP7D7	SMOKER1+3
$$DATE^BGP7UTL	HF+4, HF+25, CEFMEAS+4, CEFPROC+10, CEFCPT+10, CEFCPT+21, CEFCPT+33, LVSD1+12, LVSD1+19, LVSD1+31 , LVSD1+42, LVAD1+11, SMOKER1+6, SMOKER1+8, CESS1+10, CESS1+11, CESS1+12, CESS1+21, CESS1+22, CESS1+34
$$LASTPRC^BGP7UTL1	LVADEX+1
$$ICDDX^ICDCODE	HF+36, LVSD1+6
$$ICDOP^ICDCODE	CEFPROC+4, LVSD1+25, LVAD1+4
$$CPT^ICPTCOD	CEFCPT+4, CEFCPT+10, CEFCPT+14, CEFCPT+21, LVSD1+36, LVSD1+42
$$VAL^XBDIQ1	HF+9, HF+15, HF+27, HF+28, HF+37, CEFPROC+10, LVSD1+12, LVSD1+31, LVAD1+11
$$FMADD^XLFDT	SMOKER1+3, SMOKER1+5, SMOKER1+7
$$FMTE^XLFDT	CEFMEAS+1, LVSD1+15, CESS1+3, CESS1+14
$$UP^XLFSTR	HF+37

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	CEFPROC+5, CEFCPT+5, CEFCPT+16, LVSD1+7, LVSD1+26, LVSD1+37, HFDX+3, LVAD1+5
^AUPNPREF - [#9000022]	CESS1+29
^AUPNPREF("AA"	CESS1+26, CESS1+27, CESS1+28
^AUPNVCPT - [#9000010.18]	CEFCPT+2, CEFCPT+3, CEFCPT+7, LVSD1+34, LVSD1+39
^AUPNVCPT("AC"	CEFCPT+1, LVSD1+33
^AUPNVDEN - [#9000010.05]	CESS1+22
^AUPNVDEN("AD"	CESS1+22
^AUPNVINP - [#9000010.02]	AMA+1, EXPIRED+1, DSCH+1, TRANSIN+1, TRANS+1
^AUPNVMSR - [#9000010.01]	CEFMEAS+3, LVSD1+17
^AUPNVPED - [#9000010.16]	CESS1+6
^AUPNVPOV - [#9000010.07]	HF+34, HF+35, HF+36, LVSD1+4, LVSD1+5, LVSD1+9
^AUPNVPOV("AC"	LVSD1+3
^AUPNVPOV("AD"	HF+33
^AUPNVPRC - [#9000010.08]	CEFPROC+2, CEFPROC+3, CEFPROC+7, LVSD1+23, LVSD1+24, LVSD1+28, LVSD1+35, LVAD1+2, LVAD1+3, LVAD1+7
^AUPNVPRC("AC"	CEFPROC+1, LVSD1+22, LVAD1+1
^AUPNVSIT - [#9000010]	CEFPROC+8, CEFCPT+8, CEFCPT+19, LVSD1+10, LVSD1+29, LVSD1+40, LVAD1+8, CESS1+17, CESS1+18, CESS1+19 , CESS1+21, CESS1+22
^AUPNVTC - [#9000010.33]	CEFCPT+12, CEFCPT+13, CEFCPT+18
^AUPNVTC("AC"	CEFCPT+11
^AUTTADA - [#9999999.31]	CESS1+22
^AUTTEDT - [#9999999.09]	CESS1+8, CESS1+9, CESS1+33
^BMCREF - [#90001]	CEFCPT+24, CEFCPT+28, CEFCPT+33
^BMCREF("D"	CEFCPT+23
^BMCTDXC - [#90001.51]	CEFCPT+26, CEFCPT+27, CEFCPT+33
^BMCTSVC - [#90001.52]	CEFCPT+30, CEFCPT+31
^DG(405.1 - [#405.1]	AMA+3, EXPIRED+3, TRANSIN+3, TRANS+3
^DPT - [#2]	HF+3, HF+17, HF+18, HF+20, HF+24, HF+29, HF+32, HF+39, EF+1, EF+5 , LVSD+1, LVSD+5, ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+5 , SMOKER+1, SMOKER+5, CESS+1, CESS+5
^TMP($J	CESS1+13!, CESS1+15, CESS1+16
^XTMP("BGP7C1"	HF+17, HF+18, HF+20, HF+29, HF+32, HF+39, EF+1, EF+5, LVSD+1, LVSD+5* , ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+5, SMOKER+1, SMOKER+5 , CESS+1, CESS+5

Name	Line Occurrences
$$CPTC	CEFCPT+32
$$DSCH	HF+4, HF+8, HF+25, ACEIALG+3, ACEICONT+3, ACEIRX+3, SMOKER+3, CESS+3
$$HFDX	HF+2
$$LVADEX	HF+8
LVF	EF+3
LVSD1	LVSD+3

Name	Field # of Occurrence
^(	HF+39*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	CESS1+4, CESS1+5
>> A	CESS1+14*
>> B	CESS1+14, CESS1+20, CESS1+21, CESS1+22*
BD	LVF+1~, LVADEX~, LVADEX+1, LVAD1~, LVAD1+10
BDATE	CESS1~, CESS1+3, CESS1+14, CESS1+31
BGPA	SMOKER1~, SMOKER1+3, SMOKER1+5, SMOKER1+7
>> BGPALLED(	CESS1+5, CESS1+6, CESS1+10, CESS1+11, CESS1+12
>> BGPALLED(1	CESS1+4
BGPASAAL	SMOKER+2!, SMOKER+3, CESS+2!, CESS+3
BGPASAAL(	SMOKER+4, SMOKER+5, CESS+4, CESS+5
BGPC	LVF+1~, LVF+3, CEFMEAS+4, CEFPROC+10, CEFCPT+10, CEFCPT+21, CEFCPT+33, LVSD1+1~, LVSD1+2, LVSD1+12 , LVSD1+19, LVSD1+31, LVSD1+42, LVAD1+11, SMOKER1+1, SMOKER1+4, SMOKER1+6, SMOKER1+8, CESS1+1, CESS1+10 , CESS1+11, CESS1+12, CESS1+21, CESS1+22, CESS1+34*
>> BGPCOUNT("L1"	HF+21*
>> BGPCOUNT("L2"	HF+30*
BGPD	LVF~, CEFMEAS+1, LVSD1~, LVSD1+11, LVSD1+15, SMOKER1~
BGPDATA	EF+2!, EF+3, LVSD+2!, LVSD+3, ACEIALG+2!, ACEIALG+3, ACEIALG+4, ACEICONT+2!, ACEICONT+3, ACEICONT+4 , ACEIRX+2!, ACEIRX+3
BGPDATA(	EF+4, EF+5, LVSD+4, LVSD+5, ACEIALG+5, ACEIALG+6, ACEICONT+5, ACEICONT+6, ACEIRX+4, ACEIRX+5
BGPDENT	SMOKER1+2~, SMOKER1+7*, SMOKER1+8
BGPDX	SMOKER1+2~, SMOKER1+5*, SMOKER1+6
BGPG	LVF+1~, CEFMEAS+1!, LVSD1+15!
BGPG(	CEFMEAS+2, CEFMEAS+4, LVSD1+16, LVSD1+19
>> BGPH	HF+17, HF+18, HF+20, HF+29, HF+32, HF+39, EF+1, EF+5, LVSD+1, LVSD+5 , ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+5, SMOKER+1, SMOKER+5 , CESS+1, CESS+5
>> BGPIND	HF+17, HF+18, HF+20, HF+21, HF+29, HF+30, HF+32, HF+39, EF+1, EF+5 , LVSD+1, LVSD+5, ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+5 , SMOKER+1, SMOKER+5, CESS+1, CESS+5
>> BGPJ	HF+17, HF+18, HF+20, HF+29, HF+32, HF+39, EF+1, EF+5, LVSD+1, LVSD+5 , ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+5, SMOKER+1, SMOKER+5 , CESS+1, CESS+5
>> BGPORDER	HF+17, HF+18, HF+20, HF+29, HF+32, HF+39, EF+1, EF+5, LVSD+1, LVSD+5 , ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+5, SMOKER+1, SMOKER+5 , CESS+1, CESS+5
>> BGPSKIP	HF+6, HF+7, HF+8*, HF+23
BGPTOB	SMOKER1+2~, SMOKER1+3*, SMOKER1+4
>> BGPVINP	HF+4, HF+8, HF+9, HF+15, HF+25, HF+27, HF+28, ACEIALG+3, ACEICONT+3, ACEIRX+3 , SMOKER+3, CESS+3
>> BGPVSIT	HF+2, HF+5, HF+17, HF+18, HF+20, HF+26, HF+29, HF+32, HF+33, HF+39 , EF+1, EF+5, LVSD+1, LVSD+5, ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+3, ACEICONT+4 , ACEICONT+6, ACEIRX+1, ACEIRX+5, SMOKER+1, SMOKER+5, CESS+1, CESS+5
>> BGPVSIT0	HF+3, HF+4, HF+7, HF+8, HF+24, HF+25, ACEICONT+3, ACEIRX+3, SMOKER+3, CESS+3
>> BGPX	HF+3, HF+4, HF+5, HF+7, HF+8, HF+10, HF+16, HF+18, HF+24, HF+25* , HF+26, HF+27, HF+28*, HF+29
BGPY	LVF~, LVF+3!, LVSD1~, LVAD1~, SMOKER1~, SMOKER1+1!, CESS1~, CESS1+1!, CESS1+24
BGPY(	CEFMEAS+4, CEFPROC+10, CEFCPT+10, CEFCPT+21, CEFCPT+33, LVSD1+12, LVSD1+19, LVSD1+31, LVSD1+42, LVAD1+11 , SMOKER1+4, SMOKER1+6, SMOKER1+8, CESS1+10, CESS1+11, CESS1+12, CESS1+21, CESS1+22, CESS1+34*
BGPZ	HF+6!, HF+19
BGPZ(	HF+19
BGPZ(1	HF+7, HF+8
BGPZ1	HF+19!, HF+20
>> C	HF+33, HF+38, HF+39, CEFCPT+28, CEFCPT+29, CEFCPT+30, CEFCPT+31, HFDX+1, HFDX+2, HFDX+5
>> D	CESS1+5, CESS1+27, CESS1+28
>> DFN	HF+3, HF+7, HF+8, HF+17, HF+18, HF+20, HF+24, HF+29, HF+32, HF+39 , EF+1, EF+3, EF+5, LVSD+1, LVSD+3, LVSD+5, ACEIALG+1, ACEIALG+3, ACEIALG+4, ACEIALG+6 , ACEICONT+1, ACEICONT+3, ACEICONT+4, ACEICONT+6, ACEIRX+1, ACEIRX+3, ACEIRX+5, SMOKER+1, SMOKER+3, SMOKER+5 , CESS+1, CESS+3, CESS+5, CEFMEAS+1, LVSD1+15
DT	EF+3, LVSD+3
DUZ(2	HF+3, HF+24
>> E	CEFMEAS+1, LVSD1+15, CESS1+3, CESS1+14
ED	LVF+1~, LVADEX~, LVADEX+1, LVAD1~, LVAD1+9
EDATE	CESS1~, CESS1+3, CESS1+14, CESS1+32
>> G	CESS1+16, CESS1+26, CESS1+27, CESS1+28
H	AMA~, AMA+1, EXPIRED~, EXPIRED+1, DSCH~, DSCH+1, TRANSIN~, TRANSIN+1, TRANS~, TRANS+1
I	HF+36, HF+39, LVF+1~, CEFPROC+3, CEFPROC+4, CEFPROC+6, CEFCPT+3, CEFCPT+4, CEFCPT+6, CEFCPT+10 , CEFCPT+13, CEFCPT+14, CEFCPT+17, CEFCPT+21, CEFCPT+24, CEFCPT+25, CEFCPT+26, CEFCPT+27, CEFCPT+33, LVSD1+1~ , LVSD1+5, LVSD1+6, LVSD1+8, LVSD1+24, LVSD1+25, LVSD1+27, LVSD1+35, LVSD1+36, LVSD1+38, LVSD1+42 , LVAD1+3, LVAD1+4, LVAD1+6, CESS1+28, CESS1+29
N	HF+37, HF+39, LVF+1~, CEFMEAS+3, CEFMEAS+4, LVSD1+17*, LVSD1+18, LVSD1+19
P	LVF~, CEFMEAS+1, CEFPROC+1, CEFCPT+1, CEFCPT+11, CEFCPT+23, LVSD1~, LVSD1+3, LVSD1+15, LVSD1+22 , LVSD1+33, LVADEX~, LVADEX+1, LVAD1~, LVAD1+1, SMOKER1~, SMOKER1+3, SMOKER1+5, SMOKER1+7, CESS1~ , CESS1+3, CESS1+14, CESS1+26, CESS1+27, CESS1+28
T	LVF+1~, CEFPROC+5, CEFPROC+6, CEFCPT+5, CEFCPT+6, CEFCPT+16, CEFCPT+17, LVSD1+1~, LVSD1+7, LVSD1+8 , LVSD1+26, LVSD1+27, LVSD1+37, LVSD1+38, HFDX+3, HFDX+4, HFDX+5, LVAD1+5, LVAD1+6, CESS1+5* , CESS1+6, CESS1+7, CESS1+8, CESS1+9, CESS1+10, CESS1+11, CESS1+12
U	HF+3, HF+4, HF+5, HF+7, HF+8, HF+10, HF+16, HF+17, HF+18, HF+20 , HF+24, HF+25, HF+26, HF+27, HF+28, HF+29, HF+32, HF+35, HF+36, HF+39 , EF+1, EF+5, LVSD+1, LVSD+5, ACEIALG+1, ACEIALG+4, ACEIALG+6, ACEICONT+1, ACEICONT+3, ACEICONT+4 , ACEICONT+6, ACEIRX+1, ACEIRX+3, ACEIRX+5, SMOKER+1, SMOKER+3, SMOKER+5, CESS+1, CESS+3, CESS+5 , CEFMEAS+2, CEFMEAS+3, CEFMEAS+4, CEFPROC+3, CEFPROC+4, CEFPROC+7, CEFPROC+8, CEFCPT+3, CEFCPT+4, CEFCPT+7 , CEFCPT+8, CEFCPT+10, CEFCPT+13, CEFCPT+14, CEFCPT+18, CEFCPT+19, CEFCPT+21, CEFCPT+24, CEFCPT+27, CEFCPT+28 , CEFCPT+31, CEFCPT+33, LVSD1+5, LVSD1+6, LVSD1+9, LVSD1+10, LVSD1+16, LVSD1+17, LVSD1+19, LVSD1+24 , LVSD1+25, LVSD1+28, LVSD1+29, LVSD1+35, LVSD1+36, LVSD1+39, LVSD1+40, LVSD1+42, AMA+1, AMA+3 , EXPIRED+1, EXPIRED+3, DSCH+1, TRANSIN+1, TRANSIN+3, TRANS+1, TRANS+3, LVAD1+3, LVAD1+4, LVAD1+7 , LVAD1+8, SMOKER1+4, SMOKER1+6, SMOKER1+8, CESS1+6, CESS1+9, CESS1+10, CESS1+11, CESS1+12, CESS1+16 , CESS1+18, CESS1+19, CESS1+21, CESS1+22, CESS1+29, CESS1+33
V	CEFPROC+7, CEFPROC+8, CEFPROC+10, CEFCPT+7, CEFCPT+8, CEFCPT+10, CEFCPT+18, CEFCPT+19, CEFCPT+21, CEFCPT+31* , CEFCPT+32, CEFCPT+33, LVSD1+1~, LVSD1+9, LVSD1+10, LVSD1+11, LVSD1+12, LVSD1+28, LVSD1+29, LVSD1+31 , LVSD1+39, LVSD1+40, LVSD1+42, HFDX~, HFDX+1, LVAD1+7, LVAD1+8, LVAD1+9, LVAD1+10, LVAD1+11 , CESS1+16*, CESS1+17, CESS1+18, CESS1+19, CESS1+20, CESS1+21, CESS1+22
X	HF+19, HF+33, HF+34, HF+35, HF+36, HF+37, EF+4, EF+5, LVSD+4, LVSD+5 , ACEIALG+5, ACEIALG+6, ACEICONT+5, ACEICONT+6, ACEIRX+4, ACEIRX+5, SMOKER+4, SMOKER+5, CESS+4, CESS+5 , LVF+1~, CEFMEAS+1, CEFMEAS+2, CEFMEAS+4, CEFPROC+1, CEFPROC+2, CEFPROC+3, CEFPROC+7, CEFPROC+10, CEFCPT+1* , CEFCPT+2, CEFCPT+3, CEFCPT+7, CEFCPT+11, CEFCPT+12, CEFCPT+13, CEFCPT+18, CEFCPT+23, CEFCPT+24, CEFCPT+28 , CEFCPT+33, LVSD1+1~, LVSD1+3, LVSD1+4, LVSD1+5, LVSD1+9, LVSD1+12, LVSD1+15, LVSD1+16, LVSD1+19 , LVSD1+22, LVSD1+23, LVSD1+24, LVSD1+28, LVSD1+31, LVSD1+33, LVSD1+34, LVSD1+35, LVSD1+39, AMA+1 , AMA+2, AMA+3, AMA+4, EXPIRED+1, EXPIRED+2, EXPIRED+3, EXPIRED+4, TRANSIN+1, TRANSIN+2, TRANSIN+3* , TRANSIN+4, TRANS+1, TRANS+2, TRANS+3, TRANS+4, LVADEX+1, LVADEX+2, LVAD1+1, LVAD1+2, LVAD1+3 , LVAD1+7, LVAD1+11, CESS1+3, CESS1+5, CESS1+6, CESS1+10, CESS1+11, CESS1+12, CESS1+16, CESS1+26 , CESS1+27, CESS1+28, CESS1+33
Y	LVF+1~, CEFMEAS+1, CEFMEAS+2, CEFMEAS+3, CEFPROC+4, CEFPROC+10, CEFCPT+4, CEFCPT+10, CEFCPT+14, CEFCPT+15 , CEFCPT+21, LVSD1+1~, LVSD1+6, LVSD1+12, LVSD1+15, LVSD1+16, LVSD1+17, LVSD1+25, LVSD1+31, LVSD1+36 , LVSD1+42, LVAD1+4, LVAD1+11, CESS1+2, CESS1+3, CESS1+33*, CESS1+34
Z	HF+9, HF+10, HF+15, HF+16, LVF+1~, CPTC~, CPTC+1, CPTC+2, CPTC+3, CESS1+22* , CESS1+29*, CESS1+30, CESS1+31, CESS1+32, CESS1+34

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP7C2

Call Graph Total: 14