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

Package: Dietetics

DIETETIC ENCOUNTERS(#115.7)-->115.701

Sub-Field: 115.701


Information

Parent File Name Number Package
DIETETIC ENCOUNTERS(#115.7) PATIENT 115.701 Dietetics

Details

Field # Name Loc Type Details
.01 PATIENT 0;1 POINTER TO VA PATIENT FILE (#2) VA PATIENT(#2)

  • INPUT TRANSFORM:  I $D(X) S DINUM=X
  • LAST EDITED:  NOV 13, 1989
  • DESCRIPTION:  
    This field contains a pointer to the Patient file (2) and indicates a patient involved in the encounter.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  115.701^B
    1)= S ^FHEN(DA(1),"P","B",$E(X,1,30),DA)=""
    2)= K ^FHEN(DA(1),"P","B",$E(X,1,30),DA)
    This is the normal B cross-reference of the PATIENT field.
  • CROSS-REFERENCE:  115.7^AP^MUMPS
    1)= S X1=$P(^FHEN(DA(1),0),"^",2) S:X1 ^FHEN("AP",X,X1,DA(1))=""
    2)= S X1=$P(^FHEN(DA(1),0),"^",2) K:X1 ^FHEN("AP",X,X1,DA(1))
    This cross-reference creates an 'AP' node of a patient by date/time cross-reference.
1 LOCATION 0;2 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  JUL 19, 1989
  • DESCRIPTION:  
    This field contains a pointer to the Hospital Location (file 44) for the patient. It is the patient location rather than the event location.
2 # COLLATERALS 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 07, 1989
  • HELP-PROMPT:  Type a Number between 0 and 9, 0 Decimal Digits
  • DESCRIPTION:  
    This field contains the number of collaterals seen with the patient.
3 PATIENT COMMENT 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<3) X
  • LAST EDITED:  NOV 07, 1989
  • HELP-PROMPT:  Answer must be 3-60 characters in length.
  • DESCRIPTION:  
    This field may be used for a patient-specific comment concerning the encounter.
Info |  Details |  All