STANDARD DATA DICTIONARY #117.2 -- DIETETIC COST OF MEALS FILE 9/29/25 PAGE 1
STORED IN ^FH(117.2, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.5)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is used to store the monthly costs of the various food groups. Data is used to calculate the cost of meals served as well
as ensure an adequate distribution of food across the food groups.
DD ACCESS: #
RD ACCESS: #F
WR ACCESS: #F
DEL ACCESS: #F
LAYGO ACCESS: #F
CROSS
REFERENCED BY: MONTH/YEAR(B)
117.2,.01 MONTH/YEAR 0;1 DATE (Required)
INPUT TRANSFORM: S %DT="E" D ^%DT S X=$E(Y,1,5)_"00" K:Y<1 X I $D(X) S DINUM=X
LAST EDITED: OCT 27, 1993
HELP-PROMPT: ENTER A MONTH AND A YEAR, ej. 1 92, 11-92, 3/92.
DESCRIPTION:
Enter Month and Year.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 117.2^B
1)= S ^FH(117.2,"B",$E(X,1,30),DA)=""
2)= K ^FH(117.2,"B",$E(X,1,30),DA)
This is the normal B cross-reference of the MONTH/YEAR field.
117.2,1 BEG INV GRP 1 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 17, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Beg Inv Cost for Food Group I
DESCRIPTION:
Enter Beginning Inventory Cost for Food Group I.
117.2,2 BEG INV GRP 2 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for Beg Inv Cost of Food Group II
DESCRIPTION:
Enter Beginning Inventory Cost For Food Group II.
117.2,3 BEG INV GRP 3 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Beg Inv Cost of Food Group III
DESCRIPTION:
Enter the Beginning Inventory Cost of Food Group III.
117.2,4 BEG INV GRP 4 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Beg Inv Cost of Food Group IV
DESCRIPTION:
Enter the Beginning Inventory Cost for Food Group IV.
117.2,5 BEG INV GRP 5 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for Beg Inv Cost of Food Group V
DESCRIPTION:
Enter the Beginning Inventory Cost for Food Group V.
117.2,6 BEG INV GRP 6 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for Beg Inv Cost of Food Group VI
DESCRIPTION:
Enter the Beginning Inventory Cost for Food Group VI.
117.2,7 ISSUE COST GRP 1 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 17, 1991
HELP-PROMPT: Enter an Amount between 0 and 9999999 for the Issue Cost of Food Group I
DESCRIPTION:
Enter the Issue Cost For Food Group I.
117.2,8 ISSUE COST GRP 2 0;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 9999999 for Issue Cost of Food Group II
DESCRIPTION:
Enter The Issue Cost for Food Group II.
117.2,9 ISSUE COST GRP 3 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 9999999 for Issue Cost of Food Group III
DESCRIPTION:
Enter the Issue Cost for Food Group III.
117.2,10 ISSUE COST GRP 4 0;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 9999999 for Issue Cost of Food Group IV
DESCRIPTION:
Enter the Issue Cost for food Group IV.
117.2,11 ISSUE COST GRP 5 0;12 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 9999999 for Issue Cost of Food Group V
DESCRIPTION:
Enter the Issue Cost of Food Group V.
117.2,12 ISSUE COST GRP 6 0;13 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 9999999 for the Issue Cost of Food Group VI
DESCRIPTION:
Enter the Issue Cost of Food Group VI.
117.2,13 CLOS INV GRP 1 0;14 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Closing Inventory of Food Group I
DESCRIPTION:
Enter the Closing Inventory Cost for Food Group I.
117.2,14 CLOS INV GRP 2 0;15 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for Closing Inv Cost for Food Group II
DESCRIPTION:
Enter the Closing Inventory Cost for Food Group II.
117.2,15 CLOS INV GRP 3 0;16 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Closing Inv Cost of Food Group III
DESCRIPTION:
Enter the Closing Inventory Cost for Food Group III.
117.2,16 CLOS INV GRP 4 0;17 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Closing Inv Cost of Food Group IV
DESCRIPTION:
Enter the Closing Inventory Cost for Food Group IV.
117.2,17 CLOS INV GRP 5 0;18 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for Closing Inv Cost for Food Group V
DESCRIPTION:
Enter the Closing Inventory Cost for Food Group V.
117.2,18 CLOS INV GRP 6 0;19 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter an Amount between 0 and 999999 for the Closing Inv Cost of Food Group VI
DESCRIPTION:
Enter the Closing Inventory Cost for Food Group VI.
117.2,19 % COST GRP 1 0;20 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter a Number between 1 and 99 for % Cost Recommended
DESCRIPTION:
The Percent Cost Recommended for Food Group I.
117.2,20 % COST GRP 2 0;21 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter a Number between 1 and 99 for % Cost Recommended of Food Group II
DESCRIPTION:
The Percent Cost Recommended for Food Group II.
117.2,21 % COST GRP 3 0;22 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter a Number between 1 and 99 for % Cost Recommended of Food Group III
DESCRIPTION:
The Percent Cost Recommended for Food Group III.
117.2,22 % COST GRP 4 0;23 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter a Number between 1 and 99 for % Cost Recommended of Food Group IV.
DESCRIPTION:
The Percent Cost Recommended for Food Group IV.
117.2,23 % COST GRP 5 0;24 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter a Number between 1 and 99 for % Cost Recommended of Food Group V
DESCRIPTION:
The % Cost Recommended for Food Group V.
117.2,24 % COST GRP 6 0;25 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 06, 1991
HELP-PROMPT: Enter a Number between 1 and 99 for % Cost Recommended of Food Group VI
DESCRIPTION:
The % Cost Recommended for Food Group VI.
INPUT TEMPLATE(S):
FHCMSR FEB 20, 1992@15:46 USER #0
This template is used to enter values into File 117.2, the
Dietetic Cost of Meals file used to generate the Dietetic
Cost of Meals Report.
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):