Stuart,

Here is an easy way to implement Stan's suggestion about purging the files
in reverse alphabetical order.  Since you do have MPEX you can use the
following flexible 'LISTF' command:

setvar VESOFTSORTFILESIZE 800000
(the above is needed since you are dealing with more than 10,000 files)

LISTF filesetspecs, ^revpurge

Where 'revpurge' is an unnumbered file containing the following MPEX
statements:

      for rfile in mpexfileset
        sort (account:8, group:8, file:8:'DESC')
        do
          writeln("Purge ",fullname)

You can also use command redirection and capture the output of the above
command into a file and then use your existing scheme of 'XEQ'ting the
file.  You could also execute said file from within MPEX, but in that case
I'd recommend that you change the "Purge " string to "Yespurge ".

Regards
Paul Christidis

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *