Re: return the binary value in SQL statement.

[Niels Liisberg <nli@xxxxxxxxxxxxxxxxx>]

Gerald,

Perhaps you need to cast it into to bit data to transfer byte for byte
without conversion:

select cast (MESSAGE_KEY as char(4) for bit data)
   into :wMsgKey
  from TABLE(QSYS2.JOBLOG_INFO('*'))
  where MESSAGE_TYPE = 'COMPLETION' ...;

.. is it char(4) ?? can't remember...


case

On Wed, Oct 6, 2021 at 4:10 PM Gerald Magnuson <gmagqcy.midrange@xxxxxxxxx>
wrote:

> doing something wrong.
> using the TABLE(QSYS2.JOBLOG_INFO('*')) function.
> I want to return the MESSAGE_KEY.
>
> D wMsgKey         s              4b 0
> exec sql
>   select MESSAGE_KEY into :wMsgKey
>   from TABLE(QSYS2.JOBLOG_INFO('*'))
>   where MESSAGE_TYPE = 'COMPLETION'
>   ORDER BY ORDINAL_POSITION DESC
>   FETCH FIRST 1 ROWS ONLY;
>
>  on compile I get : SQL0303 Variable WMSGKEY not compatible or value too
> long.
> --
> 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@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://amazon.midrange.com