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

Package: Lab Service

Routine: LRULB


Information

LRULB ;AVAMC/REG - LAB LOG-BOOK ;2/18/93 12:48 ;

Source Information

Source file <LRULB.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
N
M
QUE
LRAD
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,LRAA(1)," Log-Book"
  • Line Location: LRULB+2
Function Call: WRITE
  • Prompt: !!,"Accession list date: ",LRH(0)," OK "
  • Line Location: LRULB+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: $C(7),!!,"No accession numbers for ",LRH(0)
  • Line Location: ASK+1
Function Call: READ
  • Formatting: !
  • Prompt: "Start with Acc #: FIRST // "
  • Variable: N(1)
  • Timeout: DTIME
  • Line Location: N+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Enter NUMBERS only"
  • Line Location: N+0
Function Call: READ
  • Formatting: !
  • Prompt: "Start with Acc #: "
  • Variable: N(1)
  • Timeout: DTIME
  • Line Location: N+1
Function Call: WRITE
  • Prompt: $C(7),!!,"NUMBERS ONLY !!"
  • Line Location: N+1
Function Call: READ
  • Formatting: !
  • Prompt: "Go to Acc #: LAST // "
  • Variable: N(2)
  • Timeout: DTIME
  • Line Location: M+0
Function Call: WRITE
  • Prompt: $C(7),!!,"NUMBERS ONLY !!",!!
  • Line Location: M+0
Info |  Source |  Entry Points |  Interaction Calls