?
Solved

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

Posted on 2016-11-08
4
Medium Priority
?
133 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 2000 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: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering 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

An introduction to the wonderful sport of Scam Baiting.  Learn how to help fight scammers by beating them at their own game. This great pass time helps the world, while providing an endless source of entertainment. Enjoy!
In today's business world, data is more important than ever for informing marketing campaigns. Accessing and using data, however, may not come naturally to some creative marketing professionals. Here are four tips for adapting to wield data for insi…
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…
In this video, Percona Solution Engineer Rick Golba discuss how (and why) you implement high availability in a database environment. To discuss how Percona Consulting can help with your design and architecture needs for your database and infrastr…
Suggested Courses

800 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