I have a message that is sent each time that a JDBC connection is made.



Message ID . . . . . . : CPC2196 Severity . . . . . . . :
00
Message type . . . . . :
Completion
Date sent . . . . . . : 08/18/09 Time sent . . . . . . :
14:31:07


Message . . . . : Library G3DEV added to library
list.
Cause . . . . . : If the ADDLIBLE command was used, G3DEV was added to
the
user library list. If the CHGSYSLIBL command was used, G3DEV was added
to
the system portion of the library
list.

In a CL program, I want to receive this message.

I set up a loop and do a RCVMSG but I don't ever see the message. I have
tried all kind of combinations on the RCVMSG but none do the trick. It has
been awhile since I fooled with this stuff.

Anybody got an idea how to see that message?

DOUNTIL COND(0 = 1)
RCVMSG PGMQ(*EXT) MSGTYPE(*COMP) RMV(*NO) +
MSGDTA(&MSGDTA) MSGID(&MSGID)
MONMSG MSGID(CPF0000) EXEC(LEAVE)
IF COND(&MSGID *EQ ' ') THEN(LEAVE)
IF COND(&MSGID *EQ 'CPC2196') THEN(DO)
CHGVAR VAR(&LIBNAME) VALUE(%SST(&MSGDTA 1 10))
LEAVE
ENDDO
ENDDO

This thread ...


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

This mailing list archive is Copyright 1997-2020 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].