CLRAND

 FUNCTION:

      Clears any random file to nulls.

 HINTS/RESTRICTIONS:

      Great  after  using  CREATE to clear out the file, avoiding any
      spillover of old data into  new data.  Will not harm or work on
      anything but random files.

 FORMAT:

      _._CLRAND filespec

      Where  "filespec"  is the full file specification/name  of  the
      random file that you want  to clear out.  The default extension
      is ".DAT".  If the filespec  is  left blank, directions for use
      of CLRAND will be shown.

 DEFAULTS:

      The default is the current device and account with an extension
      of ".DAT".

 OPTIONS:

      The only option is to leave the  filespec  blank,  thus evoking
      the CLRAND instructions.

 OPERATION:

      You must  be  logged  into  the OPR: account for the program to
      work;  you must therefore use the full filespec for the name of
      the data file if it is located in  some  other account.  ERSATZ
      names for filespecs DO work.  Once CLRAND  has  found the file,
      you  are  asked   "You are about to zero out all data  in  this
      file.  Enter Y to confirm:"   Once  you  enter "Y", the data in
      the file is history.

 ERRORS:

      _?Invalid file specification_
              You have not properly written out the filespec  so that
      CLRAND  can  find the data file to clear.  Use the _AMOS  User's
      Guide_ as a reference for how to write a file specification.

      _Filespec is not a random file_
              You  are  trying  to  clear a file that is not a random
      file.  It will not work.

      _?This file does not exist_
              CLRAND   was  not  able  to  find  the  file  that  you
      specified.

 CHARACTERISTICS:

      CLRAND is both reentrant and reusable.

 NOTE:
      This  program  is  not  part  of  the original AMOS/L operating
      system distributed  by  Alpha  Microsystems.

      The author of this program is: Dave Heyliger

      This command was documented by: Richard Wojkovich (IRW/AM)

      Distributed by the Alpha Micro Users  Society,  735  Walnut St.,
      Boulder, CO  80302. (303) 449-6917.