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

Package: Lab Service

Routine: LRPHSET


Information

LRPHSET ;SLC/CJS - COLLECTION LIST TO ACCESSIONS ;2/19/91 11:16 ;

Source Information

Source file <LRPHSET.m>

Entry Points

Name Comments DBIA/ICR reference
NEW
ADD
MANUAL ;ENTRY POINT
A
B
END
END1
NOW
TIME
RUNING
ROLL ;ROLLOVER NOT FINISHED OR NOT RUN...BLOCKS COLLECTION LIST

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"BUILDING THE LIST"
  • Line Location: ADD+0
Function Call: WRITE
  • Prompt: !,"The collection list for ",Y," still exists, you must clear it before ",!,"building a new list."
  • Line Location: MANUAL+2
Function Call: WRITE
  • Prompt: !,"There is some data in the current collection list."
  • Line Location: MANUAL+3
Function Call: WRITE
  • Prompt: !,"Labels last printed on ",Y,!
  • Line Location: MANUAL+3
Function Call: WRITE
  • Prompt: !,"Do you wish to add entries.) "
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,"Your wish is my command. Please enter Yes or No."
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,"Are you ready to clear the current collection list",!,"and start a new one"
  • Line Location: B+0
Function Call: WRITE
  • Prompt: !,"Answer 'Y'es or 'N'o."
  • Line Location: B+0
Function Call: WRITE
  • Prompt: !,+LRCOUNT," specimens added to collection list."
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !,"The date should be today's date."
  • Condition for execution: %=0
  • Line Location: NOW+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ROLL+1
Info |  Source |  Entry Points |  Interaction Calls