Re: Display joblog on the screen from a CLP

[Marc Rauzier <marc.rauzier@xxxxxxxxx>]

Le 28/06/2023 à 00:12, Gary Kuznitz a écrit :
> In a CLP I want to show the user if program products are
> installed.
>
> I added these to a CLP to display the program products
> results to the joblog:
> CHKPRDOPT  PRDID(5770SS1) OPTION(30)
> CHKPRDOPT  PRDID(5770SS1) OPTION(33)
> CHKPRDOPT  PRDID(5733SC1) OPTION(*Base)
> CHKPRDOPT  PRDID(5733SC1) OPTION(1)
>
> I'd like to find a way to show the results in the joblog to
> the user screen.
> I thought it might be nice to do it like this:
> DSPJOBLOG  OUTPUT(*OUTFILE)
> OUTFILE(QTEMP/JOBLOG)
> CRTMSGQ    MSGQ(QTEMP/JOBLOG)
> SNDPGMMSG  MSGID(CPF9898) MSGF(QCPFMSG)
> MSGDTA('ERROR: +
>               Unable to Setup Environment') +
>               TOMSGQ(QTEMP/JOBLOG)
> DSPMSG     MSGQ(QTEMP/JOBLOG) OUTPUT(*)
>
> I'd like to find a way to copy the file QTEMP/JOBLOG to
> the Msgq.

Did you think to JOBLOG_INFO service?

You could try to create a QM query from SQL command below:

SELECT * FROM TABLE(QSYS2.JOBLOG_INFO('*'));

Then use STRQMQRY command to display the output. Or use a QM form if you 
want more specific display.