Message Q monitoring

[Guest.Visitor]

HI there, I am wanting to monitor QSYSOPR MSGQ for specific messages. Then report inhouse program failures, certain system messages etc , to another AS/400. I am OK with the RUNRMTCMD - but not sure how to check QSYSOPR from a program (or whatever). TIA

[Guest.Visitor]

Carl, the process is pretty simple -- change the message queue to have a Break Handling program. From the CL Programming Reference: The following program (PGMA), which consists of only this one procedure, is an example of a break-handling program. PGM PARM(&MSGQ &MSGLIB &MRK) DCL VAR(&MSGQ) TYPE(*CHAR) LEN(10) DCL VAR(&MSGLIB) TYPE(*CHAR) LEN(10) DCL VAR(&MRK) TYPE(*CHAR) LEN(4) DCL VAR(&MSG) TYPE(*CHAR) LEN(75) RCVMSG MSGQ(&MSGLIB/&MSGQ) MSGKEY(&MRK) + MSG(&MSG) . . . ENDPGM After the break-handling program is created, running the following command connects it to the QSYSMSG message queue. CHGMSGQ MSGQ(QSYS/QSYSMSG) DLVRY(*BREAK) PGM(PGMA)

[Guest.Visitor]

Help/Systems market a suite of products that would allow you to do this and allow responding from the remote as/400. You can also set up auto responses for any message you desire. Paul L.