| Author |
Message
|
| mq_series |
 Posted: Wed Nov 06, 2002 10:29 pm Post subject: Help Please MQSeries and IMS |
 |
|
Apprentice
Joined: 29 Oct 2001
Posts: 30
|
Hi,
Can we use OTMA bridge for incoming requests and IMS adapter for sending replies.
I mean to ask can we use GU call for reading the MQseries input message and use MQCONN,MQPUT calls for sending replies in the same IMS application.
Regards
RKV |
|
| Back to top |
|
 |
| RogerLacroix |
| Posted: Thu Nov 07, 2002 9:48 pm Post subject: |
|
|
Jedi Knight
Joined: 15 May 2001
Posts: 3265
Location: London, ON Canada
|
I pretty sure the answer is no but I will defer to anyone who has actually tried this.
A better question is WHY?
I mean if you can do MQCONN, MQOPEN, MQPUT, etc.. then why can't you do MQOPEN, MQGET, etc.. ? Not having the MQ IMS Bridge in the middle will also shave off a few milliseconds from your transaction.
later
Roger...
_________________
Capitalware: Transforming tomorrow into today.
Connected to MQ!
Twitter |
|
| Back to top |
|
|
| mq_series |
| Posted: Sun Nov 10, 2002 10:15 pm Post subject: |
|
|
Apprentice
Joined: 29 Oct 2001
Posts: 30
|
Thanks Boss for your reply.
Can you please guide me on this .
1) The Incoming as well as Outgoing message are using MQRFH2 header.Can we use cobol structures like
01 INPUT-MSG.
03 w001-MQRFH-HEADER.
05 w001-MQRFH-STRUCID PIC X(04) VALUE 'RFH '.
05 w001-MQRFH-VERSION PIC S9(09) BINARY VALUE 2.
05 w001-MQRFH-STRUCLENGTH PIC S9(09) BINARY VALUE Length of the RFH Header.
05 w001-MQRFH-ENCODING PIC S9(09) BINARY VALUE Encoding of the target platform.
05 w001-MQRFH-CODEDCHARSETID PIC S9(09) BINARY VALUE Coded Character SetID of the target platform.
05 w001-MQRFH-FORMAT PIC X(0 VALUE SPACES.
05 w001- MQRFH-FLAGS PIC S9(09) BINARY VALUE 0.
05 w001-MQRFH-NMVALUECCSID PIC S9(09) BINARY VALUE Coded Character SetID target platform.
05 w001-MQRFH-NMVALUELEN PIC S9(09) BINARY VALUE Sum of Lengths of the next 2 fields viz MQRFH-NMVALUEDATA-1 & MQRFH-NMVALUEDATA-2 .
05 w001-MQRFH-NMVALUEDATA-1 PIC X(xx) VALUE ------------------------
for reading the input message and a similar structure as shown below for doing the MQPUT .Why I am asking this because I think for reading /sending the cobol structure must not be preceded with w001 or w002.Please correct me if I am wrong.
01 OUTPUT-MSG.
03 woo2-MQRFH-HEADER.
05 woo2-MQRFH-STRUCID PIC X(04) VALUE 'RFH '.
05 woo2-MQRFH-VERSION PIC S9(09) BINARY VALUE 2.
05 woo2-MQRFH-STRUCLENGTH PIC S9(09) BINARY VALUE Length of the RFH Header.
05 woo2-MQRFH-ENCODING PIC S9(09) BINARY VALUE Encoding of the target platform.
05 woo2-MQRFH-CODEDCHARSETID PIC S9(09) BINARY VALUE Coded Character SetID of the target platform.
05 woo2-MQRFH-FORMAT PIC X(0 VALUE SPACES.
05 woo2- MQRFH-FLAGS PIC S9(09) BINARY VALUE 0.
05 woo2-MQRFH-NMVALUECCSID PIC S9(09) BINARY VALUE Coded Character SetID target platform.
05 woo2-MQRFH-NMVALUELEN PIC S9(09) BINARY VALUE Sum of Lengths of the next 2 fields viz MQRFH-NMVALUEDATA-1 & MQRFH-NMVALUEDATA-2 .
05 woo2-MQRFH-NMVALUEDATA-1 PIC X(xx) VALUE ------------------------
Regards
RKV |
|
| Back to top |
|
|
| RogerLacroix |
| Posted: Mon Nov 11, 2002 9:56 pm Post subject: |
|
|
Jedi Knight
Joined: 15 May 2001
Posts: 3265
Location: London, ON Canada
|
First you want to use the MQ IMS Bridge now you want to use RFH2. What version of MQ do you have on the mainframe?
RFH2 is ONLY supported by the latest versions of MQ. Just a word of warning, if the your version of MQ does not support RFH2 then handling the binary will be a real pain.
later
Roger...
_________________
Capitalware: Transforming tomorrow into today.
Connected to MQ!
Twitter |
|
| Back to top |
|
|
| mq_series |
| Posted: Tue Nov 12, 2002 12:01 pm Post subject: |
|
|
Apprentice
Joined: 29 Oct 2001
Posts: 30
|
Hi Roger,
Actually request messages are coming from a MQSI hub to MQSeries on mainframe . On mainframe after processing we need to send reply to MQSI hub which will route it to some destination.
RFH2 header is there in both request/reply messages.
The version of MQseries on mainframe is 5.2. I think MQSeries5.2 support RFH2 header.
RKV |
|
| Back to top |
|
|
|
|
