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

Package: Lab Service

Routine: LRLL


Information

LRLL ;SLC/RWF - LOAD LIST CONTROL ;2/19/91 10:41 ;

Source Information

Source file <LRLL.m>

Entry Points

Name Comments DBIA/ICR reference
L1 ;
PRO
AS
KILL
LOAD ;
HEAD ;
WRITE ;
ASK

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: L1+1
Function Call: WRITE
  • Prompt: !,"No profile defined."
  • Line Location: L1+4
Function Call: READ
  • Variable: LRFRMT
  • Timeout: DTIME
  • Line Location: AS+0
Function Call: WRITE
  • Prompt: !,"(C)ondensed or (E)xpanded list ? (req. 132 column format):C//"
  • Line Location: AS+0
Function Call: WRITE
  • Prompt: !,"Answer C or E"
  • Line Location: AS+0
Function Call: WRITE
  • Prompt: !?20,"******** None Found ********",!
  • Line Location: LOAD+6
Function Call: WRITE
  • Prompt: !," * = Greater than 1 DAY Old ",!
  • Line Location: LOAD+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !?LRHDT,LRHD,!!,"Load Work List Name",?24,"Date ",?36,"User Name",?57,"Acession Area",!
  • Line Location: HEAD+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Press Any Key to Continue ... ""^"" to Escape "
  • Variable: AN
  • Timeout: $S($D(DTIME):DTIME,1:60)
  • Line Location: WRITE+1
Function Call: WRITE
  • Prompt: !?5,LRLWN,?22,Y_S,?34,$S($D(^VA(200,+LRTECH,0)):$P(^(0),U),1:"Unknown"),?60,LRAAN
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: !,"Listing Queued To Device ",ION,!
  • Line Location: ASK+0

FileMan Files Accessed Via FileMan Db Call

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