Routine: BGP9C2X

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

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

Source Information

Source file <BGP9C2X.m>

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
IHS GPRA Information System	5	(ACEIALG1,ACEICON1,ACEIRX1)^BGP9C11 (CESS1,EN,SMOKER1)^BGP9C12 ($$DENT,$$DX,$$TOBACCO)^BGP9D7 $$DATE^BGP9UTL $$LASTPRC^BGP9UTL1
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^BGP9C11	ACEIALG+3
ACEICON1^BGP9C11	ACEICONT+3
ACEIRX1^BGP9C11	ACEIRX+3
CESS1^BGP9C12	CESS+3
EN^BGP9C12	CESS+6
SMOKER1^BGP9C12	SMOKER+3
$$DENT^BGP9D7	SMOKER1+7
$$DX^BGP9D7	SMOKER1+5
$$TOBACCO^BGP9D7	SMOKER1+3
$$DATE^BGP9UTL	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^BGP9UTL1	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("BGP9C1"	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: BGP9C2X

Call Graph Total: 14