Re: Delete Spool File Question

OK.  At the risk of being rebuked, let me jump in in the middle without 
having read previous e-mails in this thread.

two commands I find useful.


1)   CLROUTQ
  - blows all the contents of a Q

2)  ENDJOB xxxxx SPLFILE(*YES)
-   Even though the job has ended,
      this will blow all the spoolfiles (except joblog) associated with 
that job.
      < Actually, not sure about other system generated things like dumps 
either>

hope that helps.

kevin

At 03:07 PM 3/1/2001, you wrote:
> > -----Original Message-----
> > From: CYBRT1@aol.com [mailto:CYBRT1@aol.com]
> > Sent: 1 March 2001 2:51
> > To: RPG400-L@midrange.com
> > Subject: Delete Spool File Question
> >
> >
> > Does anybody have a sample of CL Code to delete spool files out of a
> > queue. I would like to loop through a queue in a CL program and delete
> > each of the spool files related to a job number, Job name, Spool Number
> > I pass to the CL.
> >
> > TIA
> > Tom
>
>As others have mentioned, you can use DLTSPLF to delete a single
>spoolfile or several, based on selection critera. You can extend this in
>a CL by a WRKOUTQ to *PRINT, CPYSPLF & RCVF (as also mentioned) or you
>can use the system APIs (QUSLSPL is the principal one) to identify the
>spooled files you want & process the entries (in a user space) in CL
>(hard) or RPG (easier). You could have a look at my PRGOUTQ or MOVOUTQ
>utilities for examples of the latter method. Tom Liotta
>(http://zap.to/tl400) has loads of code examples of using just CL to
>process system APIs if you want a CL only solution.
>
>Regards, Martin
>
>--
>martin@dbg400.net / jamaro@firstlinux.net
>http://www.dbg400.net  DBG/400 - DataBase Generation utilities
>Open Source test environment tools for the AS/400 / iSeries and
>misc commands (WRKUSROUTQ, CHKLVLCHK, PRGOUTQ, EXCSQL & more)
>+---
>| This is the RPG/400 Mailing List!
>| To submit a new message, send your mail to RPG400-L@midrange.com.
>| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
>| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator: david@midrange.com
>+---

****************************************************************
Kevin M Howcroft                http://www.kmtcinc.com
AS/400 Technical Consultant     Voice:407.830.5960
kevinh@kmtcinc.com              Fax: 407.650.2638

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---