STANDARD DATA DICTIONARY #118.2 -- TUBEFEEDING FILE 9/29/25 PAGE 1
STORED IN ^FH(118.2, (8 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.5)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the products commonly used for tube-feedings as well as their characteristics such as Kcals/ml, cost, and
synonyms.
FILE SCREEN (SCR-node) : I '$D(^FH(118.2,+Y,"I"))!$D(^XUSEC("FHMGR",DUZ))!(DUZ(0)["@")
DD ACCESS: #
RD ACCESS: #F
WR ACCESS: #f
DEL ACCESS: #f
LAYGO ACCESS: #f
IDENTIFIED BY:
"WRITE": I $D(^("I")) D EN^DDIOL("(** Inactive **)","","?3")
POINTED TO BY: ASSESSMENT TF PRODUCT field (#.01) of the ASSESSMENT TF PRODUCT sub-field (#115.031) of the NUTRITION ASSESSMENT
sub-field (#115.011) of the NUTRITION PERSON File (#115)
TF PRODUCT field (#.01) of the TF PRODUCT sub-field (#115.1) of the TUBEFEEDING sub-field (#115.04) of the ADMISSION
sub-field (#115.01) of the NUTRITION PERSON File (#115)
TUBEFEEDING PRODUCT field (#.01) of the TUBEFEEDING PRODUCT sub-field (#115.1619) of the RECURRING MEALS sub-field
(#115.016) of the NUTRITION PERSON File (#115)
DIET field (#.01) of the DIET sub-field (#728.451) of the DSS NUTRITION PRODUCT WORKSHEET File (#728.45)
CROSS
REFERENCED BY: INACTIVE?(AC), NAME(B), SYNONYM(C)
118.2,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
LAST EDITED: JAN 16, 1992
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
This is the name of the tubefeeding product as it will appear on all lists and displays.
DELETE TEST: 1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")
CROSS-REFERENCE: 118.2^B
1)= S ^FH(118.2,"B",$E(X,1,30),DA)=""
2)= K ^FH(118.2,"B",$E(X,1,30),DA)
This is the normal B cross-reference of the NAME field.
118.2,1 DISPENSING UNIT 0;2 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-10 CHARACTERS IN LENGTH
DESCRIPTION:
This field contains a title for the dispensing unit such as bottle, can or package.
118.2,2 AMT/UNIT 0;3 FREE TEXT (Required)
INPUT TRANSFORM: S:X[" " X=+X_$P(X," ",2) S:"MG"[$E(X,$L(+X)+1) X=+X_$E(X,$L(+X)+1) S:X["M" X=+X_"ML" K:($L(+X)>10)!
($L(X)<1)!(+X>9999)!(+X<0)!("MLG"'[$E(X,$L(X))) X
LAST EDITED: JUL 27, 2006
HELP-PROMPT: Enter amount in ML's or in Grams. Amount cannot exceed 9999. The following are examples of valid
entries 22ML, 40GRAMS, 20 G, or 100 M.
DESCRIPTION: This is the number of ml's or grams of product contained in the dispensing unit. For products which
require reconstitution with water, it is the number of ml's after reconstitution.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
118.2,3 KCAL/ML 0;4 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<.1)!(X?.E1"."3N.N) X
LAST EDITED: APR 22, 2005
HELP-PROMPT: Type a Number between .1 and 1000, 2 Decimal Digits
DESCRIPTION:
This field contains the number of KiloCalories per ml of product.
118.2,5 COST ; COMPUTED
MUMPS CODE: X ^DD(118.2,5,9.2) S X=$P(Y(118.2,5,101),U,13) S D0=Y(118.2,5,80) S X=$J(X,0,2)
9.2 = S Y(118.2,5,80)=$S($D(D0):D0,1:""),Y(118.2,5,1)=$S($D(^FH(118.2,D0,0)):^(0),1:""),D0=$P(Y(118
.2,5,1),U,7) S:'$D(^FH(114,+D0,0)) D0=-1 S Y(118.2,5,101)=$S($D(^FH(114,D0,0)):^(0),1:"")
ALGORITHM: CORRESPONDING RECIPE:COST/PORTION (ALWAYS 2 DECIMAL DIGITS)
LAST EDITED: SEP 28, 1985
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 100
DESCRIPTION: This is the portion cost of the tubefeeding and is a computed field which obtains the value from
the recipe file based upon the 'Corresponding Recipe' pointer.
118.2,10 SYNONYM 1;0 Multiple #118.21
DESCRIPTION: This multiple contains alternate names or synonyms for the product. These names should include any
names commonly known or used by ward/medical personnel.
118.21,.01 SYNONYM 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
LAST EDITED: JUL 09, 1985
HELP-PROMPT: ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
DESCRIPTION:
This field contains an alternate name or synonym for the tubefeeding product.
CROSS-REFERENCE: 118.2^C
1)= S ^FH(118.2,"C",$E(X,1,30),DA(1),DA)=""
2)= K ^FH(118.2,"C",$E(X,1,30),DA(1),DA)
118.2,11 CORRESPONDING RECIPE 0;7 POINTER TO RECIPE FILE (#114)
LAST EDITED: SEP 29, 1990
DESCRIPTION: This field is a pointer to the recipe in file 114 (the Recipe file) which contains the ingredients
for this feeding. Cost and other data for this feeding will be retrieved from the recipe file.
118.2,99 INACTIVE? I;1 SET
'Y' FOR YES;
'N' FOR NO;
LAST EDITED: AUG 13, 1986
DESCRIPTION: This field, if answered YES, prohibits further selection of this item by ward or dietetic
personnel.
CROSS-REFERENCE: 118.2^AC^MUMPS
1)= K:X'="Y" ^FH(118.2,DA,"I")
2)= K ^FH(118.2,DA,"I")
This cross-reference is used to create an 'I' node for inactive entries.
FILES POINTED TO FIELDS
RECIPE (#114) CORRESPONDING RECIPE (#11)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
FHTFLST SEP 28, 1992@13:49 USER #0 TUBEFEEDING LIST
This template lists all of the tubefeeding products in the
Tubefeeding file (118.2) along with its various data elements.
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):