STANDARD DATA DICTIONARY #119.72 -- SERVICE POINT FILE 6/27/25 PAGE 1
STORED IN ^FH(119.72, *** 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 a list of Service Points and associated parameters. A Service Point is a tray assembly line or cafeteria where bulk
food from a Production Facility is served.
FILE SCREEN (SCR-node) : I '$D(^FH(119.72,+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: SERVICE POINT field (#.01) of the POPULARITY sub-field (#116.112) of the RECIPE sub-field (#116.11) of the MEAL File
(#116.1)
TRAY SERVICE POINT field (#3) of the NUTRITION LOCATION File (#119.6)
CAFETERIA SERVICE POINT field (#4) of the NUTRITION LOCATION File (#119.6)
LOCATION NAME field (#.01) of the DSS NUTRITION DIVISION WORKSHEET File (#728.46)
CROSS
REFERENCED BY: INACTIVE?(AC), NAME(B), SHORT NAME(C)
119.72,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: OCT 16, 1992
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION: This is the name of the Service Point. It is either a tray assembly line or a cafeteria. It
provides food to a group of wards.
DELETE TEST: 1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")
CROSS-REFERENCE: 119.72^B
1)= S ^FH(119.72,"B",$E(X,1,30),DA)=""
2)= K ^FH(119.72,"B",$E(X,1,30),DA)
This is the normal B cross-reference of the NAME field.
119.72,.5 SHORT NAME 0;4 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>6!($L(X)<1) X
LAST EDITED: APR 27, 1993
HELP-PROMPT: Answer must be 1-6 characters in length.
DESCRIPTION:
This is a 6-character short-name to be used on various production reports.
CROSS-REFERENCE: 119.72^C
1)= S ^FH(119.72,"C",$E(X,1,30),DA)=""
2)= K ^FH(119.72,"C",$E(X,1,30),DA)
119.72,1 TYPE 0;2 SET (Required)
'C' FOR CAFETERIA;
'T' FOR TRAY LINE;
LAST EDITED: DEC 03, 1991
DESCRIPTION:
This indicates whether the Service Point is a Tray assembly point or a Cafeteria.
119.72,2 PRODUCTION FACILITY 0;3 POINTER TO PRODUCTION FACILITY FILE (#119.71) (Required)
LAST EDITED: NOV 08, 1991
DESCRIPTION: This field indicates the Production Facility responsible for preparing the food served by this
Service Point.
119.72,10 ADDITIONAL MEALS B;0 POINTER Multiple #119.721
DESCRIPTION: This multiple represents the number of additional meals, over and above the forecast or inpatient
census, which are to be produced for each meal for each day of the week.
119.721,.01 ADD. MEALS PRODUCTION DIET 0;1 POINTER TO PRODUCTION DIET FILE (#116.2) (Multiply asked)
INPUT TRANSFORM: I $D(X) S DINUM=X
LAST EDITED: DEC 11, 1991
DESCRIPTION:
This is the name of the production diet for which additional meals are to be added.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 119.721^B
1)= S ^FH(119.72,DA(1),"B","B",$E(X,1,30),DA)=""
2)= K ^FH(119.72,DA(1),"B","B",$E(X,1,30),DA)
This is the normal B cross-reference of the PRODUCTION DIET field.
119.721,10 ADD. SUNDAY BREAKFAST 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Sunday breakfast meals which are to be added to the inpatient
forecast.
119.721,11 ADD. SUNDAY NOON 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Sunday noon meals which are to be added to the inpatient
forecast.
119.721,12 ADD. SUNDAY EVENING 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Sunday evening meals which are to be added to the inpatient
forecast.
119.721,13 ADD. MONDAY BREAKFAST 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Monday breakfast meals which are to be added to the inpatient
forecast.
119.721,14 ADD. MONDAY NOON 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Monday noon meals which are to be added to the inpatient
forecast.
119.721,15 ADD. MONDAY EVENING 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Monday evening meals which are to be added to the inpatient
forecast.
119.721,16 ADD. TUESDAY BREAKFAST 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Tuesday breakfast meals which are to be added to the inpatient
forecast.
119.721,17 ADD. TUESDAY NOON 0;9 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Tuesday noon meals which are to be added to the inpatient
forecast.
119.721,18 ADD. TUESDAY EVENING 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Tuesday evening meals which are to be added to the inpatient
forecast.
119.721,19 ADD. WEDNESDAY BREAKFAST 0;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: NOV 26, 1986
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Wednesday breakfast meals which are to be added to the inpatient
forecast.
119.721,20 ADD. WEDNESDAY NOON 0;12 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Wednesday noon meals which are to be added to the inpatient
forecast.
119.721,21 ADD. WEDNESDAY EVENING 0;13 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Wednesday evening meals which are to be added to the inpatient
forecast.
119.721,22 ADD. THURSDAY BREAKFAST 0;14 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Thursday breakfast meals which are to be added to the inpatient
forecast.
119.721,23 ADD. THURSDAY NOON 0;15 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Thursday noon meals which are to be added to the inpatient
forecast.
119.721,24 ADD. THURSDAY EVENING 0;16 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Thursday evening meals which are to be added to the inpatient
forecast.
119.721,25 ADD. FRIDAY BREAKFAST 0;17 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Friday breakfast meals which are to be added to the inpatient
forecast.
119.721,26 ADD. FRIDAY NOON 0;18 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Friday noon meals which are to be added to the inpatient
forecast.
119.721,27 ADD. FRIDAY EVENING 0;19 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Friday evening meals which are to be added to the inpatient
forecast.
119.721,28 ADD. SATURDAY BREAKFAST 0;20 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Saturday breakfast meals which are to be added to the inpatient
forecast.
119.721,29 ADD. SATURDAY NOON 0;21 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Saturday noon meals which are to be added to the inpatient
forecast.
119.721,30 ADD. SATURDAY EVENING 0;22 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>1000)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 1000
DESCRIPTION: This is the number of additional Saturday evening meals which are to be added to the inpatient
forecast.
119.72,11 PRODUCTION DIET PERCENTAGE A;0 POINTER Multiple #119.7211
DESCRIPTION: This multiple contains the percentage of the total census represented by each production diet for
each day of the week.
119.7211,.01 FORECAST % PRODUCTION DIET 0;1 POINTER TO PRODUCTION DIET FILE (#116.2) (Multiply asked)
INPUT TRANSFORM: I $D(X) S DINUM=X
LAST EDITED: DEC 11, 1991
DESCRIPTION:
This field is the production diet for which daily forecast percentages are to be entered.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 119.7211^B
1)= S ^FH(119.72,DA(1),"A","B",$E(X,1,30),DA)=""
2)= K ^FH(119.72,DA(1),"A","B",$E(X,1,30),DA)
This is the normal B cross-reference of the PRODUCTION DIET field.
119.7211,10 SUNDAY CENSUS PERCENTAGE 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Sundays for which this production diet is to be
forecast.
119.7211,11 MONDAY CENSUS PERCENTAGE 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Mondays for which this production diet is to be
forecast.
119.7211,12 TUESDAY CENSUS PERCENTAGE 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Tuesdays for which this production diet is to be
forecast.
119.7211,13 WEDNESDAY CENSUS PERCENTAGE 0;5 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Wednesdays for which this production diet is to be
forecast.
119.7211,14 THURSDAY CENSUS PERCENTAGE 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Thursdays for which this production diet is to be
forecast.
119.7211,15 FRIDAY CENSUS PERCENTAGE 0;7 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Fridays for which this production diet is to be
forecast.
119.7211,16 SATURDAY CENSUS PERCENTAGE 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>110)!(X<0)!(X?.E1"."2N.N) X
LAST EDITED: JUL 16, 1987
HELP-PROMPT: TYPE A NUMBER BETWEEN 0 AND 110
DESCRIPTION: This field contains the % of total census on Saturdays for which this production diet is to be
forecast.
119.72,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.72^AC^MUMPS
1)= K:X'="Y" ^FH(119.72,DA,"I")
2)= K ^FH(119.72,DA,"I")
This cross-reference is used to create an 'I' node for inactive entries.
119.72,200 CENSUS DATE C;0 DATE Multiple #119.722 (Add New Entry without Asking)
DESCRIPTION:
This field contains the date for which various census forecast data is available.
119.722,.01 CENSUS DATE 0;1 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=X
LAST EDITED: JAN 08, 1992
DESCRIPTION:
This is the date for which the forecast census and actual census are tabulated.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
119.722,1 FORECAST CENSUS 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 08, 1992
HELP-PROMPT: Type a Number between 0 and 5000, 0 Decimal Digits
DESCRIPTION: This is the calculated forecast census for wards served by this Service Point. It should be noted
that some of these wards may have only a small percentage of their patients served by the Service
Point.
119.722,2 ACTUAL CENSUS 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 08, 1992
HELP-PROMPT: Type a Number between 0 and 5000, 0 Decimal Digits
DESCRIPTION: This field contains the actual census of the wards served by this Service Point based upon the
MAS ward census values.
119.722,3 CORRECTED FORECAST 0;4 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>5000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: JAN 08, 1992
HELP-PROMPT: Type a Number between 0 and 5000, 0 Decimal Digits
DESCRIPTION: This field contains the corrected forecast which is the forecast census corrected by applying the
various percentages for tray, cafeteria, and dining room utilization.
119.722,5 DATE OF LAST FORECAST 0;5 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JAN 08, 1992
DESCRIPTION:
This is the date on which the last forecast was made for this census date.
FILES POINTED TO FIELDS
PRODUCTION DIET (#116.2) ADDITIONAL MEALS:ADD. MEALS PRODUCTION DIET (#.01)
PRODUCTION DIET PERCENTAGE:FORECAST % PRODUCTION DIET (#.01)
PRODUCTION FACILITY (#119.71) PRODUCTION FACILITY (#2)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):