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 |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^FH(118.2

Package: Dietetics

Global: ^FH(118.2


Information

FileMan FileNo FileMan Filename Package
118.2 TUBEFEEDING Dietetics

Description

Directly Accessed By Routines, Total: 40

Package Total Routines
Dietetics 39 DRUG CLASSIFICATIONS    FH55P5    FHASM1    FHASMR1    FHASMR2    FHASP2    FHASXR1    FHCTF4
FHDMP4    FHOMPP1    FHOMRMD    FHOMRR1    FHOMRT1    FHOMUTL    FHORD2    FHORD6
FHORD81    FHORD82    FHORT1    FHORT10    FHORT2    FHORT3    FHORT5A    FHORT5C
FHORT5D    FHORTR    FHORX1C    FHORX3    FHWHEA    FHWOR5    FHWOR51    FHWOR5R
FHWOR6    FHWOR71    FHWORI    FHXDB    FHXDB2    ^FH(118.2    SYNONYM    
Health Summary 1 GMTSFHWZ    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Dietetics 3 FHORT10    FHORT3    FHORTR    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
DSS Extracts 1 DSS NUTRITION PRODUCT WORKSHEET(#728.45)[#728.451(.01)]    
Dietetics 1 NUTRITION PERSON(#115)[#115.031(.01), #115.1(.01), #115.1619(.01)]

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Dietetics 1 RECIPE(#114)[11]    

Fields, Total: 8

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 16, 1992
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This is the name of the tubefeeding product as it will appear on all lists and displays.
  • DELETE TEST:  1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")
  • CROSS-REFERENCE:  118.2^B
    1)= S ^FH(118.2,"B",$E(X,1,30),DA)=""
    2)= K ^FH(118.2,"B",$E(X,1,30),DA)
    This is the normal B cross-reference of the NAME field.
1 DISPENSING UNIT 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-10 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains a title for the dispensing unit such as bottle, can or package.
2 AMT/UNIT 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S:X[" " X=+X_$P(X," ",2) S:"MG"[$E(X,$L(+X)+1) X=+X_$E(X,$L(+X)+1) S:X["M" X=+X_"ML" K:($L(+X)>10)!($L(X)<1)!(+X>9999)!(+X<0)!("MLG"'[$E(X,$L(X))) X
  • LAST EDITED:  JUL 27, 2006
  • HELP-PROMPT:  Enter amount in ML's or in Grams. Amount cannot exceed 9999. The following are examples of valid entries 22ML, 40GRAMS, 20 G, or 100 M.
  • DESCRIPTION:  
    This is the number of ml's or grams of product contained in the dispensing unit. For products which require reconstitution with water, it is the number of ml's after reconstitution.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
3 KCAL/ML 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>1000)!(X<.1)!(X?.E1"."3N.N) X
  • LAST EDITED:  APR 22, 2005
  • HELP-PROMPT:  Type a Number between .1 and 1000, 2 Decimal Digits
  • DESCRIPTION:  
    This field contains the number of KiloCalories per ml of product.
5 COST COMPUTED

  • MUMPS CODE:  X ^DD(118.2,5,9.2) S X=$P(Y(118.2,5,101),U,13) S D0=Y(118.2,5,80) S X=$J(X,0,2)
    9.2 = S Y(118.2,5,80)=$S($D(D0):D0,1:""),Y(118.2,5,1)=$S($D(^FH(118.2,D0,0)):^(0),1:""),D0=$P(Y(118.2,5,1),U,7) S:'$D(^FH(114,+D0,0)) D0=-1 S Y(118.2,5,101)=$S($D(^FH(114,D0,0)):^(0),1:"")
  • ALGORITHM:  CORRESPONDING RECIPE:COST/PORTION (ALWAYS 2 DECIMAL DIGITS)
  • LAST EDITED:  SEP 28, 1985
  • HELP-PROMPT:  TYPE A NUMBER BETWEEN 0 AND 100
  • DESCRIPTION:  
    This is the portion cost of the tubefeeding and is a computed field which obtains the value from the recipe file based upon the 'Corresponding Recipe' pointer.
10 SYNONYM 1;0 Multiple #118.21 118.21

  • DESCRIPTION:  
    This multiple contains alternate names or synonyms for the product. These names should include any names commonly known or used by ward/medical personnel.
11 CORRESPONDING RECIPE 0;7 POINTER TO RECIPE FILE (#114) RECIPE(#114)

  • LAST EDITED:  SEP 29, 1990
  • DESCRIPTION:  
    This field is a pointer to the recipe in file 114 (the Recipe file) which contains the ingredients for this feeding. Cost and other data for this feeding will be retrieved from the recipe file.
99 INACTIVE? I;1 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

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

Found Entries, Total: 8

NAME: AMIN-AID    NAME: ENSURE PLUS    NAME: OSMOLITE HN    NAME: CRITICARE HN    NAME: SUSTACAL    NAME: TRAUMACAL    NAME: HEPATIC AID    NAME: MAGNACAL    

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #4878
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
    		•  NAME (.01).
    Access: Pointed to

    External References

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

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(118.2 5+1
    ^FH(114 - [#114] 5OF9.2+1
    ^FH(118.2 - [#118.2] .01(XREF 1S), .01(XREF 1K), 5OF9.2+1, 99(XREF 1S), 99(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^("I" IDWRITE+1
    ^(0 5OF9.2+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> D0 5+1*, 5OF9.2+1*
    >> DA .01(XREF 1S), .01(XREF 1K), 99(XREF 1S), 99(XREF 1K)
    U 5+1, 5OF9.2+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1*!, 3+1!, 5+1*, 99(XREF 1S)
    >> Y( 5+1, 5OF9.2+1*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All