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

Package: Automated Lab Instruments

Routine: LAMIAUT7


Information

LAMIAUT7 ;FHS/SLC - CREATE LOAD LIST FOR VITEK ;7/20/90 09:34

Source Information

Source file <LAMIAUT7.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
CLEAR ;
PROF ;
ACCN ;get list of accession numbers
EXIT ;
ACCESS ;
CHK ;
SHOW ;
WAIT ;
W1
HDR ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?10,"Access denied to this Load Work list "
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !?10,"Load list is busy now. Try later"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!?7,$C(7),"Some one else is editing this List",!!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!?10,"No profile defined for this Load/List ",$C(7)
  • Line Location: CLEAR+8
Function Call: WRITE
  • Prompt: !?5,"ALL PROFILES "
  • Line Location: PROF+1
Function Call: WRITE
  • Prompt: !!?5,"You may select a single profile or all profiles defined. ",!!
  • Line Location: PROF+2
Function Call: WRITE
  • Prompt: !!?10,"No Accession area defined ",!
  • Line Location: PROF+4
Function Call: WRITE
  • Prompt: !!?10,"No Accession area defined",!
  • Line Location: PROF+5
Function Call: WRITE
  • Prompt: !?5,"Enter your list of accession numbers separated by ',' or - ",!,"You can string them together, example 1,2,3-6,7,110. ",!
  • Line Location: ACCN+1
Function Call: READ
  • Formatting: !
  • Prompt: "Enter Acc #(s) "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ACCN+2
Function Call: WRITE
  • Prompt: !!?10,"Incorrect format ",$C(7),!!
  • Line Location: ACCN+2
Function Call: WRITE
  • Prompt: !,A_")",?15,PNM,?35,SSN
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: !!,?10,$S(A>0:"Is this partial list correct ",1:" All OK ? ")
  • Line Location: WAIT+1
Function Call: READ
  • Variable: W
  • Timeout: DTIME
  • Line Location: W1+0
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: W1+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: W1+2
Function Call: WRITE
  • Prompt: !?5,"Enter number to "_$S(W="A":"Add ",1:"Delete ")
  • Line Location: W1+2
Function Call: WRITE
  • Prompt: !?10,"Enter accession number, one at a time."
  • Line Location: W1+2
Function Call: WRITE
  • Prompt: @IOF,!!!,"Acc #)",?15," Patient Name SSN ",!!
  • Line Location: HDR+1

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