BGP5C1 ; IHS/CMI/LAB - calc CMS indicators 26 Sep 2004 11:28 AM 04 May 2005 2:38 PM ;
Source file <BGP5C1.m>
Package | Total | Call Graph |
---|---|---|
IHS GPRA Information System | 2 | EN^BGP5C11 $$DATE^BGP5UTL |
Kernel | 2 | ($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR |
Patient Care Component Reports | 2 | $$START1^APCLDF $$PRIMPOV^APCLV |
DRG Grouper | 1 | $$ICDDX^ICDCODE |
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 | 2 | BGP5C3 BGP5CL |
Name | Comments | DBIA/ICR reference |
---|---|---|
WARRX | ;gather up warfarin meds
|
|
ASAALLEG(P,BGPD,BGPY) | ;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^BGP5C11 | ANTIRX+6 |
$$DATE^BGP5UTL | AMI+4, AMI+24, GETMEDS+19, ASAPOV+4, ASAPOV+5, ASAPOV+10, ASAPOV+18, ASAPOV+24, ASACONTR+28 |
$$ICDDX^ICDCODE | AMI+35, ASAPOV+5, ASAPOV+15, ASACONTR+14 |
$$VAL^XBDIQ1 | AMI+8, AMI+14, AMI+26, AMI+27, AMI+36, ASAPOV+3, ASAPOV+9, ASAPOV+16, ASACONTR+16, ASACONTR+28 |
$$FMADD^XLFDT | PROC+5, EXP+7, ASARX1+4, ASARX1+5, ASARX1+9, WARRX1+4, WARRX1+5, WARRX1+8, ANTIRX1+4, ANTIRX1+5 , ANTIRX1+8, ASAALLEG+5, ASACONTR+4, ASACONTR+5, ASACONTR+20 |
$$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+22 |
^ATXAX("B" | GETMEDS+5, GETMEDS+6, GETMEDS+7, ASAPOV+13, ASACONTR+19, AMIDX+3 |
^AUPNPREF - [#9000022] | ASACONTR+27, ASACONTR+28 |
^AUPNPREF("AA" | ASACONTR+21, ASACONTR+23, ASACONTR+26 |
^AUPNPROB - [#9000011] | ASAPOV+15, ASAPOV+17, ASAPOV+18 |
^AUPNPROB("AC" | ASAPOV+14 |
^AUPNVINP - [#9000010.02] | PROC+7, DEATHAMA+1, AMA+1, AMA+2, EXPIRED+1, EXPIRED+2, DSCH+1, TRANSIN+1, TRANS+1 |
^AUPNVINP("B" | PROC+6, PROC+7 |
^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 |
^BGPCMSIF - [#90373.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("BGP5C1" | 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 |
---|---|
$$AMA | AMI+13 |
$$AMIDX | AMI+2 |
$$DEATHAMA | AMI+11 |
$$DSCH | AMI+4, AMI+11, AMI+24, ASAALG+3, ASACONT+3, ASARX+3, WARRX+3, ANTIRX+3 |
$$EXP | GETMEDS+18 |
$$EXPIRED | AMI+12 |
$$TRANS | AMI+10 |
ANTIRX1 | ANTIRX+3 |
ASAALLEG | ASAALG+3 |
ASACONTR | ASACONT+3 |
ASARX1 | ASARX+3 |
GETMEDS | ASARX1+6, ASARX1+10, WARRX1+6, WARRX1+9, ANTIRX1+6, ANTIRX1+9, ASACONTR+7, ASACONTR+9 |
PROC1 | PROC+7 |
WARRX1 | WARRX+3 |
Name | Field # of Occurrence |
---|---|
^( | AMI+38*, EXP+4 |
>> | 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+8*, ASARX1+10, WARRX1+2~, WARRX1+5*, WARRX1+6, WARRX1+7*, WARRX1+9 , 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+8, WARRX1~, WARRX1+4, WARRX1+5, WARRX1+7, 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+5 |
>> BGPBT | PROC+2* |
BGPC | GETMEDS+22*, ASARX1+2~, ASARX1+3*, 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+16*, ASACONTR+28* |
>> BGPC1 | GETMEDS+3* |
BGPCOUNT | PROC+4! |
BGPCOUNT("L1" | AMI+20* |
BGPCOUNT("L2" | AMI+29* |
BGPD | ASARX1~, ASARX1+9, WARRX1~, WARRX1+8, ANTIRX1~, ANTIRX1+8, ASAALLEG~, ASAALLEG+5, ASAPOV+1, ASAPOV+7 , ASAPOV+17, ASAPOV+22 |
BGPDDT | ASACONTR~, ASACONTR+9, ASACONTR+20, ASACONTR+25 |
BGPDNAME | GETMEDS~, GETMEDS+2*, GETMEDS+17 |
>> BGPED | PROC+6 |
>> BGPET | PROC+8* |
BGPG | ASARX1+2~, ASARX1+11!, 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+5*, PROC+6*, PROC+7 |
>> BGPSKIP | AMI+6*, AMI+7*, AMI+10*, AMI+11*, AMI+12*, AMI+13*, AMI+22 |
BGPV | ASACONTR~, ASACONTR+11 |
>> BGPVINP | PROC+7*, AMI+4, AMI+8, AMI+10, AMI+11, AMI+12, AMI+13, AMI+14, AMI+24, AMI+26 , AMI+27, ASAALG+3, ASACONT+3, ASARX+3, WARRX+3, ANTIRX+3 |
>> BGPVSIT | PROC+7*, 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+11, AMI+12, AMI+13, AMI+23, AMI+24, ASACONT+3, ASARX+3, WARRX+3, ANTIRX+3 |
>> BGPX | AMI+3*, AMI+4*, AMI+5*, AMI+7*, AMI+9*, AMI+10*, AMI+11*, AMI+12*, AMI+13*, 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*, ASAPOV+4*, ASAPOV+5*, ASAPOV+10*, ASAPOV+18*, ASAPOV+24*, ASACONTR+16*, ASACONTR+28* |
BGPY("B" | GETMEDS+22* |
BGPZ | AMI+6!, AMI+18, GETMEDS+3! |
BGPZ( | AMI+18, GETMEDS+19*, GETMEDS+21, GETMEDS+22 |
BGPZ(1 | AMI+7* |
BGPZ(2 | AMI+10* |
BGPZ(3 | AMI+11* |
BGPZ(4 | AMI+12* |
BGPZ(5 | AMI+13* |
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+23*, ASACONTR+24, ASACONTR+26 , 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+10, WARRX1+2~, WARRX1+4*, WARRX1+6, WARRX1+8*, WARRX1+9 , 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+14*, ASACONTR+15, ASACONTR+16 |
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+26*, ASACONTR+27, ASACONTR+28 |
P | GETMEDS~, GETMEDS+4, ASARX1~, ASARX1+6, ASARX1+10, WARRX1~, WARRX1+6, WARRX1+9, ANTIRX1~, ANTIRX1+6 , ANTIRX1+9, ASAALLEG~, ASAPOV+1, ASAPOV+7, ASAPOV+14, ASAPOV+21, ASACONTR~, ASACONTR+7, ASACONTR+9, ASACONTR+21 , ASACONTR+23, ASACONTR+26 |
>> T | GETMEDS+5*, GETMEDS+16, ASAPOV+13*, ASAPOV+18, ASACONTR+19*, ASACONTR+22, 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+7, 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+11, AMI+12, AMI+13, 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, 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+14, ASACONTR+27, ASACONTR+28, 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~, 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+16, ASACONTR+21*, ASACONTR+22, ASACONTR+23, ASACONTR+26, ASACONTR+28 , 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+24*, ASACONTR+25 |
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+20*, ASACONTR+24 |