Visual COBOL には、DB2 ECM 向けのさまざまなデモンストレーション アプリケーションやプログラムが用意されています。Windows プラットフォームでは、Visual COBOL サンプル ブラウザーからそれらにアクセスできます。Visual COBOL サンプル ブラウザーを起動する手順については、「サンプル ブラウザーを起動するには」を参照してください。
DB2 ECM – Windows 環境
DB2 ECM のすべてのサンプルは Visual COBOL サンプル ブラウザーの [Show managed only] リストに示されています。
ソース ファイルは %PUBLIC%\Documents\Micro Focus\Visual COBOL\Samples\Eclipse\COBOL\sql\db2ecm のサブディレクトリに格納されています。
各サンプル アプリケーションには、アプリケーションの使用方法を説明する Readme が付属しています。
次のアプリケーションが含まれています。
- DB2 ECM - Connect
- IBM DB2 LUW でサポートされる Type 1 CONNECT を使用して DB2 との接続を確立または解除する構文バリアントを示します。
- DB2 ECM - Db2storedproc
- IBM DB2 LUW で COBOL ストアード プロシージャを作成して呼び出す方法を示します。
- DB2 ECM - Dynamic
- IBM DB2 LUW で動的 SQL を使用して各種の SQL 機能を実行する簡潔な例を示します。このプログラムが STATIC SQL プログラムとして記述されている場合、静的な SQL ではあらかじめテーブルがある必要があり、ないとコンパイラ
エラーが発生するため、プログラムを 2 つのプログラムに分割する必要があります。
- DB2 ECM - LOB Data Types
- LOB LOCATOR および VALUES 関数を使用して DB2 LUW から LOB データを取得する方法を示します。
- DB2 ECM - Select
- シングルトンの SELECT 文とカーソルベースの FETCH 文の両方を IBM DB2 LUW で使用する簡潔な例を示します。
- DB2 ECM - Whenever
- EXEC SQL WHENEVER 文を使用するエラー処理の方法、および DB2(MSGAREA) コンパイラ指令を使用して SQLERRMC で提供される 70 バイト超のエラー メッセージ テキストを取得するための COBOL 変数を指定する方法を示します。
DB2 ECM – UNIX 環境
さまざまな DB2 ECM サンプル プログラムが用意されています。これらのサンプルのソース ファイルは、$COBDIR/demo/db2 に格納されています。
各サンプル プログラムには、プログラムの使用方法を説明する progName.txt ファイルが付属しています。
- db2test1.cbl
- IBM DB2 LUW でサポートされる Type 1 CONNECT を使用して DB2 との接続を確立または解除する構文バリアントを示します。
- db2test2.cbl
- シングルトンの SELECT 文とカーソルベースの FETCH 文の両方を IBM DB2 LUW で使用する簡潔な例を示します。
- dynamic.cbl
- IBM DB2 LUW で動的 SQL を使用して各種の SQL 機能を実行する簡潔な例を示します。このプログラムが STATIC SQL プログラムとして記述されている場合、静的な SQL ではあらかじめテーブルがある必要があり、ないとコンパイラ
エラーが発生するため、プログラムを 2 つのプログラムに分割する必要があります。
- lobdemo.cbl
- LOB LOCATOR および VALUES 関数が DB2 LUW から LOB データを取得する方法を示します。
- whenever.cbl
- EXEC SQL WHENEVER 文を使用するエラー処理の方法、および DB2(MSGAREA) コンパイラ指令を使用して SQLERRMC で提供される 70 バイト超のエラー メッセージ テキストを取得するための COBOL 変数を指定する方法を示します。