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

Package: Lab Service

Routine: LRMILL


Information

LRMILL ;SLC/DLG - BUILD LOAD LIST FOR MICROSCAN ;4/4/89 21:38 ;

Source Information

Source file <LRMILL.m>

Entry Points

Name Comments DBIA/ICR reference
INSERT ;Add a sample to next cup
IN2
IN5
IN7
NOPE
FINISH
END
LRINST ;Get loadlist data
SETONE ;Set tests into cup and update accession
MV2
WHATEST ;
SHOW ;Show the patient

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Select only from the ",$P(^LRO(68,LRDAA,0),U)," accession area"
  • Line Location: INSERT+1
Function Call: WRITE
  • Prompt: !,"Sorry but this accession is in the wrong group"
  • Line Location: INSERT+2
Function Call: WRITE
  • Prompt: !!," >> ADDED <<"
  • Line Location: IN5+1
Function Call: READ
  • Formatting: !!
  • Prompt: "Next Accession NUMBER: "
  • Variable: LRAN
  • Timeout: DTIME
  • Line Location: IN7+0
Function Call: WRITE
  • Prompt: !,"Enter just the number part of the accession"
  • Line Location: IN7+1
Function Call: WRITE
  • Prompt: !,$C(7),"This accesion doesn't exist"
  • Line Location: IN7+2
Function Call: WRITE
  • Prompt: !," OPERATION NOT COMPLETE"
  • Line Location: NOPE+0
Function Call: WRITE
  • Prompt: !,"Load list is busy now, Please try later."
  • Line Location: LRINST+3
Function Call: WRITE
  • Prompt: !,"NO TESTS FREE TO ADD"
  • Line Location: WHATEST+3
Function Call: WRITE
  • Prompt: !,PNM,?40,SSN
  • Line Location: SHOW+2

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