BEHOVM4 ;IHS/MSC/MGH - Storing BMI values ;22-Sep-2014 09:41;DU
Source file <BEHOVM4.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Electronic Health Record | 2 | $$VTYPE^BEHOVM ($$BMIPCT,EIE)^BEHOVM2 |
| VA Fileman | 2 | UPDATE^DIE $$GET1^DIQ |
| GUI Objects | 1 | $$PTAGE^BGOUTL |
| Kernel | 1 | $$NOW^XLFDT |
| Patient Care Component | 1 | $$LASTHT^APCDBMI |
| Patient Care Component Reports | 1 | $$VD^APCLV |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Electronic Health Record | 1 | BEHOVMIN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DELBMIS(IEN,DFN) | ;Delete all BMIs done from this date forward to a newer Ht
|
|
| CHECK(ITEM,START,END) | ;
|
|
| DELBMI(IEN) | ;Delete and redo BMI on same visit if wt was in error
|
|
| BMISAVE(RET,DFN,WT,WTDT,VIEN) | ;Store the BMI based on wt
|
|
| ADDBACK(VMIEN,HT,START,END) | ;
|
|
| BLDXRF(VTYP,START,END) | ;
|
|
| STORE(DATA,TYPE,VALUE) | ;Store the results
|
| Name | Field # of Occurrence |
|---|---|
| $$LASTHT^APCDBMI | BMISAVE+9 |
| $$VD^APCLV | BMISAVE+8 |
| $$VTYPE^BEHOVM | BMISAVE+2, BMISAVE+3, DELBMI+3, DELBMIS+3, DELBMIS+4, ADDBACK+3 |
| $$BMIPCT^BEHOVM2 | BMISAVE+19 |
| EIE^BEHOVM2 | DELBMI+10, DELBMI+13, CHECK+7 |
| $$PTAGE^BGOUTL | BMISAVE+4 |
| UPDATE^DIE | STORE+15 |
| $$GET1^DIQ | BLDXRF+15, DELBMI+4, DELBMI+5, DELBMI+6, DELBMIS+5, DELBMIS+6, DELBMIS+7, DELBMIS+8, DELBMIS+33 |
| $$NOW^XLFDT | STORE+8, STORE+11, STORE+13 |
| FileNo | Call Tags |
|---|---|
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| ^AUPNVMSR - [#9000010.01] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVMSR - [#9000010.01] | BLDXRF+5, BLDXRF+6, BLDXRF+7, DELBMI+8, DELBMI+11, DELBMIS+23, DELBMIS+24, DELBMIS+34, ADDBACK+8, ADDBACK+9 |
| ^AUPNVMSR("AB" | DELBMI+7 |
| ^DPT - [#2] | BMISAVE+5 |
| ^TMP("BEHOVM" | BLDXRF+3!, BLDXRF+17*, DELBMIS+18, DELBMIS+20, DELBMIS+22, DELBMIS+29, DELBMIS+31, CHECK+3, CHECK+5, ADDBACK+5 , ADDBACK+7 |
| Name | Line Occurrences |
|---|---|
| ADDBACK | DELBMIS+44 |
| BLDXRF | DELBMIS+15, DELBMIS+41, DELBMIS+42, ADDBACK+4 |
| BMISAVE | ADDBACK+10 |
| CHECK | DELBMIS+41, DELBMIS+42 |
| STORE | BMISAVE+14, BMISAVE+20 |
| Name | Field # of Occurrence |
|---|---|
| ^(12 | BLDXRF+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGE | BMISAVE+1~, BMISAVE+4*, BMISAVE+6, BMISAVE+17 |
| BEHDATA | DELBMI+1~, DELBMI+9*, DELBMI+10, DELBMI+12*, DELBMI+13, DELBMIS+1~, CHECK+2~, CHECK+6*, CHECK+7 |
| BEHRESULT | DELBMI+1~, DELBMI+2* |
| BIEN | STORE+1~ |
| BMI | BMISAVE+1~, BMISAVE+12*, BMISAVE+13, BMISAVE+14, BMISAVE+19 |
| BMIPCT | BMISAVE+1~, BMISAVE+19*, BMISAVE+20 |
| CTYPE | BLDXRF+1~ |
| CVISIT | BLDXRF+1~ |
| DATA | BMISAVE+16*, BMISAVE+20, BMISAVE+21, BMISAVE+22, STORE~, STORE+2*, STORE+16*, STORE+17* |
| DATE | DELBMI+1~, DELBMIS+1~ |
| DFN | BMISAVE~, BMISAVE+4, BMISAVE+5, BMISAVE+9, BMISAVE+19, STORE+5, BLDXRF+5, BLDXRF+6, BLDXRF+10, DELBMI+1~ , DELBMI+4*, DELBMIS~, DELBMIS+1~, DELBMIS+5*, ADDBACK+10 |
| DONE | BMISAVE+1~ |
| DT | DELBMIS+11, DELBMIS+25 |
| DUZ | STORE+9, STORE+12, STORE+14, DELBMI+9, DELBMI+12, CHECK+6 |
| EIE | BMISAVE+1~, BLDXRF+1~, BLDXRF+15*, BLDXRF+16 |
| END | BLDXRF~, BLDXRF+13, DELBMIS+11*, DELBMIS+12*, DELBMIS+13*, DELBMIS+15, DELBMIS+34*, DELBMIS+35*, DELBMIS+36*, DELBMIS+38* , DELBMIS+39*, DELBMIS+41, DELBMIS+42, DELBMIS+44, CHECK~, ADDBACK~, ADDBACK+4 |
| ERR | STORE+1~, STORE+16 |
| EVDT | DELBMI+1~, DELBMI+6*, DELBMI+7, DELBMIS+1~, DELBMIS+8*, DELBMIS+9*, DELBMIS+16, DELBMIS+27, DELBMIS+28 |
| FDA | STORE+1~, STORE+3*, STORE+4, STORE+5, STORE+6, STORE+7, STORE+8, STORE+9, STORE+10, STORE+11 , STORE+12, STORE+13, STORE+14 |
| FDA( | STORE+3 |
| GOODHT | DELBMIS+2~, DELBMIS+33*, DELBMIS+44 |
| HT | ADDBACK~ |
| IDT | CHECK+2~, CHECK+3*, CHECK+5, ADDBACK+2~, ADDBACK+5*, ADDBACK+7 |
| IEN | BMISAVE+1~, DELBMI~, DELBMI+4, DELBMI+5, DELBMI+6, DELBMIS~, DELBMIS+5, DELBMIS+6, DELBMIS+8 |
| INVDT | DELBMIS+2~, DELBMIS+16*, DELBMIS+18, DELBMIS+20*, DELBMIS+21, DELBMIS+22, DELBMIS+27*, DELBMIS+28*, DELBMIS+29*, DELBMIS+30 , DELBMIS+31 |
| ITEM | CHECK~, CHECK+3, CHECK+5 |
| MDATE | BLDXRF+1~, BLDXRF+11*, BLDXRF+12, BLDXRF+13, BLDXRF+17 |
| MIEN | DELBMI+1~, DELBMI+7*, DELBMI+8, DELBMI+9, DELBMI+11, DELBMI+12, DELBMIS+1~ |
| NEXTAFT | DELBMIS+2~, DELBMIS+18*, DELBMIS+19, DELBMIS+22*, DELBMIS+23, DELBMIS+24 |
| NEXTBACK | DELBMIS+2~, DELBMIS+31*, DELBMIS+32, DELBMIS+33, DELBMIS+34, DELBMIS+35 |
| RESULT | DELBMI+1~, DELBMI+10, DELBMI+13, CHECK+7 |
| RET | BMISAVE~, BMISAVE+14, BMISAVE+15, BMISAVE+21*, BMISAVE+22*, ADDBACK+2~, ADDBACK+10 |
| >> RMAX | DELBMIS+14*, DELBMIS+40* |
| RSHT | BMISAVE+1~, BMISAVE+9*, BMISAVE+10, BMISAVE+12* |
| RSWT | BMISAVE+1~, BMISAVE+11*, BMISAVE+12* |
| SEX | BMISAVE+1~, BMISAVE+5*, BMISAVE+18 |
| START | BLDXRF~, BLDXRF+12, DELBMIS+11*, DELBMIS+12*, DELBMIS+13*, DELBMIS+15, DELBMIS+23*, DELBMIS+24*, DELBMIS+25*, DELBMIS+38* , DELBMIS+39*, DELBMIS+41, DELBMIS+42, DELBMIS+44, CHECK~, ADDBACK~, ADDBACK+4 |
| TT | BLDXRF+1~ |
| TYPE | STORE~, STORE+4 |
| U | BMISAVE+5, BMISAVE+10, BLDXRF+10, DELBMI+8, DELBMI+9, DELBMI+11, DELBMI+12, DELBMIS+23, DELBMIS+24, DELBMIS+34 , CHECK+6, ADDBACK+8, ADDBACK+9 |
| VALUE | STORE~, STORE+7 |
| VDT | BMISAVE+1~, BMISAVE+8*, BMISAVE+9, DELBMIS+1~, DELBMIS+7*, DELBMIS+9 |
| VIEN | BMISAVE~, BMISAVE+8, STORE+6, BLDXRF+1~, BLDXRF+6*, BLDXRF+7, BLDXRF+15, BLDXRF+17, DELBMI+1~, DELBMI+5* , DELBMIS+1~, DELBMIS+6*, DELBMIS+7, DELBMIS+44, CHECK+2~, CHECK+4*, CHECK+5*, CHECK+6, ADDBACK+2~, ADDBACK+6* , ADDBACK+7*, ADDBACK+8, ADDBACK+9 |
| VMIEN | ADDBACK~ |
| VST | ADDBACK+2~, ADDBACK+9*, ADDBACK+10 |
| VTBMI | BMISAVE+3*, BMISAVE+14, DELBMI+1~, DELBMI+3*, DELBMI+8, DELBMIS+1~, DELBMIS+4*, DELBMIS+42 |
| VTBMIP | BMISAVE+1~, BMISAVE+3*, BMISAVE+20, DELBMI+1~, DELBMI+3*, DELBMI+11, DELBMIS+1~, DELBMIS+4*, DELBMIS+41 |
| VTHT | BMISAVE+1~, BMISAVE+2*, DELBMIS+1~, DELBMIS+3*, DELBMIS+15, DELBMIS+18, DELBMIS+20, DELBMIS+22, DELBMIS+29, DELBMIS+31 |
| VTWT | BMISAVE+1~, BMISAVE+2*, DELBMIS+1~, DELBMIS+3*, ADDBACK+2~, ADDBACK+3*, ADDBACK+4, ADDBACK+5, ADDBACK+7 |
| VTYP | BLDXRF~, BLDXRF+3, BLDXRF+5, BLDXRF+6, BLDXRF+9, BLDXRF+17 |
| WT | BMISAVE~, BMISAVE+11, ADDBACK+8*, ADDBACK+10 |
| WTDT | BMISAVE~, BMISAVE+4, BMISAVE+19, STORE+10, ADDBACK+8*, ADDBACK+10 |
| X | BLDXRF+1~, BLDXRF+2*, BLDXRF+5*, BLDXRF+6, BLDXRF+7, BLDXRF+8, BLDXRF+11, DELBMIS+12*, DELBMIS+38* |
| XREF | BLDXRF+1~, BLDXRF+4*, BLDXRF+5, BLDXRF+6, BLDXRF+8, BLDXRF+11 |
| Y | BLDXRF+1~, BLDXRF+7*, BLDXRF+8*, BLDXRF+11 |
| Z | BLDXRF+1~, BLDXRF+7*, BLDXRF+9, BLDXRF+10 |