©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
BHSDM3 ;IHS/CIA/MGH - Health Summary for Diabetic Supplement ;19-Jan-2009 15:36;MGH
Source file <BHSDM3.m>
| Package | Total | Call Graph |
|---|---|---|
| Health Summary Components | 4 | $$REFDF^BHSDM3 $$DNKA^BHSDM4 $$LASTHF^BHSMU ($$LASTFLU,$$LASTTD)^BHSMU2 |
| IHS VA Utilities | 2 | $$VAL^XBDIQ1 $$PROVCLSC^XBFUNC1 |
| Kernel | 1 | ($$FMADD,$$FMTE)^XLFDT |
| Patient Care Component | 1 | $$REFDF^APCHS9B3 |
| Patient Care Component Reports | 1 | ($$CLINIC,$$PRIMPOV)^APCLV |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DIETV(P) | ;EP
|
|
| BI() | ;EP- check to see if using new imm package or not 1/5/1999 IHS/CMI/LAB
|
|
| TD(P,BHSED) | ;EP
|
|
| SELF(P,D) | ;EP
|
|
| EDT(E) | ;
|
|
| DIETP(V) | ;are any providers an 07 or 29
|
|
| FLU(P) | ;EP
|
|
| EDUCREF | ;EP - gather up all education provided in past year in APCHX
|
|
| FLU1 | ||
| REFDF(P,F,I,D) | ;EP - dm item refused?
|
|
| FLUR | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$REFDF^APCHS9B3 | TD+26, TD+28 |
| $$CLINIC^APCLV | DIETV+12, DIETV+14 |
| $$PRIMPOV^APCLV | DIETV+20 |
| $$REFDF^BHSDM3 | TD+5, TD+7, TD+9, TD+11, TD+13, TD+15, TD+17, TD+19, TD+21, TD+23 , FLUR+1, FLUR+3, FLUR+5, FLUR+7 |
| $$DNKA^BHSDM4 | DIETV+11 |
| $$LASTHF^BHSMU | SELF+12 |
| $$LASTFLU^BHSMU2 | FLU+2 |
| $$LASTTD^BHSMU2 | TD+2 |
| $$VAL^XBDIQ1 | REFDF+8, REFDF+9, SELF+10, SELF+11 |
| $$PROVCLSC^XBFUNC1 | DIETP+5 |
| $$FMADD^XLFDT | TD+3 |
| $$FMTE^XLFDT | TD+4, TD+30, FLU1+1, FLUR+9, REFDF+8, REFDF+9, DIETV+20, SELF+10, SELF+11, EDUCREF+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX - [#9002226] | SELF+8, EDT+4, EDT+6, EDT+8, EDT+10 |
| ^ATXAX("B" | SELF+5, EDT+3, EDT+5, EDT+7, EDT+9 |
| ^AUPNPREF("AA" | REFDF+5, EDUCREF+2 |
| ^AUPNVMED - [#9000010.14] | SELF+8, SELF+10, SELF+11 |
| ^AUPNVMED("AA" | SELF+7, SELF+8 |
| ^AUPNVPOV("AD" | DIETV+9 |
| ^AUPNVPRV - [#9000010.06] | DIETP+4 |
| ^AUPNVPRV("AD" | DIETV+10, DIETP+3 |
| ^AUPNVSIT - [#9000010] | DIETV+6, DIETV+7, DIETV+8, DIETV+13, DIETV+20, SELF+10, SELF+11 |
| ^AUPNVSIT("AA" | DIETV+4, DIETV+5 |
| ^AUTTEDT - [#9999999.09] | EDUCREF+3, EDT+11 |
| ^AUTTIMM("C" | TD+5, TD+7, TD+9, TD+11, TD+13, TD+15, TD+17, TD+19, TD+21, TD+23 , TD+26, TD+28, FLUR+1, FLUR+3, FLUR+5, FLUR+7 |
| ^AUTTIMM(0 | BI+1 |
| ^DD(9000010.06 | DIETP+5 |
| Name | Line Occurrences |
|---|---|
| $$BI | FLUR+1, FLUR+3, FLUR+5, FLUR+7 |
| $$DIETP | DIETV+15 |
| $$EDT | EDUCREF+2 |
| FLUR | FLU+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | FLU+1~, SELF+3~, SELF+4*, SELF+7, SELF+8*, SELF+9, SELF+10*, SELF+11* |
| %DT | TD+1~ |
| >> APCHD | EDUCREF+2*, EDUCREF+3 |
| APCHX | EDUCREF+1! |
| APCHX( | EDUCREF+3* |
| APCHY | TD+1~, FLU+1~, EDUCREF+1!, EDUCREF+2*, EDUCREF+3 |
| B | TD+1~ |
| >> BHSBEG | EDUCREF+2 |
| >> BHSDFN | SELF+12 |
| BHSED | TD~ |
| >> BHSPAT | FLUR+1, FLUR+3, FLUR+5, FLUR+7, EDUCREF+2 |
| D | FLU1~*, FLU1+1, REFDF~, REFDF+4*, REFDF+8, DIETV+4~*, DIETV+5, SELF~, SELF+2*, SELF+7 |
| DT | TD+3, FLU1 |
| E | TD+1~, FLU+1~, EDT~, EDT+4, EDT+6, EDT+8, EDT+10 |
| F | REFDF~, REFDF+2, REFDF+5, REFDF+8, REFDF+9 |
| G | TD+5*, TD+6, TD+7*, TD+8, TD+9*, TD+10, TD+11*, TD+12, TD+13*, TD+14 , TD+15*, TD+16, TD+17*, TD+18, TD+19*, TD+20, TD+21*, TD+22, TD+23*, TD+24 , TD+26*, TD+27, TD+28*, TD+29, FLUR+1*, FLUR+2, FLUR+3*, FLUR+4, FLUR+5*, FLUR+6 , FLUR+7*, FLUR+8, DIETV+4~*, DIETV+5, DIETV+14*, DIETV+16*, DIETV+19, DIETV+20, SELF+8* |
| H | DIETP+2~, DIETP+3*, DIETP+5*, DIETP+7 |
| I | REFDF~, REFDF+3, REFDF+5, REFDF+8, REFDF+9, SELF+3~, SELF+7*, SELF+8 |
| LFLU | FLU+1~, FLU+2*, FLU+3, FLU1+1, FLUR+1, FLUR+3, FLUR+5, FLUR+7, FLUR+9 |
| P | TD~, TD+2, TD+5, TD+7, TD+9, TD+11, TD+13, TD+15, TD+17, TD+19 , TD+21, TD+23, TD+26, TD+28, FLU~, FLU+2, REFDF~, REFDF+1, REFDF+5, DIETV~ , DIETV+1, DIETV+4, DIETV+5, SELF~, SELF+1, SELF+7, SELF+8 |
| T | FLU+1~, SELF+5~*, SELF+6, SELF+8, EDT+2~, EDT+3*, EDT+4, EDT+5*, EDT+6, EDT+7* , EDT+8, EDT+9*, EDT+10, EDT+11*, EDT+12, EDT+13 |
| TDD | TD+1~, TD+2*, TD+4, TD+30 |
| U | TD+30, FLU1+1, FLUR+9, DIETV+7, DIETV+8, DIETV+13, DIETV+20, DIETP+4, DIETP+5, SELF+8 , SELF+10, SELF+11, EDUCREF+3, EDT+11 |
| V | DIETV+4~*, DIETV+5*, DIETV+6, DIETV+7, DIETV+8, DIETV+9, DIETV+10, DIETV+11, DIETV+12, DIETV+13 , DIETV+14, DIETV+15, DIETV+16, DIETP~, DIETP+1, DIETP+3, SELF+3~, SELF+8*, SELF+12* |
| X | TD+1~, TD+3*, TD+4, FLU+1~, REFDF+5~*, REFDF+6, REFDF+7, DIETV+4~, DIETV+15*, DIETV+16 , DIETP+2~ |
| Y | TD+1~, REFDF+7~*, REFDF+8, REFDF+9, DIETP+2~, DIETP+4*, DIETP+5* |
| Z | DIETP+2~, DIETP+3*, DIETP+4 |