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

Package: Dietetics

Global: ^FH(119.5


Information

FileMan FileNo FileMan Filename Package
119.5 DIETETIC CONSULTS Dietetics

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Dietetics 10 CONSULTATION    FHDMP4    FHORC    FHORC1    FHORC2    FHORC3    FHORD61    FHWOR72
^FH(119.5    FHXDB2    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Dietetics 2 FHORC    FHORC5    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Dietetics 1 NUTRITION PERSON(#115)[#115.03(1)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[5]    

Fields, Total: 7

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  JUN 25, 1985
  • HELP-PROMPT:  ANSWER MUST BE 3-50 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the name of the consultation as it would normally be known by ward/medical personnel.
  • DELETE TEST:  1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")
  • CROSS-REFERENCE:  119.5^B
    1)= S ^FH(119.5,"B",$E(X,1,30),DA)=""
    2)= K ^FH(119.5,"B",$E(X,1,30),DA)
    This is the normal B cross-reference of the NAME field.
1 BRIEF NAME 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 is a short abbreviation of the dietetic consult type.
2 ASK INITIAL/FOLLOW-UP? 0;3 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUN 06, 1985
  • DESCRIPTION:  
    This field, if answered YES, will prompt the clinician completing the consult to indicate whether it was an initial consultation or a follow-up to prior consultations.
3 TU FOR INITIAL CONSULT 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>100)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  JUN 18, 1985
  • HELP-PROMPT:  TYPE A NUMBER BETWEEN 0 AND 100
  • DESCRIPTION:  
    This field contains the number of 'time-units' associated with an initial consultation. The values of these 'time-units' are left to local discretion.
4 TU FOR FOLLOW-UP 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>100)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  JUN 18, 1985
  • HELP-PROMPT:  TYPE A NUMBER BETWEEN 0 AND 100
  • DESCRIPTION:  
    This field contains the number of 'time-units' associated with a follow-up consultation and need be present only when the follow-up prompt has been selected. The values of these 'time-units' is left to local discretion.
5 USER TO BULLETIN 0;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  AUG 21, 1985
  • DESCRIPTION:  
    If a bulletin to a designated clinician is desired whenever this consult is ordered, the clinician should be selected.  An example might be a renal dialysis consult or a nutrition support consult.
99 INACTIVE? I;1 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  OCT 25, 1987
  • DESCRIPTION:  
    This field, when answered YES, will prohibit further selection of this consult type by ward or dietetic personnel.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  119.5^AC^MUMPS
    1)= K:X'="Y" ^FH(119.5,DA,"I")
    2)= K ^FH(119.5,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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.5 - [#119.5] .01(XREF 1S), .01(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), 99(XREF 1S), 99(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 3+1!, 4+1!, 99(XREF 1S)
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