Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

MQPUT with compcode 2 and reason code 2173

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries
View previous topic :: :: View next topic  
Author Message
senthil_1983

New User


Joined: 16 Apr 2008
Posts: 14
Location: Chennai

PostPosted: Mon Mar 08, 2010 11:26 pm    Post subject: MQPUT with compcode 2 and reason code 2173
Reply with quote

Hi,

During the MQ PUT im receiving the COMPCODE 2 and Reason code 2173.When i checken in IBM manual its mention PUT option error.Can any one let me know how to resolve.
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Mar 09, 2010 1:06 am    Post subject:
Reply with quote

Hello,

Suggest you correct the PUT. . .

Posting "it didn't work" provides nothing for someone to use to help you. If you want someone here to help, you should post the code causing the problem. . .
Back to top
View user's profile Send private message
Karthikeyan Subbarayan

New User


Joined: 24 Feb 2008
Posts: 56
Location: Boston

PostPosted: Tue Mar 09, 2010 1:37 am    Post subject:
Reply with quote

Ensure that input fields in the MQPMO structure are set correctly.
To help more You should post the code causing the problem as DICK said
Back to top
View user's profile Send private message
senthil_1983

New User


Joined: 16 Apr 2008
Posts: 14
Location: Chennai

PostPosted: Tue Mar 09, 2010 10:45 am    Post subject:
Reply with quote

given the code below

Code:
MOVE MQMI-NONE              TO MQMD-MSGID.       
MOVE MQCI-NONE              TO MQMD-CORRELID.   
MOVE MQFMT-STRING           TO MQMD-FORMAT.         
MOVE LENGTH OF WS-RSP-DATA  TO WKMQ-MSGLENGTH.   

CALL 'MQPUT' USING WKMQ-HCONN                   
                   WKMQ-HOBJ                     
                   MQMD                         
                   MQPMO                         
                   WKMQ-MSGLENGTH                                 
                   WS-RSP-DATA                   
                   WKMQ-COMPCODE                 
                   WKMQ-REASON.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Mar 09, 2010 11:10 am    Post subject:
Reply with quote

Hello,

One bit at a time, i suppose. . .

What are the values in all of the named fields before and after the call to mqput?

Also, please note your code has been Code'd which preserves alignment and improves readability.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Tue Mar 09, 2010 11:29 am    Post subject:
Reply with quote

OK, who has the pointer to a current shelf of MQ manuals (damn computer crashes.. icon_cry.gif )....
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10256
Location: italy

PostPosted: Tue Mar 09, 2010 11:48 am    Post subject: Reply to: MQPUT with compcode 2 and reason code 2173
Reply with quote

here is the explanations for 2173 X'087D' ( cut and paste from the manual )
Quote:

MQRC_PMO_ERROR

On an MQPUT or MQPUT1 call, the MQPMO structure is
not valid, for one of the following reasons:

° The StrucId field is not MQPMO_STRUC_ID.
° The Version field specifies a value that is not
valid or not supported.
° The parameter pointer is not valid. (It is not
always possible to detect parameter pointers
that are not valid; if not detected,
unpredictable results occur.)
° The queue manager cannot copy the changed
structure to application storage, even though
the call is successful. This can occur, for
example, if the pointer points to read-only
storage.

Corrective action: Correct the definition of the
MQPMO structure. Ensure that required input fields
are correctly set.


the sequence of links to get to the manuals is ...
http://www-03.ibm.com/systems/z/os/zos/bkserv/index.html
click on
Quote:
z/OS software products Book | PDF

will take You to http://www-03.ibm.com/systems/z/os/zos/bkserv/zapplsbooks.html
click on
Quote:
z/OS software products: DB2 V7 - NCP V7R7 bookshelf - 492 books
List books | Download shelf | Download shelf index
List all bookshelves

will take You to http://www-03.ibm.com/systems/z/os/zos/bkserv/zappls2.html
click on
Quote:
MQSeries - Latest Products - 47 books
List books | Download shelf | Download shelf index

will take You to http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/AMQZA90E
click on search documents, enter 2173, from the list proposed choose
MQSeries for OS/390 Messages and Codes
some more clicks, some scrolling and You will find the actions to be taken
but all the manuals proposed have the appendix with the reason codes explained

anyway the info You posted is not enough to understand what is going on
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Tue Mar 09, 2010 11:57 am    Post subject: Re: Reply to: MQPUT with compcode 2 and reason code 2173
Reply with quote

enrico-sorichetti wrote:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/AMQZA90E
Thanks, I'll bookmark your instructions....grin.....
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts COBOL Code Parsers and Lineage Establ... balimanja COBOL Programming 2 Tue May 02, 2017 3:30 am
No new posts Cobol upgrade - source code missing f... gthmrj IBM Tools 1 Wed Apr 26, 2017 6:04 pm
No new posts JCL to Set Return code based on DB2 S... vinu78 DB2 17 Mon Mar 13, 2017 9:47 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us