ICAL SENDRECV MYDDTOR1 001000 00050 00100
ここで、D MYDDTOR1 TYPE=IMSCON TMEMBER=HWS1 TPIPE=SYNCTP04 SYNTIMER=1000
ここで、 *
* IMS Callout Sample copybook
*
*********************************************************************/
* */
* (c) Copyright IBM Corp. 2008 */
* All Rights Reserved */
* Licensed Materials - Property of IBM */
* */
* 保証の不適用。 */
* */
* 以下の「同封された」コードは、専らお客様のアプリケーション開発 */
* の補助を目的としてのみ提供されるものです。 */
* このコードは、現存するままの状態で提供されます。*/
* IBM は、このコードの機能または */
* 性能に関して、明示的にも黙示的にも、法律上の瑕疵担保責任、 */
* 商品性の保証および特定目的適合性の保証についての暗黙の保証を含め */
* (ただし、これらに限定されない) いかなる保証も提供しません。 */
* IBM は、このサンプル・コードの使用から生ずるいかなる損害 */
* に対しても、その予見の有無を問わず、 */
* 責任を負いません。 */
* */
* 配布。 */
* */
* This generated code can be freely distributed, copied, altered, */
* and incorporated into other software, provided that: */
* - It bears the above Copyright notice and DISCLAIMER intact */
* - The software is not for resale */
* */
*********************************************************************/
01 CALLOUT-REQUEST.
05 CALLOUT-REQUEST-STR PIC X(50).
01 CALLOUT-RESPONSE.
05 CALLOUT-RESPONSE-STR PIC X(50).
| パラメーター | 値 |
|---|---|
| プラットフォーム名 | Z/OS |
| コード・ページ | IBM-037 |
| 浮動小数点フォーマット名 | IBM® Hexadecimal |
| 外部 10 進符号 | EBCDIC |
| エンディアン名 | Big |
| リモート整数エンディアン名 | Big |
| Quote 名 | DOUBLE |
| Trunc 名 | STD |
| Nsymbol 名 | DBCS |
| パラメーター | 値 |
|---|---|
| プラットフォーム名 | Z/OS |
| コード・ページ | IBM-037 |
| 浮動小数点フォーマット名 | IBM Hexadecimal |
| 外部 10 進符号 | EBCDIC |
| エンディアン名 | Big |
| リモート整数エンディアン名 | Big |
| Quote 名 | DOUBLE |
| Trunc 名 | STD |
| Nsymbol 名 | DBCS |
public sample.ims.data.CALLOUTRESPONSE invokeCall(
sample.ims.data.CALLOUTREQUEST cALLOUTREQUEST) {
// TODO Need to implement business logic here.
System.out.println("Synchronous callout request from IMS to WebSphere MDB");
System.out.println(cALLOUTREQUEST.getCallout__request__str());
sample.ims.data.CALLOUTRESPONSE response = new CALLOUTRESPONSE();
System.out.println("Synchronous callout response from WebSphere MDB to IMS");
response.setCallout__response__str("HELLO FROM WAS MDB");
return response;
}