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 |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^AUPNLABR

Package: IHS Patient

Global: ^AUPNLABR


Information

FileMan FileNo FileMan Filename Package
9000020 PT LAB RELATED DATA IHS Patient

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Local Area Programs 1 AZAXDPM1    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
IHS Patient 1 PATIENT(#9000001)[.01]    

Fields, Total: 7

Field # Name Loc Type Details
.01 NAME 0;1 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X
  • LAST EDITED:  APR 23, 1987
  • HELP-PROMPT:  Select a patient
  • SCREEN:  S DIC("S")="I $P(^DPT(Y,0),U,2)=""F"""
  • EXPLANATION:  EXCLUDES NON-FEMALES
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9000020^B
    1)= S ^AUPNLABR("B",$E(X,1,30),DA)=""
    2)= K ^AUPNLABR("B",$E(X,1,30),DA)
.02 ABO GROUP 0;2 SET
  • 'A' FOR A;
  • 'B' FOR B;
  • 'AB' FOR AB;
  • 'O' FOR O;

  • LAST EDITED:  FEB 08, 1993
  • HELP-PROMPT:  Enter A for A, B for B, AB for AB, O for O. Enter the patient's Blood Type.
  • DESCRIPTION:  
    Patient's  Blood Type.
.03 DATE LAST MODIFIED 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 08, 1993
  • HELP-PROMPT:  Enter the date that information in this file was last updated.
.04 RH TYPE 0;4 SET
  • 'POS' FOR POS;
  • 'NEG' FOR NEG;

  • LAST EDITED:  FEB 08, 1993
  • HELP-PROMPT:  Enter POS for Positive, NEG for Negative
  • DESCRIPTION:  
    The patient's RH Type.
.05 DO NOT TRANSFUSE 0;5 SET
  • '1' FOR DO NOT TRANSFUSE;
  • '0' FOR OK TO TRANSFUSE;

  • LAST EDITED:  FEB 08, 1993
  • DESCRIPTION:  
    If DO NOT TRANSFUSE is entered then the patient cannot be transfused until the reason for not transfusing a blood component is resolved.  The reason can be entered in the Blood Bank comments field.
.06 RBC ANTIGENS 0;6 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  FEB 08, 1993
.07 ANTIBODIES IDENTIFIED 0;7 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  FEB 08, 1993
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  Found Entries |  All