You can receive the reply itself with MSGTYPE(*RPY) on the RCVMSG command. Will that fill your needs?

"tim.dclinc" <tim.dclinc@xxxxxxxxx> wrote:

I have a job that monitors the qsysopr msgq. After i issue the chgmsgq
command, the sysoprmsgq program executes and recieves an already
answered
message. Is there a way to determine if the message was already
answered
from the RCVMSG command?



... Set msgq pgm

CHGMSGQ MSGQ(QSYSOPR) DLVRY(*BREAK) +

PGM(QGPL/SYSOPRMSGQ *ALWRPY) MSGQFULL(*WRAP)



... Get message

RCVMSG MSGQ(&LIB/&MSGQ) MSGKEY(&MSGREF) RMV(*NO) +

KEYVAR(&KEYVAR) MSG(&MSG) MSGLEN(&MSGLEN) +

SECLVL(&MSG2) MSGDTA(&MSGDATA) +

MSGID(&MSGID) SEV(&SEV) SENDER(&SENDER) +

RTNTYPE(&RTNTYPE) ALROPT(&ALROPT)

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
Sent from my Galaxy tablet phone with with K-9 Mail. Please excuse my brevity.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.