Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Fields
Print Page as PDF
Global: ^FH(117.2

Package: Dietetics

Global: ^FH(117.2


Information

FileMan FileNo FileMan Filename Package
117.2 DIETETIC COST OF MEALS Dietetics

Description

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Dietetics 1 FHCMSR    

Fields, Total: 25

Field # Name Loc Type Details
.01 MONTH/YEAR 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=$E(Y,1,5)_"00" K:Y<1 X I $D(X) S DINUM=X
  • LAST EDITED:  OCT 27, 1993
  • HELP-PROMPT:  ENTER A MONTH AND A YEAR, ej. 1 92, 11-92, 3/92.
  • DESCRIPTION:  
    Enter Month and Year.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  117.2^B
    1)= S ^FH(117.2,"B",$E(X,1,30),DA)=""
    2)= K ^FH(117.2,"B",$E(X,1,30),DA)
    This is the normal B cross-reference of the MONTH/YEAR field.
1 BEG INV GRP 1 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 17, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Beg Inv Cost for Food Group I
  • DESCRIPTION:  
    Enter Beginning Inventory Cost for Food Group I.
2 BEG INV GRP 2 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for Beg Inv Cost of Food Group II
  • DESCRIPTION:  
    Enter Beginning Inventory Cost For Food Group II.
3 BEG INV GRP 3 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Beg Inv Cost of Food Group III
  • DESCRIPTION:  
    Enter the Beginning Inventory Cost of Food Group III.
4 BEG INV GRP 4 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Beg Inv Cost of Food Group IV
  • DESCRIPTION:  
    Enter the Beginning Inventory Cost for Food Group IV.
5 BEG INV GRP 5 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for Beg Inv Cost of Food Group V
  • DESCRIPTION:  
    Enter the Beginning Inventory Cost for Food Group V.
6 BEG INV GRP 6 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for Beg Inv Cost of Food Group VI
  • DESCRIPTION:  
    Enter the Beginning Inventory Cost for Food Group VI.
7 ISSUE COST GRP 1 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 17, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 9999999 for the Issue Cost of Food Group I
  • DESCRIPTION:  
    Enter the Issue Cost For Food Group I.
8 ISSUE COST GRP 2 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 9999999 for Issue Cost of Food Group II
  • DESCRIPTION:  
    Enter The Issue Cost for Food Group II.
9 ISSUE COST GRP 3 0;10 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 9999999 for Issue Cost of Food Group III
  • DESCRIPTION:  
    Enter the Issue Cost for Food Group III.
10 ISSUE COST GRP 4 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 9999999 for Issue Cost of Food Group IV
  • DESCRIPTION:  
    Enter the Issue Cost for food Group IV.
11 ISSUE COST GRP 5 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 9999999 for Issue Cost of Food Group V
  • DESCRIPTION:  
    Enter the Issue Cost of Food Group V.
12 ISSUE COST GRP 6 0;13 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 9999999 for the Issue Cost of Food Group VI
  • DESCRIPTION:  
    Enter the Issue Cost of Food Group VI.
13 CLOS INV GRP 1 0;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Closing Inventory of Food Group I
  • DESCRIPTION:  
    Enter the Closing Inventory Cost for Food Group I.
14 CLOS INV GRP 2 0;15 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for Closing Inv Cost for Food Group II
  • DESCRIPTION:  
    Enter the Closing Inventory Cost for Food Group II.
15 CLOS INV GRP 3 0;16 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Closing Inv Cost of Food Group III
  • DESCRIPTION:  
    Enter the Closing Inventory Cost for Food Group III.
16 CLOS INV GRP 4 0;17 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Closing Inv Cost of Food Group IV
  • DESCRIPTION:  
    Enter the Closing Inventory Cost for Food Group IV.
17 CLOS INV GRP 5 0;18 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for Closing Inv Cost for Food Group V
  • DESCRIPTION:  
    Enter the Closing Inventory Cost for Food Group V.
18 CLOS INV GRP 6 0;19 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter an Amount between 0 and 999999 for the Closing Inv Cost of Food Group VI
  • DESCRIPTION:  
    Enter the Closing Inventory Cost for Food Group VI.
19 % COST GRP 1 0;20 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter a Number between 1 and 99 for % Cost Recommended
  • DESCRIPTION:  
    The Percent Cost Recommended for Food Group I.
20 % COST GRP 2 0;21 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter a Number between 1 and 99 for % Cost Recommended of Food Group II
  • DESCRIPTION:  
    The Percent Cost Recommended for Food Group II.
21 % COST GRP 3 0;22 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter a Number between 1 and 99 for % Cost Recommended of Food Group III
  • DESCRIPTION:  
    The Percent Cost Recommended for Food Group III.
22 % COST GRP 4 0;23 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter a Number between 1 and 99 for % Cost Recommended of Food Group IV.
  • DESCRIPTION:  
    The Percent Cost Recommended for Food Group IV.
23 % COST GRP 5 0;24 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter a Number between 1 and 99 for % Cost Recommended of Food Group V
  • DESCRIPTION:  
    The % Cost Recommended for Food Group V.
24 % COST GRP 6 0;25 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 06, 1991
  • HELP-PROMPT:  Enter a Number between 1 and 99 for % Cost Recommended of Food Group VI
  • DESCRIPTION:  
    The % Cost Recommended for Food Group VI.
Info |  Desc |  Accessed By FileMan Db Calls |  Fields