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(111

Package: Dietetics

Global: ^FH(111


Information

FileMan FileNo FileMan Filename Package
111 DIETS Dietetics

Description

Directly Accessed By Routines, Total: 63

Package Total Routines
Dietetics 63 ALTERNATE NAME    FH55P5    FHCTF5    FHDCR11    FHDCR1D    FHDMP2    FHDPSM    FHIP1
FHMTK    FHMTK2    FHMTK5    FHMTK6    FHMTKO    FHNO7    FHOMAPI    FHOMCBRP
FHOMELT    FHOMPP1    FHOMRBLD    FHOMRL1    FHOMRMD    FHOMRO1    FHOMRO2    FHOMRP1
FHOMRR1    FHOMSP1    FHOMSR1    FHOMSS1    FHOMSS2    FHOMTK2    FHOMUTL    FHOMWOR
FHORD    FHORD1    FHORD11    FHORD13    FHORD2    FHORD7    FHORD81    FHORD9
FHORD93    FHORDR    FHORE21    FHORR    FHORX1    FHORX1A    FHORX1B    FHORX1C
FHPRF1    FHPRO3    FHPRW    FHPST2    FHSEL2    FHSP    FHWADM    FHWHEA
FHWOR2    FHWOR6    FHWORI    FHWTRN    FHXDB    FHXDB2    ^FH(111    

Accessed By FileMan Db Calls, Total: 8

Package Total Routines
Dietetics 8 FHIP1    FHMTK    FHMTK2    FHOMRO1    FHOMRO3    FHOMSR1    FHORD    FHORD1

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Dietetics 4 DIET PATTERNS(#111.1)[1, 2, 3, 4, 5]    NUTRITION LOCATION(#119.6)[15]    FH SITE PARAMETERS(#119.9)[4, 5, 6, 7, 8, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49]
NUTRITION PERSON(#115)[#115.016(1), #115.016(6), #115.016(7), #115.016(8), #115.016(9), #115.016(10), #115.017(3), #115.018(5), #115.02(1), #115.02(2), #115.02(3), #115.02(4), #115.02(5)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Dietetics 1 PRODUCTION DIET(#116.2)[4]    

Fields, Total: 9

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'?.ANP) X
  • LAST EDITED:  JAN 08, 1988
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the name of a diet or diet modification as it would normally be known to ward/medical personnel.
  • AUDIT:  YES, ALWAYS
  • DELETE TEST:  1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")
  • CROSS-REFERENCE:  111^B
    1)= S ^FH(111,"B",$E(X,1,30),DA)=""
    2)= K ^FH(111,"B",$E(X,1,30),DA)
    This is the normal B cross-reference of the NAME field.
1 SYNONYM 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  FEB 02, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-12 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field may contain a synonym for the diet name; the synonym is generally terminology known and used by ward/medical personnel.
  • CROSS-REFERENCE:  111^C
    1)= S ^FH(111,"C",$E(X,1,30),DA)=""
    2)= K ^FH(111,"C",$E(X,1,30),DA)
2 ASK EXPIRATION DATE? 0;3 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUN 08, 1985
  • DESCRIPTION:  
    This field, when answered YES, will result in the user being prompted for a diet expiration date (as well as the start date) whenever this diet is contained in a total diet order.
3 DIET PRECEDENCE 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 29, 1985
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99
  • DESCRIPTION:  This is a numerical value which performs two functions: no two diet modifications with the same precedence may be selected. The same number can therefore be assigned to mutually-exclusive diet modifications. Secondly, the
    diet modifications will be listed in precedence order, from low to high.
4 PRODUCTION DIET 0;5 POINTER TO PRODUCTION DIET FILE (#116.2)
************************REQUIRED FIELD************************
PRODUCTION DIET(#116.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",4)'=""Y""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 13, 1987
  • DESCRIPTION:  
    This field contains the Production Diet entry (file 116.2) which would be prepared for this diet modification were it to stand alone from other diet modifications.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",4)'=""Y"""
  • EXPLANATION:  Include only non-combo production diets.
5 BULLETIN CLINICIAN? 0;6 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUN 08, 1985
  • DESCRIPTION:  
    This field, if answered YES, will result in a bulletin being sent to the clinician(s) responsible for the ward on which the patient resides any time this diet modification is ordered.
6 ABBREVIATED LABEL 0;7 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  FEB 02, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-12 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is an abbreviated label title used on diet cards; the terminology and abbreviations will normally be those used by dietetic personnel.
10 ALTERNATE NAME AN;0 Multiple #111.01 111.01

  • DESCRIPTION:  
    This field may be used for any number of alternate names for the diet modification. These alternative names will normally be those used by ward/medical personnel.
99 INACTIVE? I;1 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  AUG 13, 1986
  • DESCRIPTION:  
    This field, if answered YES, will prohibit further selection of this diet modification by ward personnel.
  • CROSS-REFERENCE:  111^AC^MUMPS
    1)= K:X'="Y" ^FH(111,DA,"I")
    2)= K ^FH(111,DA,"I")
    This cross-reference is used to create an 'I' node for inactive entries.

External References

Name Field # of Occurrence
EN^DDIOL IDWRITE+1, .01DEL1+1
^DIC 4+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(111 - [#111] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(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
>> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 99(XREF 1S), 99(XREF 1K)
DIC 4+1!*
DIC("S" 4+1*, 4SCR+1*
>> DIE 4+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 1(XREF 1S), 1(XREF 1K), 3+1!, 4+1*!, 6+1!, 99(XREF 1S)
>> Y 4+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