STANDARD DATA DICTIONARY #118 -- SUPPLEMENTAL FEEDINGS FILE 3/24/25 PAGE 1 STORED IN ^FH(118, (1 ENTRY) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.5) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains all items served as supplemental feedings. When appropriate, it may include combinations such as ice cream with spoon. Items designed for bulk delivery to the wards are also contained in this file. FILE SCREEN (SCR-node) : I '$D(^FH(118,+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: 10AM FEEDING #1 field (#10) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 10AM FEEDING #2 field (#12) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 10AM FEEDING #3 field (#14) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 10AM FEEDING #4 field (#16) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 2PM FEEDING #1 field (#18) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 2PM FEEDING #2 field (#20) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 2PM FEEDING #3 field (#22) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 2PM FEEDING #4 field (#24) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 8PM FEEDING #1 field (#26) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 8PM FEEDING #2 field (#28) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 8PM FEEDING #3 field (#30) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 8PM FEEDING #4 field (#32) of the SUPPLEMENTAL FEEDING sub-field (#115.07) of the ADMISSION sub-field (#115.01) of the NUTRITION PERSON File (#115) 10AM FEEDING #1 field (#4) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 10AM FEEDING #2 field (#6) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 10AM FEEDING #3 field (#8) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 10AM FEEDING #4 field (#10) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 2PM FEEDING #1 field (#12) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 2PM FEEDING #2 field (#14) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 2PM FEEDING #3 field (#16) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 2PM FEEDING #4 field (#18) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 8PM FEEDING #1 field (#20) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 8PM FEEDING #2 field (#22) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 8PM FEEDING #3 field (#24) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 8PM FEEDING #4 field (#26) of the SUPPLEMENTAL FEEDING sub-field (#115.1627) of the RECURRING MEALS sub-field (#115.016) of the NUTRITION PERSON File (#115) 10AM FEEDING #1 field (#10) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 10AM FEEDING #2 field (#11) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 10AM FEEDING #3 field (#12) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 10AM FEEDING #4 field (#13) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 2PM FEEDING #1 field (#14) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 2PM FEEDING #2 field (#15) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 2PM FEEDING #3 field (#16) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 2PM FEEDING #4 field (#17) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 8PM FEEDING #1 field (#18) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 8PM FEEDING #2 field (#19) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 8PM FEEDING #3 field (#20) of the SUPPLEMENTAL FEEDING MENU File (#118.1) 8PM FEEDING #4 field (#21) of the SUPPLEMENTAL FEEDING MENU File (#118.1) BULK NOURISHMENTS field (#.01) of the BULK NOURISHMENTS sub-field (#119.61) of the NUTRITION LOCATION File (#119.6) DIET field (#.01) of the DIET sub-field (#728.451) of the DSS NUTRITION PRODUCT WORKSHEET File (#728.45) CROSS REFERENCED BY: COST(AC), INACTIVE?(AD), NAME(B), SYNONYM(B) 118,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>20!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X LAST EDITED: AUG 12, 1984 HELP-PROMPT: ANSWER MUST BE 3-20 CHARACTERS IN LENGTH DESCRIPTION: This field contains the name of the Supplemental Feeding. DELETE TEST: 1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3") CROSS-REFERENCE: 118^B 1)= S ^FH(118,"B",$E(X,1,30),DA)="" 2)= K ^FH(118,"B",$E(X,1,30),DA) This is the normal B cross-reference of the NAME field. 118,1 SYNONYM S;0 Multiple #118.01 DESCRIPTION: This field allows for a number of synonyms for the supplemental feeding to be entered. 118.01,.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)<3) X LAST EDITED: SEP 18, 1990 HELP-PROMPT: Answer must be 3-30 characters in length. DESCRIPTION: This field contains a synonym for the supplemental feeding. CROSS-REFERENCE: 118.01^B 1)= S ^FH(118,DA(1),"S","B",$E(X,1,30),DA)="" 2)= K ^FH(118,DA(1),"S","B",$E(X,1,30),DA) This is the normal B cross-reference of the SYNONYM field. CROSS-REFERENCE: 118^B^MNEMONIC 1)= S:'$D(^FH(118,"B",$E(X,1,30),DA(1),DA)) ^(DA)=1 2)= I $D(^FH(118,"B",$E(X,1,30),DA(1),DA)),^(DA) K ^(DA) This is the normal B cross-reference of the SYNONYM field. 118,5 LABEL? 0;2 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: MAR 20, 1985 HELP-PROMPT: Enter N if you do not want a separate label for this item DESCRIPTION: This field, when answered NO, means that a label will not be produced for this item when separate supplemental feeding labels for each item have been specified in the site parameters. 118,7 VEHICLE FOR MEDS? 0;4 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: JUN 06, 1985 DESCRIPTION: This field, when answered YES, means that the supplemental feeding is typically used as a vehicle for meds. 118,10 BULK ONLY? 0;3 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: JUN 04, 1985 DESCRIPTION: This field, when answered YES, means that this supplemental feeding item can ONLY be selected as a bulk feeding for ward delivery and may not be selected as an individual feeding item. 118,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,20 COST ; COMPUTED MUMPS CODE: X ^DD(118,20,9.2) S X=$P(Y(118,20,101),U,13) S D0=Y(118,20,80) S X=$J(X,0,2) 9.2 = S Y(118,20,80)=$S($D(D0):D0,1:""),Y(118,20,1)=$S($D(^FH(118,D0,0)):^(0),1:""),D0=$P(Y(118,20, 1),U,7) S:'$D(^FH(114,+D0,0)) D0=-1 S Y(118,20,101)=$S($D(^FH(114,D0,0)):^(0),1:"") ALGORITHM: CORRESPONDING RECIPE:COST/PORTION (ALWAYS 2 DECIMAL DIGITS) LAST EDITED: JUN 28, 1986 HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 20 DESCRIPTION: This is the portion cost of the supplemental feeding and is a computed field which obtains the value from the recipe file based upon the 'Corresponding Recipe' pointer. CROSS-REFERENCE: 118^AC^MUMPS 1)= S $P(^FH(118,DA,0),"^",6)=DT 2)= S $P(^FH(118,DA,0),"^",6)="" 118,99 INACTIVE? I;1 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: AUG 13, 1986 DESCRIPTION: This field, when answered YES, means that further selection of this item by dietetic personnel is prohibited. CROSS-REFERENCE: 118^AD^MUMPS 1)= K:X'="Y" ^FH(118,DA,"I") 2)= K ^FH(118,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): FHSFLST OCT 16, 1990@10:04 USER #0 SUPPLEMENTAL FEEDINGS LIST This template lists all of the supplemental feedings contained in the Supplemental Feeding file (118) along with the associated data elements. SORT TEMPLATE(S): FORM(S)/BLOCK(S):