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: 63.0112

Package: Lab Service

LAB DATA(#63)-->63.01-->63.0112

Sub-Field: 63.0112


Information

Parent File Name Number Package
63.01 RBC ANTIGEN ABSENT 63.0112 Lab Service

Details

Field # Name Loc Type Details
.01 RBC ANTIGEN ABSENT 0;1 POINTER TO FUNCTION FIELD FILE (#61.3) FUNCTION FIELD(#61.3)

  • INPUT TRANSFORM:  S DIC("W")="W "" "",$P(^(0),U,2),"" "",$P(^(0),U)",DIC("S")="I $P(^(0),U,5)=""AN""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
  • LAST EDITED:  MAY 21, 1999
  • DESCRIPTION:  
    Antigens identified as absent on red blood cells are entered here.
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=""AN"""
  • EXPLANATION:  Limits input to only entries that are RBC Antigens.
    WRITE AUTHORITY: ^
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.02 COMMENT 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  OCT 28, 1990
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
  • DESCRIPTION:  
    Comment field
    WRITE AUTHORITY: ^
Info |  Details