Sub-Field: 116.01

Parent File	Name	Number	Package
MENU CYCLE(#116)	DAY	116.01	Dietetics

Details

Field #	Name	Loc	Type	Details
.01	DAY	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>$P(^FH(116,DA(1),0),"^",2))!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X` LAST EDITED: `APR 21, 1986` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND THE # OF DAYS IN THE CYCLE` DESCRIPTION: This is the day number within the cycle. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
1	BREAKFAST MEAL	0;2	POINTER TO MEAL FILE (#116.1)	**********************REQUIRED FIELD********************** MEAL(#116.1) LAST EDITED: `AUG 18, 1986` DESCRIPTION: This is the meal (File 116.1) which will be served for breakfast on this cycle day.
2	NOON MEAL	0;3	POINTER TO MEAL FILE (#116.1)	**********************REQUIRED FIELD********************** MEAL(#116.1) LAST EDITED: `AUG 18, 1986` DESCRIPTION: This is the meal (File 116.1) which will be served for Noon or Lunch on this cycle day.
3	EVENING MEAL	0;4	POINTER TO MEAL FILE (#116.1)	**********************REQUIRED FIELD********************** MEAL(#116.1) LAST EDITED: `AUG 18, 1986` DESCRIPTION: This is the meal (File 116.1) which will be served in the evening of this cycle day.