SOLVED, Re: Sending messages to user from CL

I wrote:

I have a CL program that communicates with the user mainly via
SNDPGMMSG and SNDUSRMSG. (User interaction is minimal, confined
to confirmation and error messages.)

I now have a situation in which I would like to send a message
requiring no response to the "Display Program Messages" screen,
immediately (i.e., without waiting) before sending one that does
require a response.

In other words, when the "Display Program Messages" screen pops
up, it should show both the first, informational message, and the
second, inquiry message, e.g.,

FOO is in state BAR. Are you sure you wish to perform the BAZ
operation on FOO? (Y N)

I know that sort of thing is easy enough to do with DSPLY
statements in RPG, but at least in the permutations of SNDUSRMSG
and SNDPGMMSG I've tried so far from CL, it always either waits,
or doesn't send the message.

A GOOGLE search turned this up, from user GLS400, on a board at "code400.com":

Code:

SNDPGMMSG MSG(MSG1) TOPGMQ(*EXT) MSGTYPE(*COMP)
SNDPGMMSG MSG(MSG2) TOPGMQ(*EXT) MSGTYPE(*COMP)
SNDPGMMSG MSG(MSG3) TOPGMQ(*EXT) MSGTYPE(*COMP)
SNDPGMMSG MSG(MSG4) TOPGMQ(*EXT) MSGTYPE(*COMP)
SNDUSRMSG MSG('MSG5') MSGTYPE(*INFO)

Results:

MSG1
MSG2
MSG3
MSG4
MSG5

Sure enough, when I changed the first message to a SNDPGMMSG to *EXT of type *COMP (does it get any more counterintuitive than THAT?), I got the desired result. Never heard of "code400.com" before.

Good trick to know, if anybody else here winds up in a similar situation.

--
JHHL