Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: LRLABXT

Package: Lab Service

Routine: LRLABXT


Information

LRLABXT ;SLC/TGA - REPRINTS DEMAND LABELS ;2/19/91 10:38

Source Information

Source file <LRLABXT.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Reprint labels
ASK ;
LOAD ; Tasked entry point and from above.
PRINT ;
; Called by above, LRLABXOL
IOCHK ; Select and check label printer.
; Called from above, LRLABXOL
SETTMP ; Setup TMP global with accession to reprint.
K ; Cleanup

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+12
Function Call: WRITE
  • Prompt: !,"Labels ",$S($G(ZTSK):"queued to "_$P(LRLABLIO,";")_" Task #"_ZTSK,1:"NOT queued"),!
  • Line Location: ASK+32
Function Call: WRITE
  • Prompt: !!,"Printing labels on ",$P(LRLABLIO,";"),!
  • Line Location: ASK+34
Function Call: WRITE
  • Prompt: !,$C(7),"Unable to open device"
  • Line Location: IOCHK+12
Info |  Source |  Entry Points |  Interaction Calls