MVSFORUMS.com

yadav2005 · Intermediate Joined: 10 Jan 2005 Posts: 348 Topics: 144

Hai All,

I am getting Reason code 2080 when i am trying to get a read a message from the MQ Queue and i have used the option :

kolusu · Posted: Thu May 03, 2007 7:33 am Post subject:

yadav2005,

That is just a warning message. However you need to increase the buffer length. Did you do that?

If it is alright to accept truncated messages then change to this parm MQGMO_ACCEPT_TRUNCATED_MSG = yes

Hope this helps..

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

Bill Dennis · Posted: Thu May 03, 2007 7:50 am Post subject:

Perhaps the OPTIONS are getting changed again before the call? Can you post all code from options set to the GET?
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.

yadav2005 · Intermediate Joined: 10 Jan 2005 Posts: 348 Topics: 144

Thanks Kolusu and Bill,

Let me explain what is my requirement:

I have a COBOL Program which reads messages one by one from the MQ Queue and does an implict deletion of the messages from the Queue and whatever the messages are read i am storing them in a file so as to make the Queue empty instead of getting fulled up and i am putting the last message only back to the Queue everytime the program is run by this way i am always having at least 1 message in the queue.The job when run for the first time it was fine and it was able to read all messages from the queue successfully and created a file with same no of deleted messages and display of how many messages deleted also was shown properly and the last message was put in the queue.

Later on with that 1 message already on queue , 10 more messages were put on the queue and the job was run again but this time it was able to read all messages and create an output file with 11 messages but before putting back the last message it got disconnected from the queue manager and Reason code is 2080 i got info through some other system in our flow of jobs.

Kolusu how can i change MQGMO_ACCEPT_TRUNCATED_MSG = yes

I am posting my code , please help me what is the problem.

Bill Dennis · Posted: Thu May 03, 2007 11:26 am Post subject:

1) AFter you compute MQGMO-OPTIONS with the options you want, a different option, MQGMO-CONVERT, is MOVEd to MQGMO-OPTIONS. I expect that the MOVE nullifies the action of the COMPUTE.

2) I don't understand why you want to always put one message back on the queue? Can you explain?
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.

dbzTHEdinosauer · Posted: Thu May 03, 2007 1:00 pm Post subject:

Mr Dennis,

as usual, you went straight to the heart of the problem. good eyes...!

yadav2005,

i would also like to know, why are you putting the last on the queue?

how about a little idea of what you are tasked with doing?
_________________
Dick Brenholtz
American living in Varel, Germany

yadav2005 · Intermediate Joined: 10 Jan 2005 Posts: 348 Topics: 144

Thanks Bill and dbzTHEdinosauer,

I am purposefully putting the last message back to the Queue so that the MQ Queue is not empty at any point of time and it has at least one message and moreover i want my program to do a PUT also a message in the queue in addition to GET.

dbzTHEdinosauer · Posted: Fri May 04, 2007 2:58 am Post subject:

Nic Clouston · Posted: Fri May 04, 2007 2:59 am Post subject:

It is the 6th MOVE after your COMPUTE - it is in the code you posted.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

dbzTHEdinosauer · Posted: Fri May 04, 2007 3:04 am Post subject: