デモンストレーション アプリケーション

Visual COBOL には、OpenESQL ODBC 向けのさまざまなデモンストレーション アプリケーションやプログラムが用意されています。Windows プラットフォームでは、Visual COBOL サンプル ブラウザーからそれらにアクセスできます。Visual COBOL サンプル ブラウザーを起動する手順については、「サンプル ブラウザーを起動するには」を参照してください。

デモンストレーション アプリケーションを使用するには、1 つ以上の ODBC ドライバーをインストールし、デモンストレーションで使用する DNS を作成しておく必要があります。

デモンストレーション.アプリケーションの中には、接続しているデータベースに EMP というテーブルが存在することを要求するものもあります。

すべての OpenESQL ODBC デモンストレーション アプリケーションではコンソール ログが作成され、処理の進行状況を表示し、クエリ結果を表示する場合もあります。また、エラーが発生した場合は、エラー メッセージを表示して終了します。

Windows 環境

ODBC のすべてのサンプルは Visual COBOL サンプル ブラウザーの [Show unmanaged only] リストに示されています。

ソース ファイルは %PUBLIC%\Documents\Micro Focus\Visual COBOL\Samples\Eclipse\COBOL\SQL\openesql のサブディレクトリに格納されています。

OESQL - Getting Started
OpenESQL で静的 SQL を使用して各種の SQL 操作を実行する簡潔な例を示します。CONNECT 文のさまざまなスタイルのデモンストレーションも含まれています。
OESQL - Behavior
データソース名 LocalServer に接続するには、Microsoft SQL Server ODBC ドライバーを使用します。これを行うには、ヘルプ トピックの「ODBC データソース名を設定する」を参照してください。

behavior プログラムは、behavior.cblbehavsub.cbl によって、表を作成し格納します。表の作成後に、BEHAVIOR 指令が同じ不定 COBOL カーソル宣言である、読み取り専用 (behavior.cbl) と更新可能 (behavsub.cbl) をどのように作成するかを確認します。

これは、プロジェクト ディレクトリのトレース ファイル OpenESQLTrace.processID.log で検証できます。ログ ファイルは、behavior.cbl の TRACELEVEL 指令で生成されます。

OESQL - Catalog
[SQL データソース] ダイアログが表示されます。名前を選択するか、または入力し、[OK] をクリックします。[ログイン] ダイアログが表示されます。ログイン名として「admin」を入力し、パスワードは空欄のまま [OK] をクリックします。3 種類のデータ ディクショナリ クエリが実行され、結果が出力されます。
OESQL - Connect
データ ソース、ユーザー名、およびパスワードの入力を求めます。作成したデータ ソースの名前とユーザー名「admin」を入力し、パスワードは空欄のまま Enter キーを押します。異なる構文オプションを使用した 4 種類の接続および接続解除テストが実行されます。5 番目のテストでは、[SQL データソース] ダイアログが表示されます。[マシンデータソース] リストから適切な名前を選択し、[OK] をクリックします。[ログイン] ダイアログが表示されます。ログイン名として「admin」を入力し、パスワードは空欄のまま [OK] をクリックします。5 番目のテストが実行され、プログラムが終了します。
OESQL - Dynamic
OpenESQL で動的 SQL を使用して各種の SQL 操作を実行する簡潔な例を示します。Getting Started のサンプルで使用されているコードと機能的には同じです。
OESQL - Get Diagnostics
Get Diagnostics EXEC SQL 呼び出しを使用して OpenESQL ランタイムから診断情報を取得する方法を示します。このデモは、Microsoft SQL Server のほか、IBM DB2 LUW および Oracle でも動作します。
OESQL - LOB Data Types
OpenESQL を使用してラージ オブジェクト (LOB) を挿入および選択する方法、および OpenESQL で Microsoft SQL Server テーブル内の LOB 列を操作する方法を示します。IBM DB2 LUW および Oracle での手順も示します。
OESQL - Select
サンプル データベースに接続し、顧客コードの入力を求めます。メッセージに表示された BLUEL を入力します。該当の顧客コードの 2 つのフィールドが表示され、顧客コードの入力が再要求されます。ここで Enter キーを押します。地域の入力が求められます。メッセージに表示された CA を入力します。その地域の顧客が一覧表示され、さらに地域の入力が求められます。ここで、Enter キーを押すと、プログラムが終了します。
OESQL - Whenever
EXEC SQL WHENEVER 構文を使用するエラー処理の方法を示します。また、MFSQLMESSAGETEXT 変数を使用して、SQLERRMC フィールドで利用可能な 70 バイト超のエラー メッセージを取得します。

UNIX 環境

これらのサンプルのソース ファイルは、$COBDIR/demo/openesql に格納されています。

各サンプル プログラムには、プログラムの使用方法を説明する progName.txt ファイルが付属しています。

catalog.cbl
catalog.cbl ファイルは、COBOL からの ODBC カタログ機能の使い方を示す OpenESQL のデモンストレーションプログラムです。
dynquery.cbl
dynquery.cbl は 、COBOL からの 動的 SQL 機能の使い方を示す OpenESQL のデモンストレーションプログラムです。ユーザーが何らかの SQL 文を入力し、プログラムがそれらを実行する機能を提供しています。SQL 文を用意する方法を示し、プログラムのコンパイル時に列のタイプがわからない場合に、SQLDA 構造体を使用して、列からデータを取り出す方法を示します。

上記で説明した EMP 表にアクセスしている場合、サンプルのクエリは次のようなものになります。

select FIRST_NAME, LAST_NAME, HIRE_DATE, SALARY from EMP
static.cbl
static.cbl ファイルは、COBOL からの 基本的な SQL 機能の使い方を示す OpenESQL のデモンストレーションプログラムです。INSERT、UPDATE、DELETE、SELECT INTO および カーソルを使用した SELECT の使い方の例を解説しています。また、COMMIT および ROLLBACK の使い方も示しています。
testconn.cbl
testconn.cbl ファイルは、CONNECT 文と DISCONNECT 文のさまざまなフォーマットの使用方法を示す OpenESQL のデモンストレーション プログラムです。