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 |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^FH(119.8

Package: Dietetics

Global: ^FH(119.8


Information

FileMan FileNo FileMan Filename Package
119.8 NUTRITION EVENTS Dietetics

Description

Directly Accessed By Routines, Total: 8

Package Total Routines
Dietetics 8 FHORX    FHORX1    ^FH(119.8    DRUG CLASSIFICATIONS    FHDCR2    FHORX1A    FHORX2    FHORX3

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Dietetics 1 FHORX    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Dietetics 1 NUTRITION PERSON(#115)[2]    
Kernel 1 NEW PERSON(#200)[8]    
Registration 1 PATIENT MOVEMENT(#405)[3]    

Fields, Total: 9

Field # Name Loc Type Details
.01 NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X I $D(X) S DINUM=X
  • LAST EDITED:  JUL 19, 1989
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This field contains a sequential number assigned to the event and has no meaning.
  • DELETE TEST:  1,0)= I DUZ(0)'["@",'$D(^XUSEC("FHMGR",DUZ))
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  119.8^B
    1)= S ^FH(119.8,"B",$E(X,1,30),DA)=""
    2)= K ^FH(119.8,"B",$E(X,1,30),DA)
    This is the normal B cross-reference of the NUMBER field.
1 DATE/TIME 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 05, 1992
  • DESCRIPTION:  
    This is the date/time at which the event occurred.
  • CROSS-REFERENCE:  119.8^AD
    1)= S ^FH(119.8,"AD",$E(X,1,30),DA)=""
    2)= K ^FH(119.8,"AD",$E(X,1,30),DA)
  • CROSS-REFERENCE:  119.8^AP1^MUMPS
    1)= S X1=$P(^FH(119.8,DA,0),U,3) I X1 S ^FH(119.8,"AP",X1,X,DA)=""
    2)= S X1=$P(^FH(119.8,DA,0),U,3) I X1 K ^FH(119.8,"AP",X1,X,DA)
    This is a cross-reference of dietetic events by patient and date/time. Field 2 is also used to set the cross-reference.
2 PATIENT 0;3 POINTER TO NUTRITION PERSON FILE (#115)
************************REQUIRED FIELD************************
NUTRITION PERSON(#115)

  • LAST EDITED:  JUL 05, 1992
  • DESCRIPTION:  
    This is a pointer to the patient with which the event is associated.
  • CROSS-REFERENCE:  119.8^AP^MUMPS
    1)= S X1=$P(^FH(119.8,DA,0),U,2) I X1 S ^FH(119.8,"AP",X,X1,DA)=""
    2)= S X1=$P(^FH(119.8,DA,0),U,2) I X1 K ^FH(119.8,"AP",X,X1,DA)
    This is a cross-reference of dietetic events by patient and date/time. Field 1 is also used to set the cross-reference.
3 ADMISSION 0;4 POINTER TO PATIENT MOVEMENT FILE (#405)
************************REQUIRED FIELD************************
PATIENT MOVEMENT(#405)

  • LAST EDITED:  JUL 05, 1992
  • DESCRIPTION:  
    This is a pointer to the admission (Movement) with which the event is associated.
4 TYPE OF EVENT 0;5 SET
************************REQUIRED FIELD************************
  • 'L' FOR LOCATION;
  • 'D' FOR DIET;
  • 'I' FOR ISOLATION;
  • 'T' FOR T/F;
  • 'O' FOR OTHER;
  • 'P' FOR PREF.;
  • 'S' FOR STD. ORDERS;
  • 'F' FOR SUPP. FDG.;
  • 'M' FOR MESSAGE;
  • 'Z' FOR OUTPATIENT EVENT;

  • LAST EDITED:  MAY 18, 2004
  • DESCRIPTION:  
    This is a set of codes indicating the type of event.
5 ACTION 0;6 SET
  • 'O' FOR ORDERED;
  • 'C' FOR CANCELLED;
  • 'A' FOR ADMIT;
  • 'T' FOR TRANSFER;
  • 'D' FOR DISCHARGE;

  • LAST EDITED:  JUL 05, 1992
  • DESCRIPTION:  
    This is a set of codes indicating the type of action; A D T are associated only with location changes.
6 ORDER # 0;7 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 04, 1992
  • HELP-PROMPT:  Type a Number between 1 and 9999999, 0 Decimal Digits
  • DESCRIPTION:  
    This value corresponds to the associated Order for the event.
7 TEXT 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>120!($L(X)<3) X
  • LAST EDITED:  JUL 04, 1992
  • HELP-PROMPT:  Answer must be 3-120 characters in length.
  • DESCRIPTION:  
    This is the text of the order; for location changes it represents the From-To Ward and Bed.
8 ENTERED CLERK 0;9 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  MAR 17, 1995
  • DESCRIPTION:  
    This field contains the user who entered the order and is automatically captured at the time of entry.

External References

Name Field # of Occurrence
^%DT 1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.8 - [#119.8] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K)
^XUSEC("FHMGR" .01DEL1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 1+1*
>> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K)
>> DINUM .01+1*
DUZ .01DEL1+1
DUZ(0 .01DEL1+1
U 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1*!, 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K)
, 6+1!, 7+1!
>> X1 1(XREF 2S), 1(XREF 2K), 2(XREF 1S), 2(XREF 1K)
>> Y 1+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All