Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 111.119

Package: Dietetics

DIET PATTERNS(#111.1)-->111.119

Sub-Field: 111.119


Information

Parent File Name Number Package
DIET PATTERNS(#111.1) DIET RESTRICTION 111.119 Dietetics

Details

Field # Name Loc Type Details
.01 DIET RESTRICTION 0;1 POINTER TO FOOD PREFERENCES FILE (#115.2) FOOD PREFERENCES(#115.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""D""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 03, 1995
  • DESCRIPTION:  
    This is the dislike food preference from the file (115.2).
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""D"""
  • EXPLANATION:  This screen allows the user to only select the dislikes from the Food Preference file.
  • CROSS-REFERENCE:  111.119^B
    1)= S ^FH(111.1,DA(1),"RES","B",$E(X,1,30),DA)=""
    2)= K ^FH(111.1,DA(1),"RES","B",$E(X,1,30),DA)
1 MEALS 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S:$P("ALL",X,1)="" X="BNE" S %=X,X="" S:%["B" X="B" S:%["N" X=X_"N" S:%["E" X=X_"E" K:$L(%)'=$L(X) X K %
  • LAST EDITED:  APR 18, 1995
  • HELP-PROMPT:  Answer should be a string of meals (e.g., B or BN or BNE) or A for all meals.
  • DESCRIPTION:  
    This field contains the meals (B N and E) for which this diet restriction is applicable.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
Info |  Details