Hallo zusammen,

ich führe nachfolgendes SQL aus, welches mir die offenen Meldungen in der QSYSOPR zurück geben soll

SELECT From_Job, Message_Key, Message_Timestamp FROM
qsys2.message_queue_info t1 WHERE t1.message_queue_name = 'QSYSOPR'
and t1.message_type = 'INQUIRY' and not exists (select * from
qsys2.message_queue_info as t2 where t2.message_queue_name =
'QSYSOPR' and t2.associated_message_key = t1.message_key );

Message_key ist varbinary(4)

Mein FETCH sieht wie folgt aus:

c/exec sql
c+ fetch next from c_msg into
c+ :Sql_Job :w@NullJob,
c+ :Sql_MsgKey :w@NullMsgKey,
c+ :Sql_MsgTS :w@NullMsgTS
c/end-exec


Wie muss ich die Variable Sql_MsgKey im RPG definieren damit beim FETCH nicht der Fehler "Variable SQL_MSGKEY nicht kompatibel oder Wert zu lang." kommt ?

Viele Grüße Harald