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

Package: Lab Service

Routine: LRARPW


Information

LRARPW ;DALISC/CKA - PURGE WKLD DATA (64.1);2/1/95

Source Information

Source file <LRARPW.m>

Entry Points

Name Comments DBIA/ICR reference
START ;
MAKE ;Ask if backup tape made
CHECK ;Ask if checked backup tape
OKAY ;Ask if okay to delete
QUEUE ;queue purge
DOIT ;Deleting dates in 64.1
END
EXIT
ERROR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: MAKE+1
Function Call: WRITE
  • Prompt: !!!!,$C(7),"Make a backup of the ARCHIVED WKLD DATA file before purging!"
  • Line Location: MAKE+3
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: CHECK+1
Function Call: WRITE
  • Prompt: !!!!,$C(7),"Check the backup before purging!"
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: OKAY+1
Function Call: WRITE
  • Prompt: !!!!,"No purging done."
  • Line Location: OKAY+2
Function Call: WRITE
  • Prompt: !!!!,"DONE."
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!,"I will now CLEAR out the Archived Workload Data global."
  • Line Location: END+3
Function Call: WRITE
  • Prompt: !!,">>> DONE <<<"
  • Line Location: END+6
Function Call: WRITE
  • Prompt: !!,$C(7),"I cannot find an archival activity for file 64.1 with the right archival status."
  • Line Location: ERROR+0
Info |  Source |  Entry Points |  Interaction Calls