©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
BGP2D6 ; IHS/CMI/LAB - measure 31 ;
Source file <BGP2D6.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS GPRA Information System | 3 | $$SB^BGP2PDL1 $$DATE^BGP2UTL $$REFUSAL^BGP2UTL1 |
| DRG Grouper | 1 | $$ICDDX^ICDCODE |
| IHS Patient | 1 | $$AGE^AUPNPAT |
| Kernel | 1 | ($$FMADD,$$FMTE)^XLFDT |
| Patient Care Component Reports | 1 | $$START1^APCLDF |
| Taxonomy | 1 | $$ICD^ATXCHK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REF(P,BDATE,EDATE,AGE) | ;EP - get ht/wt Refusal in past year, same date for 18 and under
|
|
| I031 | ;EP
|
|
| AGE18R | ;
|
|
| HTWTSD(P,BDATE,EDATE) | ;get last ht / wt on same day
|
|
| WT(P,BDATE,EDATE) | ;EP
|
|
| I031A | ;
|
|
| BMIOR(P,BDATE,EDATE,AGE) | ;EP
|
|
| BMI(P,EDATE,AGE) | ;EP
|
|
| OB(P,BMI,A) | ;EP obese
|
|
| HT(P,BDATE,EDATE) | ;EP
|
|
| HTWTSDOR(P,BDATE,EDATE) | ;get last ht / wt on same day
|
|
| OW(P,BMI,A) | ;EP overweight
|
| Name | Field # of Occurrence |
|---|---|
| $$START1^APCLDF | HTWTSDOR+4, HTWTSDOR+9, HTWTSDOR+18, HTWTSDOR+23, HT+3, WT+3, HTWTSD+4, HTWTSD+9 |
| $$ICD^ATXCHK | WT+10 |
| $$AGE^AUPNPAT | I031A+9, I031A+10, I031A+12 |
| $$SB^BGP2PDL1 | I031+15, I031+22, BMIOR+8 |
| $$DATE^BGP2UTL | I031A+19 |
| $$REFUSAL^BGP2UTL1 | REF+3, REF+4 |
| $$ICDDX^ICDCODE | WT+9 |
| $$FMADD^XLFDT | HTWTSDOR+17, BMI+5, BMI+12, BMI+19 |
| $$FMTE^XLFDT | BMIOR+4, HTWTSDOR+17, BMI+5, BMI+12, BMI+19 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^APCLBMI - [#9001003.9] | OB+7, OB+8, OW+7, OW+8 |
| ^APCLBMI("H" | OB+4, OB+5, OW+4, OW+5 |
| ^ATXAX("B" | WT+10 |
| ^AUPNPREF - [#9000022] | AGE18R+5, AGE18R+6, AGE18R+15, AGE18R+16, AGE18R+19 |
| ^AUPNPREF("AA" | AGE18R+3, AGE18R+4, AGE18R+13, AGE18R+14 |
| ^AUPNVPOV - [#9000010.07] | WT+9, WT+10 |
| ^AUPNVPOV("AD" | WT+6, WT+7 |
| ^AUTTMSR("B" | REF+3, REF+4, AGE18R+2, AGE18R+12 |
| ^DPT - [#2] | OB+2, OW+2 |
| Name | Line Occurrences |
|---|---|
| $$BMI | I031+14 |
| $$BMIOR | I031A+7 |
| $$HT | BMI+9, BMI+16 |
| $$HTWTSD | BMI+20 |
| $$HTWTSDOR | BMIOR+5 |
| $$OB | I031+17, I031A+10 |
| $$OW | I031+16, I031A+9 |
| $$REF | I031+19 |
| $$WT | BMI+6, BMI+13 |
| AGE18R | REF+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | I031+24!, BMIOR+1!, HTWTSDOR+2!, HTWTSDOR+4*, HTWTSDOR+9*, HTWTSDOR+16!, HTWTSDOR+18*, HTWTSDOR+23*, HT+2!, HT+3* , WT+2!, BMI+1!, HTWTSD+2!, HTWTSD+4*, HTWTSD+9* |
| %DT | BMIOR+1!, BMI+1! |
| A | I031A+12*, I031A+13, I031A+14, I031A+15, I031A+16, I031A+19, OB~, OB+4, OB+5, OW~ , OW+4, OW+5 |
| AGE | BMIOR~, BMI~, BMI+4, BMI+11, BMI+18, REF~, REF+2 |
| B | BMIOR+1!, BMI+1! |
| BDATE | BMIOR~, BMIOR+4*, BMIOR+5, HTWTSDOR~, HTWTSDOR+4, HTWTSDOR+9, HTWTSDOR+18, HTWTSDOR+23, HT~, HT+3 , WT~, WT+3, BMI+1!, BMI+5*, BMI+6, BMI+8, BMI+12*, BMI+13, BMI+15, BMI+19* , BMI+20, HTWTSD~, HTWTSD+4, HTWTSD+9, REF~, REF+3, REF+4, AGE18R+8, AGE18R+18 |
| >> BGP365 | I031+19 |
| >> BGPACTCL | I031+21, I031A+5 |
| >> BGPAGEB | I031+2, I031+3, I031+4, I031+5, I031+6, I031+7, I031+8, I031+9, I031+10, I031+11 , I031+12, I031+19, I031A+2, I031A+3 |
| >> BGPAGEE | I031+14, I031+16, I031+17, I031A+4, I031A+7 |
| BGPARRY | HT+2! |
| BGPARRY(1 | HT+3 |
| >> BGPBDATE | I031A+7 |
| BGPBMI | I031+14*, I031+15, I031+16, I031+17, I031+22, I031A+7*, I031A+8, I031A+9, I031A+10, I031A+12 , I031A+19, I031A+23! |
| BGPBMIH | I031A+23!, BMIOR+2*, BMIOR+3, BMIOR+8*, BMI+3*, BMI+4, BMI+10*, BMI+11, BMI+17*, BMI+18 , BMI+24* |
| >> BGPBOMB | I031A+17 |
| >> BGPD1 | I031+1*, I031+4*, I031+13, I031+21, I031A+1*, I031A+6*, I031A+18 |
| >> BGPD2 | I031+1*, I031+5*, I031+13, I031A+1*, I031A+13*, I031A+17 |
| >> BGPD3 | I031+1*, I031+6*, I031+13, I031A+1*, I031A+14*, I031A+17 |
| >> BGPD4 | I031+1*, I031+7*, I031+13, I031A+1*, I031A+15*, I031A+17 |
| >> BGPD5 | I031+1*, I031+8*, I031+13, I031A+1*, I031A+16*, I031A+17 |
| >> BGPD6 | I031+1*, I031+9*, I031+13, I031A+1* |
| >> BGPD7 | I031+1*, I031+10*, I031+13, I031A+1* |
| >> BGPD8 | I031+1*, I031+11*, I031+13, I031A+1* |
| >> BGPD9 | I031+1*, I031+12*, I031+13, I031A+1* |
| >> BGPEDATE | I031+14, I031+19, I031A+7 |
| BGPL | I031+24!, WT+2!, WT+3! |
| BGPL( | WT+4, WT+5, WT+6, WT+8, WT+16 |
| >> BGPLCHT | HTWTSDOR+13*, HTWTSDOR+14, HTWTSDOR+17, HTWTSDOR+27*, HTWTSDOR+28, HTWTSD+13*, HTWTSD+14 |
| BGPLD | WT+2!, WT+7*, WT+9, WT+10 |
| BGPLHTS | I031+24!, HTWTSDOR+2!, HTWTSDOR+16!, HTWTSD+2! |
| BGPLHTS( | HTWTSDOR+5!, HTWTSDOR+7, HTWTSDOR+13, HTWTSDOR+19!, HTWTSDOR+21, HTWTSDOR+27, HTWTSD+5!, HTWTSD+7, HTWTSD+13 |
| BGPLHTS1 | I031+24!, HTWTSDOR+2!, HTWTSDOR+7!, HTWTSDOR+16!, HTWTSDOR+21!, HTWTSD+2!, HTWTSD+7! |
| BGPLHTS1( | HTWTSDOR+7*, HTWTSDOR+13, HTWTSDOR+21*, HTWTSDOR+27, HTWTSD+7*, HTWTSD+13 |
| BGPLN | WT+2!, WT+4*, WT+5, WT+6, WT+8, WT+16 |
| BGPLW | WT+2!, WT+3*, WT+4, WT+6*, WT+7, WT+16*, WT+18 |
| BGPLWTS | I031+24!, HTWTSDOR+2!, HTWTSDOR+16!, HTWTSD+2! |
| BGPLWTS( | HTWTSDOR+10!, HTWTSDOR+12, HTWTSDOR+13, HTWTSDOR+24!, HTWTSDOR+26, HTWTSDOR+27, HTWTSD+10!, HTWTSD+12, HTWTSD+13 |
| BGPLWTS1 | I031+24!, HTWTSDOR+2!, HTWTSDOR+12!, HTWTSDOR+16!, HTWTSDOR+26!, HTWTSD+2!, HTWTSD+12! |
| BGPLWTS1( | HTWTSDOR+12*, HTWTSDOR+13, HTWTSDOR+26*, HTWTSDOR+27, HTWTSD+12*, HTWTSD+13 |
| BGPLX | WT+2!, WT+3* |
| BGPLZ | WT+2!, WT+5*, WT+6, WT+7 |
| >> BGPN1 | I031+1*, I031+14*, I031+19, I031A+1*, I031A+9*, I031A+11, I031A+21 |
| >> BGPN2 | I031+1*, I031+16*, I031+18, I031+22, I031A+1*, I031A+10*, I031A+11, I031A+22 |
| >> BGPN3 | I031+1*, I031+17*, I031+18, I031+22, I031A+1*, I031A+11* |
| >> BGPN4 | I031+1*, I031+18*, I031A+1* |
| >> BGPN5 | I031+1*, I031+19*, I031+23, I031A+1* |
| BGPOB | I031A+10*, I031A+20, I031A+23! |
| BGPOW | I031A+9*, I031A+20, I031A+23! |
| >> BGPREF | I031+19* |
| >> BGPRTYPE | I031+23 |
| >> BGPSTOP | I031+2*, I031+3*, I031+13*, I031A+2*, I031A+3*, I031A+4*, I031A+5*, I031A+8* |
| >> BGPVALUE | I031+21*, I031+22*, I031+23*, I031A+18*, I031A+19*, I031A+20*, I031A+21*, I031A+22* |
| >> BGPXPWV | I031+15* |
| BMI | OB~, OB+1, OB+7, OB+8, OW~, OW+1, OW+7, OW+8 |
| D | BMIOR+1!, WT+8*, WT+9, BMI+1!, AGE18R+6*, AGE18R+7, AGE18R+8, AGE18R+9, AGE18R+16*, AGE18R+17 , AGE18R+18, AGE18R+20 |
| >> DFN | I031+14, I031+16, I031+17, I031+19, I031A+7, I031A+9, I031A+10, I031A+12 |
| E | HTWTSDOR+4*, HTWTSDOR+9*, HTWTSDOR+18*, HTWTSDOR+23*, HT+2!, HT+3*, WT+2!, WT+3*, HTWTSD+4*, HTWTSD+9* |
| EDATE | BMIOR~, BMIOR+4*, BMIOR+5, HTWTSDOR~, HTWTSDOR+4, HTWTSDOR+9, HTWTSDOR+17*, HTWTSDOR+18, HTWTSDOR+23, HT~ , HT+3, WT~, WT+3, BMI~, BMI+5*, BMI+6, BMI+9, BMI+12*, BMI+13, BMI+16 , BMI+19*, BMI+20, HTWTSD~, HTWTSD+4, HTWTSD+9, REF~, REF+3, REF+4, AGE18R+7, AGE18R+17 |
| H | BMIOR+1!, BMIOR+7*, BMIOR+8*, HT+2!, HT+3*, HT+4, HT+5, HT+6*, HT+7, BMI+1! , BMI+9*, BMI+10*, BMI+16*, BMI+17*, BMI+23*, BMI+24*, AGE18R+1!, AGE18R+2*, AGE18R+3, AGE18R+4 |
| H( | AGE18R+9*, AGE18R+24 |
| >> HDATE | BMI+8*, BMI+9, BMI+15*, BMI+16 |
| ICD | WT+2!, WT+9* |
| P | BMIOR~, BMIOR+5, HTWTSDOR~, HTWTSDOR+1, HTWTSDOR+4, HTWTSDOR+9, HTWTSDOR+18, HTWTSDOR+23, OB~, OB+2 , OW~, OW+2, HT~, HT+1, HT+3, WT~, WT+1, WT+3, BMI~, BMI+6 , BMI+9, BMI+13, BMI+16, BMI+20, HTWTSD~, HTWTSD+1, HTWTSD+4, HTWTSD+9, REF~, REF+3 , REF+4, AGE18R+3, AGE18R+4, AGE18R+13, AGE18R+14 |
| >> R | OB+4*, OB+5*, OB+6, OB+7, OB+8, OW+4*, OW+5*, OW+6, OW+7, OW+8 , REF+1*, REF+3*, REF+4*, REF+6, AGE18R+24*, AGE18R+25 |
| >> S | OB+2*, OB+3, OB+4, OB+5, OW+2*, OW+3, OW+4, OW+5 |
| T | WT+2! |
| U | I031+15, I031+19, I031+22, I031A+8, I031A+9, I031A+10, I031A+12, I031A+19, I031A+20, BMIOR+8 , HTWTSDOR+5, HTWTSDOR+7, HTWTSDOR+10, HTWTSDOR+12, HTWTSDOR+13, HTWTSDOR+17, HTWTSDOR+19, HTWTSDOR+21, HTWTSDOR+24, HTWTSDOR+26 , HTWTSDOR+27, OB+2, OB+7, OB+8, OW+2, OW+7, OW+8, HT+3, WT+5, WT+6 , WT+8, WT+9, WT+10, WT+16, HTWTSD+5, HTWTSD+7, HTWTSD+10, HTWTSD+12, HTWTSD+13, REF+3 , REF+4, AGE18R+6, AGE18R+16, AGE18R+19, AGE18R+24 |
| >> V | AGE18R+4*, AGE18R+5, AGE18R+6, AGE18R+14*, AGE18R+15, AGE18R+16, AGE18R+19 |
| W | BMIOR+1!, BMIOR+7*, BMIOR+8*, BMI+1!, BMI+6*, BMI+10*, BMI+13*, BMI+17*, BMI+23*, BMI+24* , AGE18R+1!, AGE18R+12*, AGE18R+13, AGE18R+14 |
| W( | AGE18R+20*, AGE18R+24 |
| X | I031+24!, BMIOR+5*, BMIOR+6, BMIOR+7, BMIOR+8, HTWTSDOR+2!, HTWTSDOR+7*, HTWTSDOR+12*, HTWTSDOR+13*, HTWTSDOR+16! , HTWTSDOR+21*, HTWTSDOR+26*, HTWTSDOR+27*, WT+2!, BMI+20*, BMI+21, BMI+22, BMI+23, HTWTSD+2!, HTWTSD+7* , HTWTSD+12*, HTWTSD+13*, REF+3*, REF+5, AGE18R+24* |
| Y | I031+24!, HTWTSDOR+2!, HTWTSDOR+5*, HTWTSDOR+10*, HTWTSDOR+16!, HTWTSDOR+19*, HTWTSDOR+24*, HTWTSD+2!, HTWTSD+5*, HTWTSD+10* , REF+4*, REF+5 |
| >> Z | AGE18R+3*, AGE18R+4, AGE18R+13*, AGE18R+14 |