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

Package: General Medical Record - IO

GMRY PATIENT I/O FILE(#126)-->126.02

Sub-Field: 126.02


Information

Parent File Name Number Package
GMRY PATIENT I/O FILE(#126) OUTPUT 126.02 General Medical Record - IO

Details

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

  • INPUT TRANSFORM:  S %DT="ETXRS",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
  • LAST EDITED:  DEC 13, 1995
  • DESCRIPTION:  
    This field stores the end date/time point for this cumulative measurement. NO FUTURE DATE/TIME ALLOWED !!!
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  126.02^B
    1)= S ^GMR(126,DA(1),"OUT","B",$E(X,1,30),DA)=""
    2)= K ^GMR(126,DA(1),"OUT","B",$E(X,1,30),DA)
    This regular cross-reference is automatically created on the .01 field of the file. This index sorts the output measurements by date/time for a patient.
  • CROSS-REFERENCE:  126.02^TYP01^MUMPS
    1)= I $D(^GMR(126,DA(1),"OUT",DA,0)),$P(^(0),"^",2)'="" S GMRTYP=$P(^(0),"^",2) S ^GMR(126,DA(1),"OUT","TYP",9999999-X,GMRTYP,DA)="" K GMRTYP
    2)= I $D(^GMR(126,DA(1),"OUT",DA,0)),$P(^(0),"^",2)'="" S GMRTYP=$P(^(0),"^",2) K ^GMR(126,DA(1),"OUT","TYP",9999999-X,GMRTYP,DA),GMRTYP
    TYP01 MUMPS cross-reference is created to delete an old output record index ^GMR(126,DA(1) ,"OUT","TYP",9999999-OUTPUT DATE/TIME,OUTPUT TYPE,DA)
    ="".
1 OUTPUT TYPE 0;2 POINTER TO GMRY OUTPUT TYPE FILE (#126.58)
************************REQUIRED FIELD************************
GMRY OUTPUT TYPE(#126.58)

  • LAST EDITED:  SEP 29, 1993
  • DESCRIPTION:  
    This field identifies the major output categories such as URINE, EMESIS, etc.
  • CROSS-REFERENCE:  126.02^TYP1^MUMPS
    1)= S GMRVDT="" S:$D(^GMR(126,DA(1),"OUT",DA,0)) GMRVDT=$P(^(0),U) S:GMRVDT'=""&(X>0) ^GMR(126,DA(1),"OUT","TYP",9999999-GMRVDT,X,DA)="" K GMRVDT
    2)= S GMRVDT="" S:$D(^GMR(126,DA(1),"OUT",DA,0)) GMRVDT=$P(^(0),U) K:GMRVDT'=""&(X>0) ^GMR(126,DA(1),"OUT","TYP",9999999-GMRVDT,X,DA) K GMRVDT
    TYP1 MUMPS cross-reference is created to sort output measurements by inverted OUTPUT DATE/TIME and OUTPUT TYPE.
2 OUTPUT SUBTYPE 0;3 POINTER TO GMRY OUTPUT SUBTYPE FILE (#126.6) GMRY OUTPUT SUBTYPE(#126.6)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=$P($G(^GMR(126,DA(1),""OUT"",DA,0)),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 03, 1992
  • DESCRIPTION:  
    This field contains subtitle names associated with each major output category, i.e., FOLEY CATHETER and VOIDED for URINE.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=$P($G(^GMR(126,DA(1),""OUT"",DA,0)),U,2)"
  • EXPLANATION:  Select only the OUTPUT SUBTYPE applicable to this OUTPUT TYPE.
3 OUTPUT AMOUNT 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:'(($L(X)=1&("SML"[$$UP^XLFSTR(X)!($E(X)="*")))!(X?1.4N1"*")!(X?1.4N)) X I $D(X),+X>9999 K X
  • LAST EDITED:  NOV 06, 1996
  • HELP-PROMPT:  Answer must be a number between 0 and 9999 or * if output amount is unknown.
  • DESCRIPTION:  
    The field stores the cumulative amount of this output period in milliliters (ml). Enter "*" if output amount is unknown.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
4 COMMENT 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  SEP 01, 1995
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  
    This field permits the caregiver to describe additional observations for this output, i.e., color, odor, consistency for drainage. This field will be used in the next version.
5 ENTERED BY 0;6 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  FEB 25, 1991
  • DESCRIPTION:  
    This field contains the name of the user who enters this record. Pointer to the New Person file ^VA(200).
6 HOSPITAL LOCATION 0;7 POINTER TO HOSPITAL LOCATION FILE (#44)
************************REQUIRED FIELD************************
HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,3)'=""Z""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 17, 1992
  • DESCRIPTION:  
    This field contains the hospital location of the patient. Pointer to the Hospital Location file (#44).
  • SCREEN:  S DIC("S")="I $P(^(0),U,3)'=""Z"""
  • EXPLANATION:  The hospital location where the patient is located. Pointer to the Hospital Location file (#44).
Info |  Details