演習 1.3 では、メッセージ・バッファー・クラスの作成を学習します。
この演習を始める前に、「演習 1.2: Web プロジェクト
および Java インターフェースと Java™ 実装のセットアップ」を完了しておく必要があります。この演習では、次のことを行います。
- メッセージ・バッファー・クラスを作成する
- ドックレット注釈を使用してメッセージ・バッファー・クラスを編集する
- 入出力バインディング操作を作成する
- 出力セグメント・データ・マッピングを作成する
- 最初にメッセージ・バッファー・クラスを作成します。 MultiSegOutput プロジェクトを展開し、「Java リソース」を展開してから、「Java ソース」を展開します。
- sample.ims パッケージを右クリックし、「新規」>「クラス」を選択して、「新規クラス」ウィザードを起動します。
- クラスの名前として CCIBuffer を入力します。すべてのデフォルト設定を受け入れます。
- 「終了」をクリックします。Java エディターで CCIBuffer クラスが開きます。
- CCIBuffer クラスのコメント・セクションに、タグ @type-descriptor.message-buffer を入力します。
- Ctrl+S キーを押して、変更を保管します。新規コードは
CCIBuffer.java に
自動生成されることに注意してください。
- 次に、IMS™ トランザクションを実行するメソッドと、入力メッセージ・データ・タイプを作成します。「プロジェクト・エクスプローラー」ビューで、 MSOImpl.java を右クリックし、
「ソース」>「J2C Java Bean へのメソッドの追加」を選択します。
- 「新規 Java メソッド」ページで、「追加」をクリックします。
- Java メソッド名として runMultiSegOutput を入力します。「次へ」をクリックします。
- 入力タイプを定義するために、「新規」をクリックします。
- 「COBOL_to_Java」マッピングを選択します。「参照」をクリックします。
- COBOL ファイル MSOut.cbl を探して選択します。「開く」をクリックします。
- 「次へ」をクリックします。
- 「COBOL インポーター」ページで、「詳細を表示」をクリックします。
- 次のオプションを選択してください。
表 1. COBOL インポーターのパラメーター設定値パラメーター |
値 |
プラットフォーム名 (Platform Name) |
z/OS |
コード・ページ |
IBM-037 |
浮動小数点形式 |
IBM® 16 進数 |
外部 10 進符号 |
EBCDIC |
エンディアン名 |
Big |
リモート整数エンディアン名 |
Big |
引用符名 |
DOUBLE |
TRUNC 名 |
STD |
Nsymbol 名 |
DBCS |
- 「照会」をクリックして、データをロードします。
- データ構造のリストが表示されます。「データ構造 (Data structures)」フィールド
で INPUT-MSG を選択します。
- 「次へ」をクリックします。
- 「Ant スクリプトとしてセッションを保管」を未チェックのままにします。
- 「保管するプロパティー」ページで、デフォルトのクラス名「INPUTMSG」を、
「InputMsg」で上書きします。
「終了」をクリックします。
- 次に、出力メッセージ・データ・タイプを作成します。出力タイプを定義するために、「参照」をクリックします。
- 「データ・タイプの選択」フィールドに CC と入力します。「対応する型」フィールドに「CCIBuffer」が表示されます。
出力タイプとして「CCIBuffer」を選択します。
「終了」をクリックします。
- 「Java メソッド」ページで、「完了」をクリックします。
- 「Java メソッド」ページで、
InteractionVerb が SYNC_SEND_RECEIVE(1) に
設定されていて、送信に続いて受信を実行するよう、IMS との対話が指定されていることを確認します。
- 「終了」をクリックします。
- 次に、出力セグメント・データ・マッピングを作成します。まず、OutputSeg1.java クラスを作成します。 このステップを実行するには、データ・マッピング・ファイルのみを
作成できるよう、独立したデータ・マッピング・ウィザードを使用する必要があります。
- 「ファイル > 新規 > その他 > CICS/IMS Java データ・バインディング」を選択して、「データ・バインディング」ウィザードを起動します。
- 「次へ」をクリックします。
- 「マッピングの選択」リストで「COBOL から Java」を選択します。
「参照」をクリックして、COBOL コピーブック MSOut.cbl 見つけます。
- 「次へ」をクリックします。
- 「COBOL インポーター」ページで、「詳細を表示」をクリックします。
- 次のオプションを選択してください。
表 2. COBOL インポーターのパラメーター設定値パラメーター |
値 |
プラットフォーム名 (Platform Name) |
z/OS |
コード・ページ |
IBM-037 |
浮動小数点形式 |
IBM 16 進数 |
外部 10 進符号 |
EBCDIC |
エンディアン名 |
Big |
リモート整数エンディアン名 |
Big |
引用符名 |
DOUBLE |
TRUNC 名 |
STD |
Nsymbol 名 |
DBCS |
- 「照会」をクリックして、データをロードします。
- データ構造のリストが表示されます。「データ構造」フィールド
で OUTPUT-SEG1 を選択します。
- 「次へ」をクリックします。
- 「保管するプロパティー」ウィザードで、「参照」をクリックして、
先ほど作成した MultiSegOutput プロジェクトを選択します。
- 「参照」をクリックして、パッケージ名 sample.ims.data を選択します。
- 「Java クラス名」を OUTPUTSEG1 から OutputSeg1 に変更します。
- 「終了」をクリックします。
- それでは、OutputSeg2.java クラスを作成します。「ファイル > 新規 > その他 > CICS/IMS Java データ・バインディング」を選択して、「データ・バインディング」ウィザードを起動します。
- 「次へ」をクリックします。
- 「マッピングの選択」リストで「COBOL から Java」を選択します。
「参照」をクリックして、COBOL コピーブック MSOut.cbl 見つけます。
- 「COBOL インポーター」ページで、「詳細を表示」をクリックします。
- 次のオプションを選択してください。
表 3. COBOL インポーターのパラメーター設定値パラメーター |
値 |
プラットフォーム名 (Platform Name) |
z/OS |
コード・ページ |
IBM-037 |
浮動小数点形式 |
IBM 16 進数 |
外部 10 進符号 |
EBCDIC |
エンディアン名 |
Big |
リモート整数エンディアン名 |
Big |
引用符名 |
DOUBLE |
TRUNC 名 |
STD |
Nsymbol 名 |
DBCS |
- 「照会」をクリックして、データをロードします。
- データ構造のリストが表示されます。「データ構造」フィールドで OUTPUT-SEG2 を選択します。
- 「次へ」をクリックします。
- 「保管するプロパティー」ウィザードで、「ブラウズ」をクリックして、
先ほど作成した MultiSegOutput プロジェクトを選択します。
- 「参照」をクリックして、パッケージ名 sample.ims.data を選択します。
- Java クラス名を OUTPUTSEG2 から OutputSeg2 に変更します。
- 「終了」をクリックします。
- それでは、OutputSeg3.java クラスを作成しましょう。「ファイル > 新規 > その他 > CICS/IMS Java データ・バインディング」を選択して、「データ・バインディング」ウィザードを起動します。
- 「次へ」をクリックします。
- 「マッピングの選択」リストで「COBOL から Java」を選択します。
「参照」をクリックして、COBOL コピーブック MSOut.cbl 見つけます。
- 「COBOL インポーター」ページで、「詳細を表示」をクリックします。
- 次のオプションを選択してください。
表 4. COBOL インポーターのパラメーター設定値パラメーター |
値 |
プラットフォーム名 (Platform Name) |
z/OS |
コード・ページ |
037 |
浮動小数点形式 |
IBM 390 16 進数 |
外部 10 進符号 |
EBCDIC |
エンディアン名 |
Big |
リモート整数エンディアン名 |
Big |
引用符名 |
DOUBLE |
TRUNC 名 |
STD |
Nsymbol 名 |
DBCS |
- 「照会」をクリックして、データをロードします。
- データ構造のリストが表示されます。「データ構造」フィールドで OUTPUT-SEG3 を選択します。
- 「次へ」をクリックします。
- 「保管するプロパティー (Saving properties)」ウィザードで、「ブラウズ」をクリックして、
先ほど作成した MultiSegOutput プロジェクトを選択します。
- 「参照」をクリックして、パッケージ名 sample.ims.data を選択します。
- 「Java クラス名」を OUTPUTSEG3 から OutputSeg3 に変更します。
- 「終了」をクリックします。