Solved

Answering a message that appears  hundred of times in the QSYSOPR queue.

Posted on 2016-11-08
4
84 Views
Last Modified: 2016-11-09
I received a huge of messages in the QSYSOPR message queue, it is the same message ID,, and I want to answer 'C' to all of them , but as they are a huge , how can I answer or remove them in a single shot?  I tried to clear the hole message queue (qsysopr message queue) but I am not allowed. Is there another way of deleting or answering them?
0
Comment
Question by:Apolo Victores
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
  • 2
4 Comments
 
LVL 35

Expert Comment

by:Gary Patterson
ID: 41880452
If this is a "one time" problem, it is probably fastest to just answer them manually.  You can use the green-screen command DSPMSG QSYSOPR to display all the messages at once.  

They try typing "c" TAB "c" TAB, etc., paging down as needed when you come to the end of the page.  Press Enter and it will answer them all at once.

If this is a recurring problem, there are several ways to address it:

1) Modify the program generating the messages to handle them automatically.

2) Add an entry to the system reply list (WRKRPLE/ADDRPYLE), and change the SBMJOB command or the jobd of the job generating the message to use the system reply list:

http://www.ibm.com/support/knowledgecenter/ssw_i5_54/rbam6/ussrl.htm

3) Write a message monitoring program that monitors the QSYSOPR message queue and automatically handles these messages.

There may be other alternatives, too, depending on the specific message.  Why not post the full message (including second level text)?  We might be able to offer additional suggestions.

- Gary
0
 

Author Comment

by:Apolo Victores
ID: 41880819
Thank you Gary!,,  I am now attaching the messages:

 MCH3601 received by procedure CFO015C1. (C D I R)              
   Reply . . .                                                  
 MCH3601 received by procedure CFO015C1. (C D I R)              
   Reply . . .                                                  
 MCH3601 received by procedure CFO015C1. (C D I R)              
   Reply . . .                                                  
 MCH3601 received by procedure CFO015C1. (C D I R)              
   Reply . . .                                                  
 MCH3601 received by procedure CFO015C1. (C D I R)              
   Reply . . .                                                  
 MCH3601 received by procedure CFO015C1. (C D I R)              
   Reply . . .                                                  

Those are a huge!!,, I think more that 1000  messages!

and this is the details....

                         Additional Message Information                        
                                                                               
 Message ID . . . . . . :   CPA0702       Severity . . . . . . . :   99        
 Message type . . . . . :   Inquiry                                            
 Date sent  . . . . . . :   08/11/16      Time sent  . . . . . . :   16:04:02  
                                                                               
 Message . . . . :   MCH3601 received by procedure CFO015C1. (C D I R)          
 Cause . . . . . :   ILE Control language (CL) procedure CFO015C1 in module    
   CFO015C1 in program CFO015C1 in library BPCSLC detected an error at        
   statement number 0000001500.  Message text for MCH3601 is: Pointer not set  
   for location referenced.  Use F10 (if available) or the Display Job Log      
   (DSPJOBLOG) command to see the messages in the job log for a more complete  
   description of what caused the error.  If you still are unable to solve the  
   problem, please contact your technical support person.                      
 Recovery  . . . :   This inquiry message can be avoided by changing the        
   procedure. Monitor for the error (MONMSG command) and perform error recovery
   within the procedure.  To continue, choose a reply value.                    
                                                                        More...
 Type reply below, then press Enter.                                            
 Reply  . . . .
0
 
LVL 35

Accepted Solution

by:
Gary Patterson earned 500 total points
ID: 41880858
MCH3601 is usually the result of a program being called with a missing parameter, or with a parameter of the wrong length.  I'd have to take a look at the job that is causing these messages, and possibly the source code for the program to tell you why it is happening.

If this keeps happening, you're probably going to need to get a programmer to take a look and see what is happening.

Here is a little CL program (untested!) that you can use to answer the messages for you:

dcl &keyvar *char  4  
dcl &msgid  *char  7  

top: 
   rcvmsg msgq(QSYSOPR) rmv( *no ) keyvar( &keyvar ) msgid( &msgid )
   
   /* No more messages */
   if ( &msgid = ' ' ) return 

   if ( &msgid = 'MCH3601' ) +                                 
      sndrpy msgkey( &keyvar ) msgq(QSYSOPR) rpy( 'C' ) rmv( *no ) 
goto top

Open in new window

0
 

Author Closing Comment

by:Apolo Victores
ID: 41881398
Thank you so much!!
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Did you know that more than 4 billion data records have been recorded as lost or stolen since 2013? It was a staggering number brought to our attention during last week’s ManageEngine webinar, where attendees received a comprehensive look at the ma…
This article describes a method of delivering Word templates for use in merging Access data to Word documents, that requires no computer knowledge on the part of the recipient -- the templates are saved in table fields, and are extracted and install…
The Email Laundry PDF encryption service allows companies to send confidential encrypted  emails to anybody. The PDF document can also contain attachments that are embedded in the encrypted PDF. The password is randomly generated by The Email Laundr…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

763 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question