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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: LRLL1A

Package: Lab Service

Routine: LRLL1A


Information

LRLL1A ;SLC/RWF - LOAD LIST CONTROL ; 2/23/89 17:29 ;

Source Information

Source file <LRLL1A.m>

Entry Points

Name Comments DBIA/ICR reference
L1
L2
C1
NODEF
DAT
BUILD
B1
B2
LRSTAR
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"All urgencys"
  • Line Location: L1+0
Function Call: WRITE
  • Prompt: !,"Build the list with all urgencys or with a range."
  • Line Location: L1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !,"1 Allow splitting tests from each accession between load/worklists.",!,"2 Require all tests to build or build none at all (for each accession).",!,"Choose: 1//"
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !,"Enter 1 or 2."
  • Line Location: L2+0
Function Call: WRITE
  • Prompt: !!,"LOAD/WORK LIST SET FOR "
  • Line Location: L2+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: L2+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !,"HOW MANY",$S(LRTYPE:" TRAYS",1:" ENTRIES")," TO BUILD: ALL//"
  • Line Location: C1+0
Function Call: WRITE
  • Prompt: !," ACCESSION LIST: ",$P(^LRO(68,LRAA,0),U,1)
  • Condition for execution: LRAA
  • Line Location: C1+2
Function Call: WRITE
  • Prompt: !,"Need an accession area."
  • Line Location: C1+2
Function Call: WRITE
  • Prompt: !,"USE DEFAULT SETUP"
  • Line Location: C1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: NODEF+1
Function Call: READ
  • Formatting: !
  • Prompt: "Accession DATE: T//"
  • Variable: X
  • Timeout: DTIME
  • Line Location: DAT+0
Function Call: READ
  • Formatting: !
  • Prompt: "ACCESSION NUMBER: FIRST//"
  • Variable: LRST
  • Timeout: DTIME
  • Line Location: DAT+1
Function Call: READ
  • Formatting: !
  • Prompt: " GOTO: LAST//"
  • Variable: LRLLT
  • Timeout: DTIME
  • Line Location: DAT+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: BUILD+1
Function Call: WRITE
  • Prompt: !,$S(LRTYPE:"TRAY",1:"SEQUENCE #")," TO START WITH: ",$S(LRTYPE:LRTRAY,1:LRCUP),"//"
  • Line Location: BUILD+1
Function Call: WRITE
  • Prompt: !?5,"Enter number to start with.",!
  • Line Location: BUILD+1
Function Call: WRITE
  • Prompt: !,"Queue build and print:"
  • Line Location: B2+0
Function Call: WRITE
  • Prompt: !?5,"Answer YES or NO.",!
  • Line Location: B2+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(62.05 - [#62.05] Classic Fileman Calls
^LRO(68 - [#68] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call