Re: Strange FTP problem

[CRPence <CRPbottle@xxxxxxxxx>]

  AFaIK FTP log output has always intended to use the file name OUTPUT. 
 With one minor anomaly [i.e. text stating "output redirected" goes 
missing] the name STDOUT is also supported [since at least v5r3] to be 
overridden.  There is a known error scenario whereby _no output_ would 
be produced, but it would require to have active also, an OVRDBF OUTPUT 
TOFILE(QPRINT) w/in the job in the noted scenario.  That problem never 
became an APAR, though I am unsure why [because it was such an odd 
scenario?].

  The original code\test\documentation for FTP only ever used OVRDBF 
OUTPUT to a [source] physical file.  They apparently never contemplated 
PRTF output using OVRPRTF.?  I know Vern has several times recommended 
that OVRPRTF OUTPUT could be used, as well as others; I have always 
coded mine that way:
http://archive.midrange.com/midrange-l/200303/msg00562.html
http://archive.midrange.com/midrange-l/200305/msg01124.html
http://archive.midrange.com/midrange-l/200301/msg01835.html
http://www.google.com/search?hl=en&q=ovrprtf+ovrdbf+site%3Aonbedo.com

  The /was working/ case is curious, but to have always worked, I would 
have expected that probably the requests should have always been:

       CRTPRTF    FILE(QTEMP/FTPTEST) HOLD(*YES) SAVE(*YES)
       OVRPRTF    FILE(OUTPUT) TOFILE(FTPTEST)

  I would expect however that the following would have been even more 
appropriate, given the system-supplied program described printer file 
QSYSPRT [or QPRINT?] could be used to avoid creating a printer file:

       /* no crtprtf; use an exiting printer file */
       OVRPRTF    FILE(OUTPUT) TOFILE(QSYSPRT) SPLFNAME(FTPTEST)
                  HOLD(*YES) SAVE(*YES) OVRSCOPE(*CALLLVL)

Regards, Chuck

Michael Ryan wrote:
> I didn't know that FTP generated QPRINT output.
>
> jim t wrote:
> > This is what was working in the program:
> >
> >         CRTPRTF    FILE(QTEMP/FTPTEST) HOLD(*YES) SAVE(*YES)
> >         OVRPRTF    FILE(QPRINT) TOFILE(FTPTEST)
> >
> > I would see the log in the spool file.
> >
> > I have just added:
> >
> >          CRTPF      FILE(QTEMP/FTPTST) RCDLEN(198)
> >          OVRDBF     FILE(OUTPUT) TOFILE(QTEMP/FTPTST) MBR(FTPTST)
> >          CPYF       FROMFILE(QTEMP/FTPTST) TOFILE(*PRINT) +
> >                     FROMMBR(FTPTST) OUTFMT(*CHAR)
> >
> > I can now see the info in a spool file, so I know that the log 
> > information does exist, but it doesn't explain why the
> > CRTPRTF    FILE(QTEMP/FTPTEST) HOLD(*YES) SAVE(*YES)
> > no longer works.
> >
> > <<SNIP>>