Re: OUTPUT(*NONE) prints compile anyway

[Mark Murphy <jmarkmurphy@xxxxxxxxx>]

CRTSQLRPGI is an odd command as it really starts a pre-compiler, and
parameters for the command are for that pre-compiler, not the compiler. The
pre-compiler creates an RPG source and then executes CRTBNDRPG or
CRTRPGMOD. The OUTPUT(*NONE) parameter applies to the pre-compiler output,
not to the compiler output, and it is not passed along to CRTBNDRPG. But
there are a few things you can do. Create a command override for CRTBNDRPG
which includes OUTPUT(*NONE), or you can use COMPILEOPT('OUTPUT(*NONE)')
which passes OUTPUT(*NONE) to the compiler. In order to prevent all output,
you need both. OUTPUT(*NONE) prevents the spool file generated by the
pre-compiler, and COMPILEOPT('OUTPUT(*NONE)') stops the spool file
generated by the compiler.

On Mon, Aug 5, 2019 at 12:21 PM T. Adair <tadair@xxxxxxxxxxxxxxxx> wrote:

> I am currently creating an application to compile all RPGLE/SQLRPGLE
> programs that reference a particular file.  I call my new CL pgm with a
> single parameter of the filename, which then passes it into my new RPGLE
> program, which then loops through and compiles every program that
> references the filename passed.  This is working very well with one
> exception - the CRTBNDRPG & CRTSQLRPGI commands that I build within the
> new program specify OUTPUT(*NONE), and yet the compile listings are
> generated anyway.  I can run the exact same command interactively and it
> does not generate the compile listings.  Why do these commands, when
> built & run within my new RPG program, ignore the OUTPUT(*NONE)
> directive?  I have debugged my new program and the command is absolutely
> correct.  Example...:
>
> cmd = 'CRTBNDRPG PGM(' + %trim(whlib) + '/' +
>        %trim(whpnam) + ') SRCFILE(' + %trim(whlib) +
>        '/QRPGLESRC) SRCMBR(' + %trim(whpnam) + ') ' +
>        'OUTPUT(*NONE) ' +
>        'DBGVIEW(*ALL) FIXNBR(*ZONED *INPUTPACKED)';
> success2 = *on;
> monitor;
>      qcmdexc( cmd : %len( %trim( cmd )));
> on-error *ALL;
>      success2 = *off;
> endmon;
>
> Could it have something to do with the Monitor process?  It's working
> perfectly except that it generates the compile listing every time, even
> though I've included the OUTPUT(*NONE) parm.  I can debug and copy/paste
> the exact command that's being generated on an interactive command-line,
> and it works perfectly (no printout).
>
> The field 'cmd' is plenty long enough, so that's not the problem.  We're
> currently on 7.2, but will be moving to 7.3 systems over the next few
> months.
>
> Thoughts?
>
> Thanks in advance.
>
> ~TA~
>
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://amazon.midrange.com