Sub-Field: 115.05

Parent File	Name	Number	Package
115.01	EARLY/LATE TRAY	115.05	Dietetics

Field #	Name	Loc	Type	Details
.01	EARLY/LATE TRAY	0;1	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=X` LAST EDITED: `MAY 25, 1985` DESCRIPTION: This field contains the date/time at which the early/late tray is to be delivered. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `115^ADLT` 1)= S ^FHPT("ADLT",$E(X,1,30),DA(2),DA(1),DA)="" 2)= K ^FHPT("ADLT",$E(X,1,30),DA(2),DA(1),DA)
1	MEAL	0;2	SET	**********************REQUIRED FIELD********************** LAST EDITED: `JUN 08, 1985` DESCRIPTION: This field indicates for which meal the early or late tray is ordered.
2	TIME	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `MAY 25, 1985` HELP-PROMPT: `ANSWER MUST BE 1-10 CHARACTERS IN LENGTH` DESCRIPTION: This field contains a printable time for which the meal is to delivered.
3	BAGGED MEAL?	0;4	SET	LAST EDITED: `MAY 26, 1985` DESCRIPTION: If answered YES, this field indicates that a bagged meal is desired.
4	CLERK	0;5	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) LAST EDITED: `MAY 26, 1985` DESCRIPTION: This field is automatically updated with the user entering the order.
5	ENTRY DATE/TIME	0;6	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 26, 1985` DESCRIPTION: This field contains the date/time the order was actually entered.
6	OE/RR ORDER	0;7	POINTER TO ORDER FILE (#100)	ORDER(#100) LAST EDITED: `SEP 18, 1989` DESCRIPTION: This field contains a pointer to the OE/RR file order corresponding to this order.

Field #

Name

Loc

Type

Details

.01

EARLY/LATE TRAY

0;1

DATE

INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=X
LAST EDITED: MAY 25, 1985

DESCRIPTION:

This field contains the date/time at which the early/late tray is to be delivered.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 115^ADLT

1)= S ^FHPT("ADLT",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^FHPT("ADLT",$E(X,1,30),DA(2),DA(1),DA)

1

MEAL

0;2

SET

************************REQUIRED FIELD************************

LAST EDITED: JUN 08, 1985

DESCRIPTION:

This field indicates for which meal the early or late tray is ordered.

2

TIME

0;3

FREE TEXT

INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: MAY 25, 1985
HELP-PROMPT: ANSWER MUST BE 1-10 CHARACTERS IN LENGTH

DESCRIPTION:

This field contains a printable time for which the meal is to delivered.

3

BAGGED MEAL?

0;4

SET

LAST EDITED: MAY 26, 1985

DESCRIPTION:

If answered YES, this field indicates that a bagged meal is desired.

4

CLERK

0;5

POINTER TO NEW PERSON FILE (#200)

************************REQUIRED FIELD************************

NEW PERSON(#200)

LAST EDITED: MAY 26, 1985

DESCRIPTION:

This field is automatically updated with the user entering the order.

5

ENTRY DATE/TIME

0;6

DATE

************************REQUIRED FIELD************************

INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: MAY 26, 1985

DESCRIPTION:

This field contains the date/time the order was actually entered.

6

OE/RR ORDER

0;7

POINTER TO ORDER FILE (#100)

ORDER(#100)

LAST EDITED: SEP 18, 1989

DESCRIPTION:

This field contains a pointer to the OE/RR file order corresponding to this order.

Customize PDF page

Package: Dietetics

NUTRITION PERSON(#115)-->115.01-->115.05

Sub-Field: 115.05

Information

Details