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

Package: Lab Service

LAB SECTION PRINT(#69.2)-->69.33

Sub-Field: 69.33


Information

Parent File Name Number Package
LAB SECTION PRINT(#69.2) TEST LIST NUMBER 69.33 Lab Service

Details

Field # Name Loc Type Details
.01 TEST LIST NUMBER 0;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
  • LAST EDITED:  MAR 24, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1 TEST 1;0 POINTER Multiple #69.34 69.34

  • SCREEN:  S DIC("S")="I $P(^(0),U,5)[""CH"""
  • EXPLANATION:  Selects only chem, heme, tox, ser, etc.
Info |  Details |  All