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 |