Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^FH(119.73

Package: Dietetics

Global: ^FH(119.73


Information

FileMan FileNo FileMan Filename Package
119.73 COMMUNICATION OFFICE Dietetics

Description

Directly Accessed By Routines, Total: 49

Package Total Routines
Dietetics 49 FHBIR    FHDCR1    FHIPST3    FHMADM21    FHMADM2A    FHMADM3    FHMADM4    FHMASE1A
FHMMBRPT    FHMMNADM    FHMMNPRT    FHMMNREP    FHMTK1    FHMTK1C    FHOMCBRP    FHOMGP1
FHOMRBL1    FHOMRBLD    FHOMRE1    FHOMRL1    FHOMRO2    FHOMSR1    FHOMSS2    FHOMUTL
FHORD10    FHORD11    FHORD1A    FHORD5    FHORD71    FHORD9    FHORD93    FHORE1
FHORE2    FHORE21    FHORT5    FHORT5A    FHORX1    FHORX1A    FHORX1B    FHPRF1
FHPRO1    FHPRO2    FHPRW    FHPRW3    FHSEL4    ^FH(119.73    FHWOR3    FHWOR8
FHXDB    

Accessed By FileMan Db Calls, Total: 17

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

Pointed To By FileMan Files, Total: 4

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]    

Pointer To FileMan Files, Total: 1

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

External References

Name Field # of Occurrence
^%DT 101+1, 102+1
EN^DDIOL IDWRITE+1, .01DEL1+1
MIL^FHSYSP 28+1, 29+1, 30+1, 31+1, 32+1, 33+1
MIP^FHSYSP 28OT+1, 29OT+1, 30OT+1, 31OT+1, 32OT+1, 33OT+1
TIM^FHSYSP 6+1, 7+1, 8+1, 10+1, 11+1, 12+1, 13+1, 14+1, 15+1, 16+1
, 17+1, 18+1, 19+1, 20+1, 21+1, 22+1, 23+1, 24+1, 25+1, 26+1
, 27+1, 28+1, 29+1, 30+1, 31+1, 32+1, 33+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.73 - [#119.73] .01(XREF 1S), .01(XREF 1K), 99(XREF 1S), 99(XREF 1K)

Naked Globals

Name Field # of Occurrence
^("I" IDWRITE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 101+1*, 102+1*
>> DA .01(XREF 1S), .01(XREF 1K), 99(XREF 1S), 99(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), 28+1*, 29+1*, 30+1*, 31+1*, 32+1*, 33+1*, 99(XREF 1S)
, 101+1*!, 102+1*!
>> X1 28+1, 29+1, 30+1, 31+1, 32+1, 33+1
>> Y 28OT+1, 29OT+1, 30OT+1, 31OT+1, 32OT+1, 33OT+1, 101+1, 102+1
>> Y(0 28OT+1*, 29OT+1*, 30OT+1*, 31OT+1*, 32OT+1*, 33OT+1*
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All