05.03.2013 Views

e-business Application Solutions on OS/390 Using ... - IBM Redbooks

e-business Application Solutions on OS/390 Using ... - IBM Redbooks

e-business Application Solutions on OS/390 Using ... - IBM Redbooks

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

BROWSER<br />

HTML<br />

JAVASCRIPT<br />

Webserver<br />

Figure 118. MQM Bridge to IMS Protocol<br />

N<strong>on</strong>-C<strong>on</strong>versati<strong>on</strong>al Transacti<strong>on</strong><br />

C<strong>on</strong>nect<br />

Open Replyqueue<br />

Open toIMSqueue<br />

Put message in toIMSqueue<br />

out of syncpoint<br />

Close toIMSqueue<br />

Get message from Replyqueue<br />

with correlid<br />

Close Replyqueue<br />

Disc<strong>on</strong>nect<br />

MQM V 1.1.4 / 1.2<br />

Manager<br />

M<br />

Q<br />

I<br />

B<br />

I<br />

N<br />

D<br />

A<br />

T<br />

T<br />

A<br />

C<br />

H<br />

M<br />

E<br />

N<br />

T<br />

O<br />

T<br />

M<br />

A<br />

IMS/ESA<br />

In both cases, the MQI/IMS bridge is used to reach IMS. As such, the command<br />

flow used in both cases is about the same. The MQI/IMS bridge uses two<br />

channels through a special storage class defined as communicator with IMS. One<br />

channel will be used as a “To Channel,” the other <strong>on</strong>e is the “From Channel.”<br />

Following are the definiti<strong>on</strong>s of the channels as they were used during our testing.<br />

DEFINE STGCLASS(TOIMSB) PSID(1) DESCR('OTMA TO IMSB') + ▌1▐<br />

REPLACE XCFGNAME(ITSOIMS) XCFMNAME(APIMSA58) ▌2▐<br />

<br />

DEFINE QLOCAL( 'MQS2.TOIMSB' ) + ▌3▐<br />

REPLACE +<br />

COMMON QUEUE ATTRIBUTES<br />

DESCR( 'OTMA TO IMSB' ) +<br />

SHARE +<br />

NOTRIGGER +<br />

DEFSOPT(SHARED) +<br />

DEFPSIST(NO) +<br />

LOCAL QUEUE ATTRIBUTES<br />

GET( ENABLED ) +<br />

STGCLASS(TOIMSB) +<br />

INDXTYPE( NONE )<br />

<br />

DEFINE QLOCAL( 'MQS2.FROMIMSB' ) + ▌4▐<br />

REPLACE +<br />

COMMON QUEUE ATTRIBUTES<br />

DESCR( 'REPLYQ FROM IMSB' ) +<br />

PUT( ENABLED ) +<br />

DEFPRTY( 5 ) +<br />

DEFSOPT(SHARED) +<br />

DEFPSIST(NO) +<br />

LOCAL QUEUE ATTRIBUTES<br />

Chapter 11. Accessing IMS Transacti<strong>on</strong>s from the Web 237

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!