Re: Sending a message waiting for a reply

["Captain Jerry" <captainjerry@xxxxxxxxx>]

We just put this in a CLLE... Would it work through QCMDEXC?  Not sure...

SNDUSRMSG  MSG('To Operator, Please End QINTER.  Then  +
             Reply any answer to continue WDAILYJOB, +
             ONLY AFTER QINTER IS DOWN.  Thank you.') +
             MSGTYPE(*INQ) TOMSGQ(QSYSOPR)

=========================================================


On 10/5/07, Alan Shore <AlanShore@xxxxxxxx> wrote:
> I know that the response to this is going to mean that I am going to slap
> my forehead when (and if) I get a response to this.
> Its Friday afternoon, and my brain is just NOT working (has it ever)
> Any, in my free-form RPG program, I need to send a message to the
> operators, waiting for a reply (with ONLY one character values - like Y,
> N,
> C, I - being valid)
> Can any one help?
> PLEASE!!!!!
>
> Thanks in advance
>
>
>
> Alan Shore
>
> NBTY, Inc
> (631) 244-2000 ext. 5019
> AShore@xxxxxxxx
> "If you're going through Hell, keep going" - Winston Churchill
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.