|
Hmm, To the looks of things, the program that is run when a message is received is run in the job that sent the message. I think you may have to monitor the message que for qsysopr manually to accomplish what you want to do. Ron Power Programmer Information Services City Of St. John's, NL P.O. Box 908 St. John's, NL A1C 5M2 Tel: 709-576-8132 Email: rpower@xxxxxxxxxx Website: http://www.stjohns.ca/ ___________________________________________________________________________ Success is going from failure to failure without a loss of enthusiasm. - Sir Winston Churchill Steven.Gray@xxxxxxxxxxxxxx Sent by: rpg400-l-bounces@xxxxxxxxxxxx 17/09/2004 01:58 PM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> To rpg400-l@xxxxxxxxxxxx cc Subject Message Queue Problems All, I am trying to perform the following , Any break messages that appear on the QSYSOPR message queue to be handled by an external program. This program will display the message ID , 1st and 2nd level text fields , as well as any previous replies this message has been answered with before. Ideally this program needs to run when the message is displayed on the message queue. Using CHGMSGQ I can add a Break handling program for the message queue. Ideal I thought (and maybe it still is) So to test this (I obviously did not want to test on QSYSOPR) I chose userA , which has its own message queue called userA on the user profile. The delivery method on the user profile was changed to *BREAK. I have changed userA message queue to Delivery *BREAK and the Break program to my new program. On one screen I signed on as userA , and another screen signed on as userB The next step was to send a message to userA from userB , to see if when the break message broke on userA's screen , my program kicks in. BUT, When I send the message from userB to userA , the break message program runs on userB's screen !!! I am running a CL program on userB which simply runs SNDUSRMSG MSGID(OPS0001) MSGF(AUTOPGMS/OPSMSGF) TOUSR(userA) Anybody have any ideas where I am going wrong. I am pretty sure that I am nearly there , just this last crucial step. Regards Steven Gray Senior Analyst ARVAL PHH > _____________________________________________________________________ This e-mail has been scanned for viruses by MCI's Internet Managed Scanning Services - powered by MessageLabs. For further information visit http://www.mci.com -- 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. This e-mail communication and accompanying documents is intended only for the individual or entity to which it is addressed and may contain information that is confidential, privileged or exempt from disclosure under applicable law. Any use of this information by individuals or entities other than the intended recipient is strictly prohibited. If you have received this in error, please notify the sender and delete all the copies (electronic or otherwise) immediately.
As an Amazon Associate we earn from qualifying purchases.
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.
midrange.com
