Re: SQL output to Printer - anyway of marking/tagging the spoolfile with the PF name

You can override the printer file "user data" parameter (limited to 10):

Better to use CL + QMQRY (Query-Manager Query):

QCLSRC.T:

*************** Beginning of data *************************************
0001.00 Pgm &f
0002.00
0003.00 Dcl &f *Char 10
0004.00
0005.00 OvrPrtF QPQXPRTF UsrDta(&f)
0006.00 StrQMQRY T Output(*Print) SetVar((FILE &f))
0007.00 DltOvr QPQXPRTF
0008.00
0009.00 EndPgm
****************** End of data ****************************************

Compile it with: CtrCLPgm T


QQMQRYSRC.T:
*************** Beginning of data *************************************
0001.00 select count(*) from &FILE
****************** End of data ****************************

Compile it with: CrtQMQry T

------

You can now call the CL for multiple files:

> call T 'KAKAKA'

Look at your spool file:

5 QPQXPRTF QPRINT KAKAKA RDY 1 1

Display Spooled File
File . . . . . : QPQXPRTF Page/Line 1/3
Control . . . . . Columns 1 - 78
Find . . . . . .
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+...
COUNT ( * )
--------------
4
09/27/16 12:39:49


It was all done in seven lines of code! CL+QMQRY


El Tue, 27 Sep 2016 15:58:34 +0000
"Steinmetz, Paul" <PSteinmetz@xxxxxxxxxx> escribió:

I'm documenting some PF from a 3rd party app.

I'm running an SQL over the PF, tabling and counting the records by date.

SELECT Date-field,count(*) FROM Library/PFfile GROUP BY Date-field ORDER by Date-field.

Is there a way to mark/tag the resulting spoolfile with the PF file name?

Currently, no way to know which PF the spoolfile is for.
Possibly using the User Data.

Device or Total Current
Opt File Queue User Data Status Pages Page Copies
QPQUPRFIL PAULS HLD 44 1
QPQUPRFIL PAULS HLD 115 1
QPQUPRFIL PAULS HLD 16 1

Thank You
_____
Paul Steinmetz
IBM i Systems Administrator

Pencor Services, Inc.
462 Delaware Ave
Palmerton Pa 18071

610-826-9117 work
610-826-9188 fax
610-349-0913 cell
610-377-6012 home

psteinmetz@xxxxxxxxxx
http://www.pencor.com/