Re: Outsourcing spooled file

On 23/01/2007, at 7:45 AM, Frances Denoncourt wrote:

Thanks for all of the previous responses, however..............My
boss's opinion is - if they say they can work with a spooled file then
we will send it to them. My worry is - how the heck do I get it to them
other than all of the wonderful solutions you suggested that we cannot
implement. No PDF, no Infoprint server, etc.

Found a system program QSPGetF that I am trying to use. Not sure what
the output will look like in the db file, but thought I'd give it a
try.

Read this:

However, I keep getting this message:" File QPRINT not found in job
417803/TRSFDD/TRSFDDP03"

It really and truly is there.

I tried it with other spooled files, too.
Same error. Tried both development and production boxes. We are at
V5R2M0.

Then I searched for "QSPGETF error" and found my own question from a
couple of years ago where I apparently did call the program - not the
results I wanted but, it didn't abort for this reason.

Then I found this while searching for "QSPGETF changed":

 " I couldn't find it anywhere in the archives and because QSPGETF is
essentially an undocumented API, I couldn't find anything on IBM's
website  about it - but just be warned that the spool number parameter
has changed.  It is now 4 binary, vs. 2 binary at V4R5 and before"

There's your answer.

I don't think that's my problem, though, but here is the call:

call (QSYS/QSPGETF PARM('QPRINT    '          'PRINTWIDE TRSFDD    '
'TRSFDDP03 TRSFDD    417803'   X'00F1'     'TESTAPI'

How long is the X'00F1' field? How long should it be?

Everything seems to be ok as far as field lengths. This is spooled file
#1 for this job. Does anything jump out at you?

What's binary 1 in hexadecimal? It's not X'00F1' Try again.

We are really serious about this now - the Xerox printer and assocated

PCs (iConvert and Xerox) are gone. The new LAN printer is hooked up, but

we won't be using it for those large jobs.

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         OS/400, i5/OS Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------