©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
BGP9DPA2 ; IHS/CMI/LAB - COMP NATIONAL GPRA FOR PTS W/APPT 09 Jan 2008 3:36 PM 26 Jun 2008 3:40 PM ; 03 Jun 2009 8:04 AM
Source file <BGP9DPA2.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS GPRA Information System | 11 | ($$DEP,$$DEPEDU,$$DEPREF,$$DEPSCR)^BGP9D25 I0302ASC^BGP9D41 ($$ALDX,$$ALHF,$$ALPED,$$ALREF,$$DVDX,$$DVEX,$$DVPED,$$REFDV)^BGP9D5 ($$BMIOR,$$OB,$$OW)^BGP9D6 ($$BE,$$COLO,$$CRC,$$FOB,$$REF,$$SIG)^BGP9D61 ($$CPTSM,$$DX,$$TOBACCO)^BGP9D7 $$PED^BGP9D711 ($$FIRSTIHD,$$V2IHD)^BGP9D721 IE2^BGP9D8 $$DATE^BGP9UTL $$LASTDXI^BGP9UTL1 |
| Patient Care Component Reports | 2 | $$START1^APCLDF $$VD^APCLV |
| DRG Grouper | 1 | $$ICDDX^ICDCODE |
| IHS Patient | 1 | ($$AGE,$$DOB)^AUPNPAT |
| Kernel | 1 | ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT |
| VA Fileman | 1 | ^%DT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LIFE | ;
|
|
| BMI | ;
|
|
| 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 |
|---|---|
| ^%DT | IAA+5 |
| $$START1^APCLDF | SEAL+2, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+5 |
| $$VD^APCLV | DENTSRV+15, TF+11, TF+18 |
| $$AGE^AUPNPAT | I031A+11, I031A+12, I031A+13 |
| $$DOB^AUPNPAT | I017+9, I017+15, I017+21, I017+27, I019+5, I019+7, I019+9, I019+21, 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+5, I031A+8 |
| $$DEP^BGP9D25 | IAA+4 |
| $$DEPEDU^BGP9D25 | IAA+8 |
| $$DEPREF^BGP9D25 | IAA+10 |
| $$DEPSCR^BGP9D25 | IAA+6 |
| I0302ASC^BGP9D41 | I0302A+6 |
| $$ALDX^BGP9D5 | I020+8 |
| $$ALHF^BGP9D5 | I020+6 |
| $$ALPED^BGP9D5 | I020+10 |
| $$ALREF^BGP9D5 | I020+12 |
| $$DVDX^BGP9D5 | I021+8 |
| $$DVEX^BGP9D5 | I021+6 |
| $$DVPED^BGP9D5 | I021+10 |
| $$REFDV^BGP9D5 | I021+12 |
| $$BMIOR^BGP9D6 | I031A+8 |
| $$OB^BGP9D6 | I031A+12 |
| $$OW^BGP9D6 | I031A+11 |
| $$BE^BGP9D61 | I017+27 |
| $$COLO^BGP9D61 | I017+21 |
| $$CRC^BGP9D61 | I017+5 |
| $$FOB^BGP9D61 | I017+9 |
| $$REF^BGP9D61 | I017+34 |
| $$SIG^BGP9D61 | I017+15 |
| $$CPTSM^BGP9D7 | I019+9 |
| $$DX^BGP9D7 | I019+7 |
| $$TOBACCO^BGP9D7 | I019+5 |
| $$PED^BGP9D711 | I019+21 |
| $$FIRSTIHD^BGP9D721 | I0302A+4 |
| $$V2IHD^BGP9D721 | I0302A+5 |
| IE2^BGP9D8 | IE2+3 |
| $$DATE^BGP9UTL | I017+41, I017+44, I019+22, I019+25, I020+15, I020+18, I020+21, IAA+13, IAA+16, I014+8 , I016+7, I021+15, I021+17, IE2+9, I031A+9, I031A+15, I031A+16, BFR+10 |
| $$LASTDXI^BGP9UTL1 | DENTSRV+10 |
| $$ICDDX^ICDCODE | TF+15 |
| $$FMADD^XLFDT | I017+44, I019+5, I019+7, I019+9, I019+23, I020+14, IAA+14, I021+14, I031A+10, I031A+16 |
| $$FMDIFF^XLFDT | I017+11, I017+19, I017+25, I017+31, I014+6, I014+7, BFR+3, GETIFC+8 |
| $$FMTE^XLFDT | SEAL+2, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+12, TF+5 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVDEN - [#9000010.05] | TF+8 |
| ^AUPNVDEN("AD" | TF+7 |
| ^AUPNVIF - [#9000010.44] | GETIFC+3, GETIFC+4 |
| ^AUPNVIF("AC" | GETIFC+2 |
| ^AUPNVPOV - [#9000010.07] | TF+15 |
| ^AUPNVPOV("AD" | TF+14 |
| ^AUPNVSIT - [#9000010] | DENTSRV+15, GETIFC+6, GETIFC+7 |
| ^AUTTADA - [#9999999.31] | TF+8 |
| ^BGPINDNC - [#90536.02] | TITLE+1 |
| ^DPT - [#2] | BFR+3, GETIFC+8 |
| ^TMP($J | TF+3!, TF+6, I0302A+3! |
| Name | Line Occurrences |
|---|---|
| $$DENTSRV | I014+4 |
| $$SEAL | I014+3 |
| $$TF | I016+3 |
| $$TITLE | I017+36, I019+22, I019+25, I020+15, I020+17, IAA+13, IAA+16, I014+8, I016+7, I021+15 , I021+17, IE2+8, I0302A+9, I031A+9, I031A+15, BFR+7, BFR+10 |
| BFRX | BFR+7 |
| GETIFC | BFR+6 |
| I019X | I019+22 |
| I020X | I020+15, I020+19 |
| I021X | I021+15, I021+16 |
| I0302AX | I0302A+8 |
| I031AX | I031A+9, I031A+14 |
| IAAX | IAA+13, IAA+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | SEAL+2*, DENTSRV+2*, DENTSRV+5*, DENTSRV+7*, DENTSRV+12*, TF+5*, IE2+10!, I0302AX+1! |
| >> %DT | IAA+5* |
| A | TF+4*, TF+5, TF+8*, TF+9, TF+15*, TF+16, IE2+10!, I0302AX+1!, I031A+13*, I031A+15 |
| B | IE2+10!, I0302AX+1! |
| BDATE | SEAL~, SEAL+2, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~, TF+5 , IE2+10!, I0302AX+1!, GETIFC~ |
| BGP1320 | I019+2!, I019X+2! |
| >> BGPACTUP | I017+6, I019+4, 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 |
| >> BGPBD | I017+44, I019+22, I020+15, IAA+13, I021+15, IE2+9, I031A+9 |
| >> BGPBDATE | I017+34, I019+5, I019+7, I019+9, I020+12, IAA+10, I016+5, I016+6, I021+12, BFR+6 |
| BGPBE | I017+2!, I017+27*, I017+30, I017+42, I017+46! |
| 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! |
| BGPC | DENTSRV+2*, DENTSRV+3*, DENTSRV+6*, DENTSRV+8*, DENTSRV+11*, DENTSRV+15*, DENTSRV+16, TF+1~, TF+2*, TF+11* , TF+18*, TF+20 |
| BGPCOLO | I017+2!, I017+21*, I017+24, I017+38, I017+46! |
| BGPD | I020+5*, I020+7*, I020+9*, I020+11*, I020+14, I020+15, I020+18, I020X+1!, IAA+3*, IAA+5* , IAA+7*, IAA+9*, IAA+12*, IAA+13, IAA+14, IAA+16, IAAX+1!, I021+5*, I021+7*, I021+9* , I021+11*, I021+14, I021+17, I021X+1! |
| BGPD1 | I019+1*, I019X+1!, IE2+7, IE2+11!, I0302AX+2!, I031A+7*, I031AX+1! |
| BGPD2 | I019+1*, I019+15*, I019+16, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD3 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD4 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD5 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD6 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD7 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD8 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPD9 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| BGPDEP | I0302AX+1! |
| >> BGPED | I019+23, I020+16, I020+21, IAA+15, I021+16, I031A+10 |
| >> BGPEDATE | I017+5, I017+9, I017+15, I017+21, I017+27, I017+34, I019+21, I020+6, I020+8, I020+10 , I020+12, IAA+4, IAA+6, IAA+8, IAA+10, I021+6, I021+8, I021+10, I021+12, I0302A+4 , I0302A+5, I031A+8, BFR+6 |
| BGPEDUC | IE2+10!, I0302AX+1! |
| BGPF | I017+46! |
| BGPFOB | I017+2!, I017+9*, I017+10, I017+41, I017+46!, I019+21*, I019+22, I019+23, I019+25 |
| BGPG | SEAL+1~, DENTSRV+1!, DENTSRV+4!, DENTSRV+7!, DENTSRV+9!, DENTSRV+10*, DENTSRV+11, DENTSRV+12!, DENTSRV+13, TF+1~ , TF+2!, GETIFC+1! |
| BGPG( | DENTSRV+14, DENTSRV+15 |
| BGPG(1 | SEAL+3, DENTSRV+3, DENTSRV+6, DENTSRV+8 |
| >> BGPGPRAI | I017+36, I019+22, I019+25, I020+15, I020+17, IAA+13, IAA+16, I014+8, I016+7, I021+15 , I021+17, IE2+8, I0302A+9, I031A+9, I031A+15, BFR+7, BFR+10 |
| BGPHIV | IE2+10!, I0302AX+1! |
| BGPIN | I017+2!, I017+7*, I017+11*, I017+33, I017+46!, I019+3*, I019X+2! |
| BGPIN1 | I017+2!, I017+7*, I017+19*, I017+33, I017+46!, I019+3*, I019+23*, I019+24, I019X+2!, I031A+7* , I031A+10*, I031A+14, I031A+16 |
| BGPIN2 | I017+2!, I017+7*, I017+25*, I017+33, I017+46! |
| BGPIN3 | I017+2!, I017+7*, I017+31*, I017+33, I017+46! |
| >> BGPISSO | IE2+2* |
| >> BGPISSV | I017+36*, I017+45*, I019+22*, I019+25*, I020+15*, I020+17*, I020+18*, I020+19*, I020+20*, I020+21* , IAA+13*, IAA+16*, I014+8*, I016+7*, I021+15*, I021+17*, IE2+5*, IE2+8*, IE2+9*, I0302A+7* , I0302A+9*, LIFE+2*, I031A+9*, I031A+15*, I031A+16*, BFR+7*, BFR+10* |
| >> BGPLAST | I017+8*, I017+14*, I017+20*, I017+26*, I017+32*, I017+33, I017+44 |
| BGPLDL | I0302AX+1! |
| >> BGPLDS | I014+3*, I014+8, I016+3*, I016+5, I016+6, I016+7 |
| BGPLIFE | I0302AX+1! |
| BGPN | I019+17*, I019X+2!, I020+5*, I020X+1!, IAA+3*, IAAX+1!, I021+5*, I021X+1! |
| BGPN1 | I017+35*, I017+46!, I019+1*, 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, IAA+12 , 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* |
| BGPN2 | I019+1*, I019X+1!, IE2+11!, LDL+1, I0302AX+2!, I031A+7*, I031A+12* |
| BGPN3 | I019+1*, I019X+1!, IE2+11!, TOB+1, I0302AX+2! |
| BGPN4 | I019+1*, I019X+1!, IE2+11!, BMI+1, I0302AX+2! |
| BGPN5 | I019+1*, I019X+1!, IE2+11!, LIFE+1, I0302AX+2! |
| BGPN6 | I019+1*, I019X+1!, IE2+11!, I0302AX+2! |
| >> BGPN7 | I0302A+8 |
| BGPNBE | I017+46! |
| BGPNCOLO | I017+46! |
| BGPNFOB | I017+46!, I019+23*, I019+25 |
| BGPNS | I020+5*, I020+14*, I020+16, I020+21, I020X+1!, IAA+3*, IAA+14*, IAA+15, IAA+16, IAAX+1! , I021+5*, I021+14*, I021+15, I021+16, I021+17, I021X+1! |
| BGPNSIG | I017+46! |
| BGPOB | I031A+12*, I031A+14, I031A+15, I031AX+1! |
| BGPOTH | I017+46! |
| BGPOW | I031A+11*, I031A+15, I031AX+1! |
| BGPREF | I017+34*, I017+46!, I020+5*, I020+12*, I020+13, I020+20, I020X+1!, IAA+3*, IAA+10*, IAA+11 , IAA+12, IAAX+1!, I021+5*, I021+12*, I021+13, I021X+1! |
| BGPRET | GETIFC~, GETIFC+1! |
| BGPRET( | GETIFC+8* |
| >> BGPS | I014+5*, I014+7*, I014+8, I016+4*, I016+6*, I016+7 |
| >> BGPSCPT | I019+9*, I019+10, I019+15 |
| BGPSDX | I019+2!, I019+7*, I019+8, I019+10, I019+12, I019+13, I019+15, I019X+2! |
| >> BGPSEX | I020+2, I021+2 |
| BGPSIG | I017+2!, I017+15*, I017+18, I017+39, I017+46! |
| >> BGPSKIP | I017+3*, I017+4*, I017+5*, I017+6*, I017+33*, I017+34*, I019+4*, I019+16*, I019+24*, I020+1* , I020+2*, I020+3*, I020+4*, I020+13*, I020+16*, IAA+1*, IAA+2*, IAA+11*, IAA+15*, I014+1* , I014+2*, I014+3*, I014+6*, I016+1*, I016+2*, I016+3*, I016+5*, I021+1*, I021+2*, I021+3* , I021+4*, I021+13*, I021+16*, IE2+4*, IE2+6*, IE2+7*, I0302A+2*, I0302A+4*, I0302A+5*, I0302A+8* , I031A+1*, I031A+3*, I031A+4*, I031A+5*, I031A+14*, BFR+1*, BFR+4*, BFR+5* |
| BGPSTOP | IE2+1!, IE2+4, I0302A+1!, I031A+2!, BFR+2! |
| BGPT | I019+17*, I019X+2! |
| BGPTC | I019+2!, I019X+2! |
| BGPTOB | I019+2!, I019X+2!, I0302AX+1! |
| >> BGPTOBD | I019+6*, I019+8*, I019+10* |
| >> BGPTOBP | I019+5*, I019+6, I019+15 |
| BGPTQ | I019+2!, I019X+2! |
| >> BGPV | I020+5*, I020+7*, I020+9*, I020+11*, I020+18, I020+19, IAA+5*, IAA+7*, IAA+9*, IAA+12* |
| >> 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+37*, I017+38*, I017+39*, I017+41*, I017+42*, I017+43*, I017+44*, I017+45 |
| BPGNTS | I019X+2! |
| C | IE2+10!, I0302AX+1!, GETIFC+1!, GETIFC+4*, GETIFC+8 |
| D | I017+10*, I017+11, I017+14, I017+18*, I017+19, I017+20, I017+24*, I017+25, I017+26, I017+30* , I017+31, I017+32, I019+23*, I014+4*, I014+6, I014+7, IE2+10!, I0302AX+1! |
| >> DFN | I017+5, I017+9, I017+15, I017+21, I017+27, I017+34, I019+5, I019+7, I019+9, I019+21 , I020+6, I020+8, I020+10, I020+12, IAA+4, IAA+6, IAA+8, IAA+10, I014+3, I014+4 , I016+3, I021+6, I021+8, I021+10, I021+12, I0302A+4, I0302A+5, I031A+8, I031A+11, I031A+12 , I031A+13, BFR+3, BFR+6 |
| DT | I017+11, I017+19, I017+25, I017+31, I019+23, I014+3, I014+4, I014+6, I014+7, I016+3 , BFR+3 |
| E | SEAL+2*, DENTSRV+2*, DENTSRV+5*, DENTSRV+7*, DENTSRV+12*, TF+5*, IE2+10!, I0302AX+1! |
| EDATE | SEAL~, SEAL+2, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~, TF+5 , IE2+10!, I0302AX+1!, GETIFC~ |
| F | IE2+10!, I0302AX+1! |
| >> G | DENTSRV+12*, DENTSRV+13, DENTSRV+14, TF+7*, TF+10*, TF+13, TF+14*, TF+17* |
| H | IE2+10!, I0302AX+1! |
| I | TITLE~, TITLE+1 |
| P | SEAL~, SEAL+2, DENTSRV~, DENTSRV+2, DENTSRV+5, DENTSRV+7, DENTSRV+10, DENTSRV+12, TF~, TF+5 , IE2+10!, I0302AX+1!, GETIFC~, GETIFC+2, GETIFC+8 |
| S | IE2+10!, I0302AX+1! |
| T | IE2+10!, I0302AX+1! |
| U | I017+10, I017+18, I017+24, I017+30, I017+38, I017+39, I017+41, I017+42, I017+45, I019+6 , I019+8, I019+10, I019+12, I019+13, I019+15, I019+22, I019+23, I019+25, I020+7, I020+9 , I020+11, I020+15, I020+18, I020+19, I020+20, I020+21, IAA+5, IAA+7, IAA+9, IAA+12 , IAA+13, IAA+16, I014+4, I014+8, SEAL+3, DENTSRV+3, DENTSRV+6, DENTSRV+8, DENTSRV+11, DENTSRV+14 , DENTSRV+15, I016+7, TF+6, TF+8, TF+15, I021+7, I021+9, I021+11, I021+15, I021+17 , 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 |
| V | DENTSRV+14*, DENTSRV+15, TF+6*, TF+7, TF+11, TF+14, TF+18, IE2+10!, I0302AX+1!, GETIFC+4* , GETIFC+5, GETIFC+6, GETIFC+7*, GETIFC+8 |
| X | I019+11*, I019+12*, I019+13*, I019+15, IAA+5~*, DENTSRV+14*, DENTSRV+15, TF+6*, IE2+10!, I0302A+10* , I0302AX+1!, BFR+9*, GETIFC+1!, GETIFC+2*, GETIFC+3, GETIFC+4 |
| Y | IAA+5, TF+6*, TF+7*, TF+8, TF+14*, TF+15, IE2+10!, I0302AX+1!, BFR+9*, BFR+10 |
| Z | IE2+10!, I0302AX+1! |