Solved

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

Posted on 2016-11-08
4
17 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
  • 2
  • 2
4 Comments
 
LVL 34

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 34

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

What Should I Do With This Threat Intelligence?

Are you wondering if you actually need threat intelligence? The answer is yes. We explain the basics for creating useful threat intelligence.

Join & Write a Comment

Restoring deleted objects in Active Directory has been a standard feature in Active Directory for many years, yet some admins may not know what is available.
A procedure for exporting installed hotfix details of remote computers using powershell
This video discusses moving either the default database or any database to a new volume.
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…

707 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

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now