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

Package: Lab Service

BLOOD PRODUCT(#66)-->66.08

Sub-Field: 66.08


Information

Parent File Name Number Package
BLOOD PRODUCT(#66) PRE-OP TESTS TO CHECK 66.08 Lab Service

Details

Field # Name Loc Type Details
.01 PRE-OP TESTS TO CHECK 0;1 POINTER TO LABORATORY TEST FILE (#60) LABORATORY TEST(#60)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,5)[""CH""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  NOV 04, 1987
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)[""CH"""
  • EXPLANATION:  Selects only lab tests with a "CH" subscript.
.02 SPECIMEN 0;2 POINTER TO TOPOGRAPHY FIELD FILE (#61)
************************REQUIRED FIELD************************
TOPOGRAPHY FIELD(#61)

  • INPUT TRANSFORM:  I $D(X) S X(1)=+^LAB(66,DA(1),8,DA,0) I '$D(^LAB(60,X(1),1,X)) W $C(7),!,"Not in SITE/SPECIMEN FIELD OF LAB TEST FILE for this test.",! K X
  • LAST EDITED:  JUN 10, 1996
  • DESCRIPTION:  Specimen the test is performed on. This must be a specimen
    entered in the lab test file (#60) in the SITE/SPECIMEN field.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.03 > OR < TEST VALUE 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<2)!(X'?1"<".E&(X'?1">".E))!(X'?1E.N.".".N) X
  • LAST EDITED:  NOV 04, 1987
  • DESCRIPTION:  
    This field contain the values to determine if the test result are with in specific limits.
  • EXECUTABLE HELP:  W !,"ENTER '>' IF ABOVE TEST VALUE NOT ACCEPTABLE",!,"(Ex. If value for hct is 30 then enter '>30' so any value above 30 will be",!,"flagged."
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
Info |  Details