©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BGP4DPA2 ; IHS/CMI/LAB - COMP NATIONAL GPRA FOR PTS W/APPT 03 Jun 2014 8:04 AM ;
Source file <BGP4DPA2.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS GPRA Information System | 17 | $$DENTSRV^BGP4D21 $$ESRD^BGP4D211 ($$DEP,$$DEPEDU,$$DEPSCR)^BGP4D25 I0302ASC^BGP4D41 ($$ALHF,$$ALPED,$$DVDX,$$DVEX,$$DVPED)^BGP4D5 $$ALDX^BGP4D5A ($$BMIOR,$$OB,$$OW)^BGP4D6 ($$COLO,$$CRC,$$FOB,$$SIG)^BGP4D62 $$PREG^BGP4D7 I91^BGP4D71 $$PED^BGP4D711 $$CHD^BGP4D729 IE2^BGP4D8 ($$LASTBP,$$MHHTN)^BGP4D9 $$DATE^BGP4UTL $$LASTDX^BGP4UTL1 ($$ICD,$$ICDDX)^BGP4UTL2 |
| Patient Care Component Reports | 2 | $$START1^APCLDF $$VD^APCLV |
| DRG Grouper | 1 | $$CPT^ICPTCOD |
| IHS Patient | 1 | ($$AGE,$$DOB)^AUPNPAT |
| Kernel | 1 | ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LIFE | ;
|
|
| BMI | ;
|
|
| MH | ;EP
|
|
| BP | ;
|
|
| TOB | ;
|
|
| TF(P,BDATE,EDATE) | ;
|
|
| I021X | ;
|
|
| I019X | ;
|
|
| TITLE(I) | ;
|
|
| BFRX | ;
|
|
| IE2 | ;EP
|
|
| I021 | ;EP
|
|
| I020 | ;EP - Alcohol Screening
|
|
| LDL | ;
|
|
| I031A | ;EP
|
|
| I031AX | ;
|
|
| I0302A | ;EP
|
|
| IAA | ;EP
|
|
| BFR | ;EP
|
|
| DENTSRV(P,BDATE,EDATE) | ;EP
|
|
| I0302AX | ;EP
|
|
| I014 | ;EP
|
|
| I016 | ;EP
|
|
| I017 | ;EP - colorectal cancer
|
|
| GETIFC(P,BDATE,EDATE,BGPRET) | ;EP
|
|
| I020X | ;
|
|
| I019 | ;EP - tobacco cessation
|
|
| IAAX | ;
|
|
| SEAL(P,BDATE,EDATE) | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$START1^APCLDF | SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+6 |
| $$VD^APCLV | DENTSRV+15, TF+11, TF+17, TF+21 |
| $$AGE^AUPNPAT | I031A+11, I031A+12, I031A+13 |
| $$DOB^AUPNPAT | I017+9, I017+13, I017+17, I019+7, I020+6, I020+8, I020+10, IAA+4, IAA+6, IAA+8 , I014+3, I014+4, I016+3, I021+6, I021+8, I021+10, I031A+8 |
| $$DENTSRV^BGP4D21 | I014+4 |
| $$ESRD^BGP4D211 | MH+6 |
| $$DEP^BGP4D25 | IAA+4 |
| $$DEPEDU^BGP4D25 | IAA+8 |
| $$DEPSCR^BGP4D25 | IAA+6 |
| I0302ASC^BGP4D41 | I0302A+6 |
| $$ALHF^BGP4D5 | I020+6 |
| $$ALPED^BGP4D5 | I020+10 |
| $$DVDX^BGP4D5 | I021+8 |
| $$DVEX^BGP4D5 | I021+6 |
| $$DVPED^BGP4D5 | I021+10 |
| $$ALDX^BGP4D5A | I020+8 |
| $$BMIOR^BGP4D6 | I031A+8 |
| $$OB^BGP4D6 | I031A+12 |
| $$OW^BGP4D6 | I031A+11 |
| $$COLO^BGP4D62 | I017+17 |
| $$CRC^BGP4D62 | I017+5 |
| $$FOB^BGP4D62 | I017+9 |
| $$SIG^BGP4D62 | I017+13 |
| $$PREG^BGP4D7 | MH+7 |
| I91^BGP4D71 | I019+2 |
| $$PED^BGP4D711 | I019+7 |
| $$CHD^BGP4D729 | I0302A+4 |
| IE2^BGP4D8 | IE2+3 |
| $$LASTBP^BGP4D9 | MH+9 |
| $$MHHTN^BGP4D9 | MH+8 |
| $$DATE^BGP4UTL | I017+30, I017+33, I019+8, I020+13, I020+16, I020+19, IAA+10, IAA+13, I014+11, I016+8 , I021+13, I021+15, IE2+9, I031A+9, I031A+15, I031A+16, BFR+10, MH+17 |
| $$LASTDX^BGP4UTL1 | DENTSRV+10 |
| $$ICD^BGP4UTL2 | TF+17 |
| $$ICDDX^BGP4UTL2 | TF+20 |
| $$CPT^ICPTCOD | SEAL+21 |
| $$FMADD^XLFDT | I017+33, I020+12, IAA+11, I021+12, I031A+10, I031A+16 |
| $$FMDIFF^XLFDT | I017+11, I017+15, I017+21, I014+7, I014+8, BFR+3, GETIFC+8 |
| $$FMTE^XLFDT | SEAL+6, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+6 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX - [#9002226] | TF+11 |
| ^ATXAX("B" | TF+5, TF+17 |
| ^AUPNVCPT - [#9000010.18] | SEAL+19, SEAL+22, TF+15, TF+17 |
| ^AUPNVCPT("AD" | SEAL+18, TF+14 |
| ^AUPNVDEN - [#9000010.05] | SEAL+9, SEAL+12, SEAL+13, TF+10, TF+11 |
| ^AUPNVDEN("AD" | SEAL+8, TF+9 |
| ^AUPNVIF - [#9000010.44] | GETIFC+3, GETIFC+4 |
| ^AUPNVIF("AC" | GETIFC+2 |
| ^AUPNVPOV - [#9000010.07] | TF+20 |
| ^AUPNVPOV("AD" | TF+19 |
| ^AUPNVSIT - [#9000010] | DENTSRV+15, GETIFC+6, GETIFC+7 |
| ^AUTTADA - [#9999999.31] | SEAL+9 |
| ^BGPINDJC - [#90552.02] | TITLE+1 |
| ^DPT - [#2] | BFR+3, GETIFC+8, MH+6 |
| ^TMP($J | SEAL+3!, SEAL+7, TF+3!, TF+8, I0302A+3! |
| Name | Line Occurrences |
|---|---|
| $$SEAL | I014+3 |
| $$TF | I016+3 |
| $$TITLE | I017+25, I019+8, I020+13, I020+15, IAA+10, IAA+13, I014+10, I014+11, I016+7, I016+8 , I021+13, I021+15, IE2+8, I0302A+9, I031A+9, I031A+15, BFR+7, BFR+10, MH+17, MH+19 |
| BFRX | BFR+7 |
| GETIFC | BFR+6 |
| I019X | I019+4, I019+5, I019+6 |
| I020X | I020+13, I020+17 |
| I021X | I021+13, I021+14 |
| I0302AX | I0302A+8 |
| I031AX | I031A+9, I031A+14 |
| IAAX | IAA+10, IAA+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | I019X+3!, SEAL+1~, SEAL+6*, DENTSRV+2*, DENTSRV+5*, DENTSRV+7*, DENTSRV+12*, TF+1~, TF+6*, IE2+10! , I0302AX+1! |
| A | I019X+3!, SEAL+1~, SEAL+4*, SEAL+6, SEAL+9*, SEAL+10, SEAL+19*, SEAL+20, SEAL+21*, TF+1~ , TF+4*, TF+6, TF+10*, TF+11, TF+15*, TF+16, TF+17, TF+20*, TF+21, IE2+10! , I0302AX+1!, I031A+13*, I031A+15 |
| B | I019X+3!, IE2+10!, I0302AX+1! |
| BDATE | I019X+3!, SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~ , TF+6, IE2+10!, I0302AX+1!, GETIFC~ |
| BGP1320 | I019X+2!, I019X+4! |
| >> BGPACTUP | I017+6, I020+1, IAA+1, I021+1 |
| BGPADAY | BFR+3*, BFR+4, BFR+5, BFRX+1! |
| >> BGPAGEB | I017+3, I017+4, I020+3, I020+4, IAA+2, I014+1, I014+2, I016+1, I016+2, I021+3 , I021+4, I0302A+2, I031A+3, I031A+4 |
| >> BGPAGEE | I031A+5, I031A+8, MH+4, MH+5 |
| BGPALLED | I019X+3! |
| >> BGPBD | I017+33, I020+13, IAA+10, I021+13, IE2+9, I031A+9, MH+17 |
| >> BGPBDATE | I019+8, I016+5, I016+6, I0302A+4, BFR+3, BFR+6, MH+7, MH+8, MH+9 |
| BGPBE | I017+2!, I017+35! |
| BGPBFR | BFR+2!, BFR+6, BFR+7, BFRX+1! |
| BGPBFR( | BFR+9, BFR+10 |
| BGPBMI | I0302AX+1!, I031A+8*, I031A+9, I031A+10, I031A+11, I031A+12, I031A+13, I031A+15, I031A+16, I031AX+1! |
| BGPBMIH | I031AX+1! |
| BGPBP | I0302AX+1!, MH+2~, MH+9*, MH+10, MH+11, MH+17, MH+19 |
| BGPC | SEAL+1~, SEAL+5*, SEAL+24*, SEAL+25*, SEAL+26, DENTSRV+2*, DENTSRV+3*, DENTSRV+6*, DENTSRV+8*, DENTSRV+11* , DENTSRV+15*, DENTSRV+16, TF+2*, TF+11*, TF+17*, TF+21*, TF+23 |
| BGPCHD | I0302A+4*, I0302A+5!, I0302AX+2! |
| BGPCOLO | I017+2!, I017+17*, I017+20, I017+27, I017+35! |
| BGPD | I020+5*, I020+7*, I020+9*, I020+11*, I020+12, I020+13, I020+16, I020X+1!, IAA+3*, IAA+5* , IAA+7*, IAA+9*, IAA+10, IAA+11, IAA+13, IAAX+1!, I021+5*, I021+7*, I021+9*, I021+11* , I021+12, I021+15, I021X+1!, MH+13~ |
| BGPD1 | I019X+1!, IE2+7, IE2+11!, I0302AX+2!, I031A+7*, I031AX+1! |
| BGPD2 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD3 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD4 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD5 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD6 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD7 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD8 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPD9 | I019X+1!, IE2+11!, I0302AX+2! |
| BGPDEP | I0302AX+1! |
| >> BGPED | I020+14, I020+19, IAA+12, I014+4, I021+14, I031A+10, MH+17 |
| >> BGPEDATE | I017+5, I017+9, I017+13, I017+17, I019+7, I020+6, I020+8, I020+10, IAA+4, IAA+6 , IAA+8, I014+3, I014+7, I014+8, I016+3, I021+6, I021+8, I021+10, I0302A+4, I031A+8 , BFR+6, MH+6, MH+7, MH+8, MH+9 |
| BGPEDUC | IE2+10!, I0302AX+1! |
| BGPF | I017+35! |
| BGPFOB | I017+2!, I017+9*, I017+10, I017+30, I017+35! |
| BGPG | SEAL+1~, SEAL+2!, DENTSRV+1!, DENTSRV+4!, DENTSRV+7!, DENTSRV+9!, DENTSRV+10*, DENTSRV+11, DENTSRV+12!, DENTSRV+13 , TF+2!, GETIFC+1! |
| BGPG( | DENTSRV+14, DENTSRV+15 |
| BGPG(1 | DENTSRV+3, DENTSRV+6, DENTSRV+8 |
| >> BGPGPRAI | I017+25, I019+8, I020+13, I020+15, IAA+10, IAA+13, I014+10, I014+11, I016+7, I016+8 , I021+13, I021+15, IE2+8, I0302A+9, I031A+9, I031A+15, BFR+7, BFR+10, MH+17, MH+19 |
| BGPHIV | IE2+10!, I0302AX+1! |
| BGPIN | I017+2!, I017+7*, I017+11*, I017+23, I017+35!, I019X+2!, MH+14* |
| BGPIN1 | I017+2!, I017+7*, I017+15*, I017+23, I017+35!, I019X+2!, I031A+7*, I031A+10*, I031A+14, I031A+16 |
| BGPIN2 | I017+2!, I017+7*, I017+21*, I017+23, I017+35! |
| BGPIN3 | I017+2!, I017+7*, I017+23, I017+35! |
| BGPINFO | I019+1*, I019+3! |
| >> BGPISSO | IE2+2* |
| BGPISSV | I017+25*, I017+34*, I019+8*, I020+13*, I020+15*, I020+16*, I020+17*, I020+18*, I020+19*, IAA+10* , IAA+13*, I014+10*, I014+11*, I016+7*, I016+8*, I021+13*, I021+15*, IE2+5*, IE2+8*, IE2+9* , I0302A+7*, I0302A+9*, LIFE+2*, I031A+9*, I031A+15*, I031A+16*, BFR+7*, BFR+10*, MH+14*, MH+15! , MH+17*, MH+19*, MH+20* |
| BGPJ | TF+1~ |
| >> BGPLAST | I017+8*, I017+12*, I017+16*, I017+22*, I017+23, I017+33 |
| BGPLDL | I0302AX+1! |
| >> BGPLDS | I014+3*, I014+10, I014+11, I016+3*, I016+5, I016+6, I016+7, I016+8 |
| BGPLIFE | I0302AX+1! |
| BGPN | I019X+2!, I020+5*, I020X+1!, IAA+3*, IAAX+1!, I021+5*, I021X+1! |
| BGPN1 | I017+24*, I017+35!, I019X+1!, I020+5*, I020+6*, I020+7, I020+8*, I020+9, I020+10*, I020+11 , I020X+1!, IAA+3*, IAA+4*, IAA+5, IAA+6*, IAA+7, IAA+8*, IAA+9, IAAX+1!, I021+5* , I021+6*, I021+7, I021+8*, I021+9, I021+10*, I021+11, I021X+1!, IE2+6, IE2+9, IE2+10! , IE2+11!, BP+1, I0302AX+2!, I031A+7*, I031A+11*, MH+2~, MH+3*, MH+12*, MH+18, MH+20 |
| BGPN2 | I019X+1!, IE2+11!, LDL+1, I0302AX+2!, I031A+7*, I031A+12* |
| BGPN3 | I019X+1!, IE2+11!, TOB+1, I0302AX+2! |
| BGPN4 | I019X+1!, IE2+11!, I0302A+11*, BMI+1, I0302AX+2! |
| BGPN5 | I019X+1!, IE2+11!, LIFE+1, I0302AX+2! |
| BGPN6 | I019X+1!, IE2+11!, I0302AX+2! |
| >> BGPN8 | I0302A+11 |
| >> BGPN9 | I0302A+8 |
| BGPNBE | I017+35! |
| BGPNCOLO | I017+35! |
| BGPND | MH+13~ |
| BGPNFOB | I017+35! |
| BGPNS | I020+5*, I020+12*, I020+14, I020+19, I020X+1!, IAA+3*, IAA+11*, IAA+12, IAA+13, IAAX+1! , I021+5*, I021+12*, I021+13, I021+14, I021+15, I021X+1! |
| BGPNSIG | I017+35! |
| BGPOB | I031A+12*, I031A+14, I031A+15, I031AX+1! |
| BGPOTH | I017+35! |
| BGPOW | I031A+11*, I031A+15, I031AX+1! |
| BGPQ | I019+5, I019X+3! |
| BGPREF | I017+35!, I020+5*, I020+18, I020X+1!, IAA+3*, IAAX+1!, I021+5*, I021X+1! |
| BGPREM | I019X+4! |
| BGPRET | GETIFC~, GETIFC+1! |
| BGPRET( | GETIFC+8* |
| >> BGPS | I014+6*, I014+8*, I014+9*, I014+10, I014+11, I016+4*, I016+6*, I016+8 |
| BGPSDX | I019X+2!, I019X+4! |
| >> BGPSEX | I020+2, I021+2 |
| BGPSIG | I017+2!, I017+13*, I017+14, I017+28, I017+35! |
| >> BGPSKIP | I017+3*, I017+4*, I017+5*, I017+6*, I017+23*, I019+4*, I019+5*, I019+6*, I020+1*, I020+2* , I020+3*, I020+4*, I020+14*, IAA+1*, IAA+2*, IAA+12*, I014+1*, I014+2*, I014+7*, I016+1* , I016+2*, I016+5*, I021+1*, I021+2*, I021+3*, I021+4*, I021+14*, IE2+4*, IE2+6*, IE2+7* , I0302A+2*, I0302A+5*, I0302A+8*, I031A+1*, I031A+3*, I031A+4*, I031A+5*, I031A+14*, BFR+1*, BFR+4* , BFR+5*, MH+4*, MH+5*, MH+6*, MH+7*, MH+8*, MH+18* |
| BGPSTOP | IE2+1!, IE2+4, I0302A+1!, I031A+2!, BFR+2!, MH+1! |
| BGPT | I019X+2! |
| BGPTC | I019X+2!, I019X+3! |
| BGPTC1 | I019+6, I019+7*, I019+8, I019X+4! |
| BGPTOB | I019X+2!, I019X+4!, I0302AX+1! |
| BGPTOBD | I019X+4! |
| BGPTOBS | I019X+4! |
| BGPTOM | I019X+4! |
| BGPTQ | I019X+2!, I019X+3! |
| BGPTU | I019+4, I019X+4! |
| BGPTUC | I019X+4! |
| BGPTUHF | I019X+4! |
| BGPTUQ | I019X+4! |
| BGPV | I020+5*, I020+7*, I020+9*, I020+11*, I020+16, I020+17, IAA+5*, IAA+7*, IAA+9*, MH+13~ |
| >> BGPVA | I021+5*, I021+7*, I021+9*, I021+11* |
| >> BGPVAL | I0302A+10*, BP+1*, LDL+1*, TOB+1*, LIFE+2 |
| >> BGPVAL2 | I0302A+10*, BMI+1*, LIFE+1*, LIFE+2 |
| BGPX | I017+26*, I017+27*, I017+28*, I017+30*, I017+32*, I017+33*, I017+34, SEAL+1~, SEAL+2! |
| BGPX( | SEAL+14*, SEAL+24 |
| BGPX("CPT" | SEAL+23*, SEAL+25 |
| BGPX("NO OS" | SEAL+15* |
| BGPZ | TF+1~, TF+2! |
| BJPC | TF+1~ |
| BPGNTS | I019X+2! |
| C | I019X+3!, IE2+10!, I0302AX+1!, GETIFC+1!, GETIFC+4*, GETIFC+8 |
| D | I017+10*, I017+11, I017+12, I017+14*, I017+15, I017+16, I017+20*, I017+21, I017+22, I019X+3! , I014+4*, I014+7, I014+8, I014+9, IE2+10!, I0302AX+1! |
| >> DFN | I017+5, I017+9, I017+13, I017+17, I019+7, I020+6, I020+8, I020+10, IAA+4, IAA+6 , IAA+8, I014+3, I014+4, I016+3, I021+6, I021+8, I021+10, I0302A+4, I031A+8, I031A+11 , I031A+12, I031A+13, BFR+3, BFR+6, MH+6, MH+7, MH+8, MH+9 |
| DT | I017+11, I017+15, I017+21 |
| E | I019X+3!, SEAL+6*, DENTSRV+2*, DENTSRV+5*, DENTSRV+7*, DENTSRV+12*, TF+6*, IE2+10!, I0302AX+1! |
| EDATE | I019X+3!, SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~ , TF+6, IE2+10!, I0302AX+1!, GETIFC~ |
| F | I019X+3!, IE2+10!, I0302AX+1! |
| G | SEAL+1~, SEAL+8*, SEAL+11*, SEAL+17, SEAL+18*, DENTSRV+12*, DENTSRV+13, DENTSRV+14, TF+1~, TF+9* , TF+13, TF+14*, TF+18, TF+19* |
| H | I019X+3!, IE2+10!, I0302AX+1! |
| I | TITLE~, TITLE+1 |
| P | I019X+3!, SEAL~, SEAL+6, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~ , TF+6, IE2+10!, I0302AX+1!, GETIFC~, GETIFC+2, GETIFC+8 |
| R | TF+1~ |
| S | I019X+3!, SEAL+1~, SEAL+13*, SEAL+14, SEAL+15, IE2+10!, I0302AX+1! |
| T | I019X+3!, SEAL+1~, SEAL+12*, SEAL+14, SEAL+15, SEAL+22*, SEAL+23, TF+1~, TF+11*, TF+17* , IE2+10!, I0302AX+1! |
| U | I017+10, I017+14, I017+20, I017+27, I017+28, I017+30, I017+34, I019+6, I019+8, I020+7 , I020+9, I020+11, I020+13, I020+16, I020+17, I020+18, I020+19, IAA+5, IAA+7, IAA+9 , IAA+10, IAA+13, I014+4, I014+10, I014+11, SEAL+7, SEAL+9, SEAL+12, SEAL+13, SEAL+19 , SEAL+21, SEAL+22, DENTSRV+3, DENTSRV+6, DENTSRV+8, DENTSRV+11, DENTSRV+14, DENTSRV+15, I016+7, I016+8 , TF+8, TF+10, TF+11, TF+15, TF+17, TF+20, I021+7, I021+9, I021+11, I021+13 , I021+15, IE2+9, LIFE+2, I031A+9, I031A+10, I031A+11, I031A+12, I031A+13, I031A+15, I031A+16 , TITLE+1, BFR+3, BFR+7, BFR+10, GETIFC+4, GETIFC+7, GETIFC+8, MH+6, MH+17, MH+19 |
| V | I019X+3!, SEAL+1~, SEAL+7*, SEAL+8, SEAL+18, DENTSRV+14*, DENTSRV+15, TF+8*, TF+9, TF+11 , TF+14, TF+17, TF+19, TF+21, IE2+10!, I0302AX+1!, GETIFC+4*, GETIFC+5, GETIFC+6, GETIFC+7* , GETIFC+8 |
| X | I019X+3!, IAA+5~*, SEAL+1~, SEAL+7*, SEAL+24*, DENTSRV+14*, DENTSRV+15, TF+1~, TF+8*, IE2+10! , I0302A+10*, I0302AX+1!, BFR+9*, GETIFC+1!, GETIFC+2*, GETIFC+3, GETIFC+4, MH+7*, MH+11*, MH+12 |
| Y | I019X+3!, SEAL+1~, SEAL+7*, SEAL+8*, SEAL+9, SEAL+12, SEAL+13, SEAL+18*, SEAL+19, SEAL+22 , TF+1~, TF+8*, TF+9*, TF+10, TF+11, TF+14*, TF+15, TF+17, TF+19*, TF+20 , IE2+10!, I0302AX+1!, BFR+9*, BFR+10 |
| Z | I019X+3!, TF+1~, TF+5*, TF+11, IE2+10!, I0302AX+1! |