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

Package: Lab Service

LAB DATA(#63)-->63.09-->63.902

Sub-Field: 63.902


Information

Parent File Name Number Package
63.09 SPECIMEN 63.902 Lab Service

Details

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

  • INPUT TRANSFORM:  K:$L(X)>75!($L(X)<2) X I $D(X),X="PAP SMEAR",$D(SEX),SEX'="F" W " Patient not female." K X
  • LAST EDITED:  APR 26, 1992
  • HELP-PROMPT:  Answer must be 2-75 characters in length.
  • DESCRIPTION:  
    Enter the name of the specimen submitted..
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  63.902^B
    1)= S ^LR(DA(2),"CY",DA(1),.1,"B",$E(X,1,30),DA)=""
    2)= K ^LR(DA(2),"CY",DA(1),.1,"B",$E(X,1,30),DA)
.02 WORKLOAD PROFILE 0;2 POINTER TO LABORATORY TEST FILE (#60) LABORATORY TEST(#60)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,4)=""CY""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 07, 1991
  • HELP-PROMPT:  ENTRY MANDATORY. MUST MATCH ENTRY IN LABORATORY TEST FILE.
  • DESCRIPTION:  The name of a cytology subscripted entry in the lab test file.
    The entry is composed of accession WKLD codes and one or more
    cytology procedures associated with specimen processing.
  • SCREEN:  S DIC("S")="I $P(^(0),U,4)=""CY"""
  • EXPLANATION:  Selects only cytopathology workload entries
1 SMEAR PREP 1;0 Multiple #63.9121 63.9121
2 CELL BLOCK 2;0 Multiple #63.922 63.922
3 MEMBRANE FILTER 3;0 Multiple #63.924 63.924
4 PREPARED SLIDES 4;0 Multiple #63.9024 63.9024
5 CYTOSPIN 5;0 Multiple #63.9025 63.9025
Info |  Details |  All