Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BGP7C1

Package: IHS GPRA Information System

Routine: BGP7C1


Information

BGP7C1 ; IHS/CMI/LAB - calc CMS measures 26 Sep 2004 11:28 AM 04 May 2007 2:38 PM ;

Source Information

Source file <BGP7C1.m>

Call Graph

Call Graph Total: 14

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  

Caller Graph

Caller Graph Total: 3

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

Entry Points

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?

External References

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

Global Variables Directly Accessed

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*

Label References

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

Naked Globals

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All