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.9007

Package: Lab Service

LABORATORY SITE(#69.9)-->69.9007

Sub-Field: 69.9007


Information

Parent File Name Number Package
LABORATORY SITE(#69.9) PRINTER DIVISION 69.9007 Lab Service

Details

Field # Name Loc Type Details
.01 PRINTER DIVISION 0;1 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • INPUT TRANSFORM:  I $D(X) S DINUM=X
  • LAST EDITED:  SEP 17, 1996
  • DESCRIPTION:  
    This field should be set equal to the DUZ(2) value.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  69.9007^B
    1)= S ^LAB(69.9,DA(1),3.5,"B",$E(X,1,30),DA)=""
    2)= K ^LAB(69.9,DA(1),3.5,"B",$E(X,1,30),DA)
.02 LOG PRINTER FOR ROUTINE LC 0;2 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X I $D(X) S DIC(0)="EMQ" S X=$P(Y,U,2),DIC=DIE K:Y<1 X
  • LAST EDITED:  SEP 17, 1996
  • HELP-PROMPT:  Enter the name of the device to print the lab collect log on.
  • DESCRIPTION:  This is the device you want the Routine Lab Collect Request to print on. It is recommended that this printer be different one than the one used for immediate collect listing. If this field is vacant, the program
    defaults to field #303 Log Printer for Routine LC.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.03 ACCESSION PRINTER 0;3 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X I $D(X) S DIC(0)="EMQ" S X=$P(Y,U,2),DIC=DIE K:Y<1 X
  • LAST EDITED:  SEP 17, 1996
  • HELP-PROMPT:  Enter the name of the default label device.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
Info |  Details |  All