Re: Redirection control

["Steve Landess" <sjl_123@xxxxxxxxxxx>]

> "Tom Liotta" wrote:
> I can create a QShell utility that allows me to redirect STDOUT from a C
program to a streamfile.
> I can also OVRPRTF STDOUT in order to redirect the output to a printer
file.
> I have no direct control over the C program other than being able to call
it.
> Is there any useful way to control redirection from within RPG?
> While a spooled file "works", I'd much prefer going direct to a streamfile
or any similar facility.
> Reading a spooled file isn't out of the question; it's just ugly and prone
to future trouble.

Tom,

What about overriding the printer file *directly* to a database file?  You
can override a printer file to a database file like this.  Here is an
example (using OS/400 commands, I'm too lazy to write a program tonight):

1) CRTPF FILE(YOURLIB/TEMPFILE) RCDLEN(198) LVLCHK(*NO)
2) OVRPRTF FILE(QSYSPRT) TOFILE(TEMPFILE)
3) Now press the PRINT key.  It sends its output to the printer file named
QSYSPRT.
4) Voila!  Instead of going to a spooled file the output went to TEMPFILE.

The same would work for STDOUT in your C program.

Most people don't know that you can do this...the trick is LVLCHK(*NO) on
the physical file, otherwise it fails with a level check on the printer
file.

Steve Landess
Austin, Texas
(512) 423-0935