|
View previous topic :: View next topic
|
| Author |
Message |
Midhun Mohandas
New User
Joined: 03 Mar 2014
Posts: 24
Location: India
|
|
|
|
Hi,
I am sending a message from an application running in windows to z/OS queue. The format of message being send is MQRFH2.
I am receiving the message in z/OS queue but it is getting an abend 2110 (083E) (RC2110): MQRC_FORMAT_ERROR.
The CCSID and Encoding of the message when I am sending it are
The libraries that I have added in cobol program for get message are CMQODV,CMQMDV,CMQGMOV,CMQRFH2,CMQV.
the values that I gave for messagedesc in cobol PROGRAM are
MOVE MQGMO-VERSION-2 TO MQGMO-VERSION
MOVE MQMI-NONE TO MQMD-MSGID
MOVE MQCI-NONE TO MQMD-CORRELID
MOVE MQENC-NATIVE TO MQMD-ENCODING
MOVE MQCCSI-Q-MGR TO MQMD-CODEDCHARSETID
MOVE MQFMT-RF-HEADER-2 to MQRFH-FORMAT.
I am calling 'mqget' in following way
CALL 'MQGET' USING W03-HCONN
W03-HOBJ
MQMD
MQGMO
W00-MSGLENGTH
W00-MSGBUFFER
W00-DATALENGTH
W03-COMPCODE
W03-REASON
*************************************************************
During sending, if I am using the 'FORCED MQRFH2' as message properties, in the application sending message, I am not getting the abend 2110 but I am getting junk values as messages.
Please tell me if I need to change any of these values, so that I will be able to read the messages send in MQRFH2 format will be readable in z/OS. |
|
| Back to top |
|
 |
Midhun Mohandas
New User
Joined: 03 Mar 2014
Posts: 24
Location: India
|
|
|
|
And I would like to add one more thing that I don't think it is a ASCII to EBCIDIC conversion problem, because when I put this messages as 'MQSTR' format from the same application it is displaying perfectly in z/OS. So I think problem is with MQRFH2 format.
Can someone tell what is the use of CMQRFH2V copy files in cobol ? |
|
| Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen
|
|
| Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010
Posts: 3051
Location: NYC,USA
|
|
| Back to top |
|
|
|
|
