Global: ^FH(119.73

FileMan FileNo	FileMan Filename	Package
119.73	COMMUNICATION OFFICE	Dietetics

Package	Total	Routines
Dietetics	16	FHASM1 FHASN FHASXR FHBIR FHDCR1 FHMTK1 FHOMUTL FHORD10 FHORD13 FHORD5 FHORD8 FHORE2 FHORT5 FHPRO FHPRO1 FHSEL4

Package	Total	FileMan Files
Dietetics	4	MEALS SERVED(#117)[#117.06(.01)] STAFFING DATA(#117.1)[#117.11(.01)] NUTRITION LOCATION(#119.6)[6] DIETETIC ENCOUNTERS(#115.7)[11]

Package	Total	FileMan Files
Dietetics	1	PRODUCTION FACILITY(#119.71)[2]

Fields, Total: 33

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `OCT 07, 1992` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `This is the name of the Communication Office. It is responsible for processing the diet orders from a group of Dietetic wards.` DELETE TEST: `1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")` CROSS-REFERENCE: `119.73^B` `1)= S ^FH(119.73,"B",$E(X,1,30),DA)=""` `2)= K ^FH(119.73,"B",$E(X,1,30),DA)` `This is the normal B cross-reference of the NAME field.`
2	PRODUCTION FACILITY	0;4	POINTER TO PRODUCTION FACILITY FILE (#119.71)	PRODUCTION FACILITY(#119.71) LAST EDITED: `MAY 23, 2005` DESCRIPTION: `This field indicates the Production Facility responsible for preparing the food served by this Communication Office.`
6	BEGIN BREAKFAST WINDOW	2;7	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAR 02, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the latest time for which breakfast orders will be accepted and is used as the time associated with the use of the 'B' (for breakfast) time in diet orders.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
7	BEGIN NOON WINDOW	2;8	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAR 02, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the latest time for which noon orders will be accepted and is used as the time associated with the use of the 'N' (for noon) time in diet orders.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
8	BEGIN EVENING WINDOW	2;9	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAR 02, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the latest time for which evening orders will be accepted and is used as the time associated with the use of the 'E' (for evening) time in diet orders.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
9	PROVIDE BAGGED MEALS?	2;10	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `JAN 16, 1988` DESCRIPTION: `If answered YES, this field indicates that bagged meals can be ordered as part of the early/late tray ordering process.`
10	EARLY BREAKFAST TIME 1	1;1	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the first delivery time for an early breakfast tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
11	EARLY BREAKFAST TIME 2	1;2	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the second delivery time for an early breakfast tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
12	EARLY BREAKFAST TIME 3	1;3	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the third delivery time for an early breakfast tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
13	LATE BREAKFAST TIME 1	1;4	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the first delivery time for a late breakfast tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
14	LATE BREAKFAST TIME 2	1;5	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the second delivery time for a late breakfast tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
15	LATE BREAKFAST TIME 3	1;6	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the third delivery time for a late breakfast tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
16	EARLY NOON TIME 1	1;7	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the first delivery time for an early noon tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
17	EARLY NOON TIME 2	1;8	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the second delivery time for an early noon tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
18	EARLY NOON TIME 3	1;9	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the third delivery time for an early noon tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
19	LATE NOON TIME 1	1;10	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the first delivery time for a late noon tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
20	LATE NOON TIME 2	1;11	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the second delivery time for a late noon tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
21	LATE NOON TIME 3	1;12	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the third delivery time for a late noon tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
22	EARLY EVENING TIME 1	1;13	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the first delivery time for an early evening tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
23	EARLY EVENING TIME 2	1;14	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the second delivery time for an early evening tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
24	EARLY EVENING TIME 3	1;15	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the third delivery time for an early evening tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
25	LATE EVENING TIME 1	1;16	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the first delivery time for a late evening tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
26	LATE EVENING TIME 2	1;17	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the second delivery time for a late evening tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
27	LATE EVENING TIME 3	1;18	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP` LAST EDITED: `MAY 17, 1985` HELP-PROMPT: `ANSWER MUST BE A TIME OF DAY` DESCRIPTION: `This is the third delivery time for a late evening tray.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
28	LATE BREAKFAST ALARM BEGIN	2;1	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP I $D(X) D MIL^FHSYSP S X=X1` OUTPUT TRANSFORM: `D MIP^FHSYSP` LAST EDITED: `NOV 10, 1987` HELP-PROMPT: `ANSWER MUST BE 1-7 CHARACTERS IN LENGTH` DESCRIPTION: `This is the beginning of the late breakfast alarm period; that is the time when persons entering diet orders will be reminded that the normal cut-off time has passed and a late tray will have to be ordered for breakfast if` `desired.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
29	LATE BREAKFAST ALARM END	2;2	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP I $D(X) D MIL^FHSYSP S X=X1` OUTPUT TRANSFORM: `D MIP^FHSYSP` LAST EDITED: `NOV 10, 1987` HELP-PROMPT: `ANSWER MUST BE 1-7 CHARACTERS IN LENGTH` DESCRIPTION: `This is the end of the breakfast alarm period. It should be one or two minutes earlier than the last breakfast late tray delivery time.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
30	LATE NOON ALARM BEGIN	2;3	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP I $D(X) D MIL^FHSYSP S X=X1` OUTPUT TRANSFORM: `D MIP^FHSYSP` LAST EDITED: `NOV 10, 1987` HELP-PROMPT: `ANSWER MUST BE 1-7 CHARACTERS IN LENGTH` DESCRIPTION: `This is the beginning of the noon alarm period; persons entering diet orders will be reminded that the noon cut-off has passed and a late noon tray will have to be ordered if desired.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
31	LATE NOON ALARM END	2;4	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP I $D(X) D MIL^FHSYSP S X=X1` OUTPUT TRANSFORM: `D MIP^FHSYSP` LAST EDITED: `NOV 10, 1987` HELP-PROMPT: `ANSWER MUST BE 1-7 CHARACTERS IN LENGTH` DESCRIPTION: `This is the end of the noon alarm period and should be one or two minutes earlier than the last noon late tray delivery time.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
32	LATE EVENING ALARM BEGIN	2;5	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP I $D(X) D MIL^FHSYSP S X=X1` OUTPUT TRANSFORM: `D MIP^FHSYSP` LAST EDITED: `NOV 10, 1987` HELP-PROMPT: `ANSWER MUST BE 1-7 CHARACTERS IN LENGTH` DESCRIPTION: `This is the beginning of the evening alarm period; that is the period when persons entering diet orders will be reminded that the evening cut-off has passed and a late evening tray will have to be ordered if desired.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
33	LATE EVENING ALARM END	2;6	FREE TEXT	INPUT TRANSFORM: `D TIM^FHSYSP I $D(X) D MIL^FHSYSP S X=X1` OUTPUT TRANSFORM: `D MIP^FHSYSP` LAST EDITED: `NOV 10, 1987` HELP-PROMPT: `ANSWER MUST BE 1-7 CHARACTERS IN LENGTH` DESCRIPTION: `This is the end of the evening alarm period and should be one or two minutes earlier than the last evening late tray delivery time.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
99	INACTIVE?	I;1	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 23, 2000` DESCRIPTION: `This field, if answered YES, will prohibit further selection of this entry.` CROSS-REFERENCE: `119.73^AC^MUMPS` `1)= K:X'="Y" ^FH(119.73,DA,"I")` `2)= K ^FH(119.73,DA,"I")` `This cross-reference is used to create an 'I' node for inactive entries.`
101	DATE/TIME LAST UPDATE	0;2	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 1991` DESCRIPTION: `This is the date/time of the last Diet Activity report generated for this Communication Office. It is used so that the following report will show only changes after this date/time.`
102	LAST LABEL UPDATE	0;3	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 22, 1992` DESCRIPTION: `This is the last date/time the labels were generated for the Diet Activity Report`

Customize PDF page

Package: Dietetics

Global: ^FH(119.73

Information

Description

Accessed By FileMan Db Calls, Total: 16

Pointed To By FileMan Files, Total: 4

Pointer To FileMan Files, Total: 1

Fields, Total: 33

Found Entries, Total: 2