STANDARD DATA DICTIONARY #118.2 -- TUBEFEEDING FILE 3/24/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):