The answer lies in MPEX's "Flexible LISTF".  I have one called SHOWOUT.LISTF.VESOFT, which I always send to a printer.  This is because it uses 132 character wide display.  To send to your screen use a file equation thus:

%FILE S=$STDLIST;REC=-134
%LISTF @.OUT.HPSPOOL,SHOWOUT;OUT=*S

Also, I sort differently, if you want to sort by number, you'll
have sort by "SPOOL.SPOOLFILENUM" (which is an Integer, so you
don't need to tweak it as a string.)  

I also add the LDEV number and number of lines, which SHOWOUT doesn't.
I also pad the columns with spaces, so the JOBNAME,USER.ACCOUNT looks nice.

Contents of SHOWOUT.LISTF.VESOFT:

FOR RFILE IN MPEXFILESET
  SORT (SPOOL.ACCOUNT:8, SPOOL.FILE:8, SPOOL.USER:8, SPOOL.JSNAME:8)
  PAGEHEAD
    BEGIN
    WRITELN;
    WRITELISTFHEADER (71);
    WRITELN;
    WRITELN ('SPFile#  Filename Dev     Pri ',
   ' JOB#       :Jobname ,User    .Account    Lines Ready Date/Time');
    WRITELN;
    END
  DO
    BEGIN
      WRITE ('#O':2, SPOOL.SPOOLFILENUM:7:'L',
             SPOOL.FILE:9:'L',
             SPOOL.DEVICE:9:'L',
             SPOOL.OUTPRI:3:'L',
             STRWRITE ("#S'#S #J #J'"[3*SPOOL.JOBTYPE:3],
             SPOOL.JOBNUMBER:9:'L',
             ":",
             SPOOL.JSNAME:8,
               (IF SPOOL.JSNAME="" THEN " " ELSE ","),
             SPOOL.USER:8,

             ".",
             SPOOL.ACCOUNT:8,
             SPOOL.NUMLINES:8,
             " "));
      IF SPOOL.READYDATE<=TODAY-7 THEN
         BEGIN
            WRITE (SPOOL.READYDATE:'%0D%1M ');
            WRITE (SPOOL.READYTIME:'%rh:%0m%x')
         END
      ELSE
         BEGIN
            WRITE (SPOOL.READYDATE:'  %W ');
            WRITE (SPOOL.READYTIME:'%rh:%0m%x')
         END;
      IF SPOOL.JOBABORTED THEN
         WRITE (" ERR!");
   WRITELN;
   END;


BT
Note some have said this does not work for them.  I think they merely had a word-wrap problem with cut-and-paste.
BT


Tracy Johnson
MSI Schaevitz Sensors 

> -----Original Message-----
> From: [log in to unmask] [mailto:[log in to unmask]]
> Sent: Friday, January 30, 2004 5:19 PM
> To: [log in to unmask]
> Subject: [HP3000-L] MPE MPEX EDIT or QEDIT solution for right 
> justifying
> spool ids
> 
> 
>  We perform some automated searches through specific spool files
> created every night. It's a set of eight spool files were sometimes
> they output on the same day sometimes not. We only want to search the
> last one for report. Sometimes, for whatever reason, the order of
> Spool ids displayed makes no logical sense. I've considered sorting
> the spool list piped out by spool id, but ids are left justified
> without zero fill.
> 
> 
> 
> #1 Is it possible to force spoolfiles to list by numeric or date order
> of spoolid?
> 
> 
> or if not,
> 
> 
> # If I have an mpe file that looks like this
> 
> 45627
> 22222
> 11111
> 33
> 1
> 5
> 
> 
> Where the record width is 8. How can right justify the entire file
> using mpe/mpex/editor or qedit in batch?
> 
> where the result would be:
> 
> 1
> 5
> 33
> 11111
> 22222
> 45627
> 
> Thanks - got the feeling this is a 'no duh' type question.
> 
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
> 

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