Re: How to send SQL query Results to a Printer

No need for printer files - use QM queries and forms - a QM query is simply an encapsulated SQL statement - in this case, a SELECT statement.

Now an INSERT should never be expected to go to a report - only a SELECT statement will do that.

If Chandana can execute STRQM, there's an easy interface. If not, just CRTSRCPF YOURLIB/QQMQRYSRC RCDLEN(91) and add a member in PDM - put the SELECT statement into the source - not the INSERT part - then save it and execute CRTQMQRY from that source member. To make a report, just execute STRQMQRY with OUTPUT(*PRINT).

To get a nice look to the report, it's easiest by far to have STRQM available - hand-coding forms is for the masochists among us.

The execution of STRQMQRY can easily be done with QCMDEXC, or in a CL module attached to the RPG as needed.

HTH
Vern

At 09:42 PM 11/27/2007, you wrote:

Chandana,

For a one-off, I would do this in iSeries Navigator and then cut & paste
the results into Excel.

If a production report, you need to do the usual printer file, read first
record, loop until eof, print (check for overflow + print), etc.

Hope this helps.

Glenn Gundermann
ggundermann@xxxxxx
(647) 272-3295

> I have the following SQL statement built in free code.
>
> Please advise, how to send this query results to a spoolfile, to print
> the report.
>
>
> EXEC SQL
> INSERT INTO TADYERRPF
> SELECT RPASTR, RPASTR*1 AS STORE, RPEMPL, RPLNM, RPFNM, RPMSG,
> (RPRMO*1000000)+( RPRDA*10000)+RPRYR AS DATE, RPRYR, RPRMO, RPRDA,
> RPFISY, RPFISW, (RPFISY*100)+RPFISW AS FISCAL
> FROM DBREPRINT WHERE RPERR1 <> 11
> ORDER BY RPASTR, RPEMPL, RPMSG, RPRYR, RPRMO, RPRDA
> With NC;
>
> Appreciate your kind assistance.