トランザクション運用のアプリケーションについてCOBOLを使用したサンプルプログラムをそれぞれ以下の内容で説明します。
サンプルプログラムの概要
サンプルプログラムのコンパイル
サンプルプログラムの実行
サンプルプログラムの概要
本サンプルによって行う運用について以下に示します。
本サンプルでは、サーバアプリケーションからSymfoware/RDBにアクセスします。
本サンプルのファイル構成を、以下に示します。
ファイルはすべて、“$TD_HOME/sample/OTS”配下に格納されています。
※$TD_HOMEは、トランザクションサービスのインストールディレクトリを示します。
No | ファイルの概要 | ファイル名 |
|---|---|---|
(1) | Makefile | Makefile |
(2) | IDLファイル | otssample.idl |
(3) | サーバアプリケーションソース | otssample_s.ecob |
(4) | クライアントアプリケーションソース | otssample_c.c |
(5) | ワークユニット定義ファイル | otssample.wu |
(6) | リソース定義ファイル | rdbresource.def |
(7) | サンプルデータベース作成用ファイル | crtdbddl |
(8) | 動作確認用プログラム | rdbselect.ecob |
本アプリケーションのバイナリファイルを生成するためのMakefileです。環境にあわせて一部修正する必要があります。
本サンプルで使用するIDLファイルです。
Symfoware/RDBにアクセスするサーバアプリケーションです。本ソースはCOBOLで記述されています。
トランザクション制御を行うクライアントアプリケーションです。本ソースはC言語で記述されています。
ワークユニット定義を行うための入力ファイルです。環境にあわせて一部修正する必要があります。
Symfoware/RDBを使用するためのリソース定義ファイルです。環境にあわせて一部修正する必要があります。
サンプル用のデータベースを作成するためのファイルです。環境にあわせて一部修正する必要があります。
サンプルアプリケーションが正しく動作するか確認するためのプログラムです。
本サンプルプログラムのほとんどは、そのままではコンパイルができません。各項の説明を良くお読みになり、お使いの環境にあわせて一部を修正する必要があります。
本サンプルプログラムの実行環境や、開発環境（コンパイル環境）は、事前に整えておく必要があります。
サンプルプログラムのコンパイル
コンパイルの方法について説明します。
コンパイルの前の準備について説明します。
(1) Symfoware/RDBがインストールされていることを確認してください。
(2) COBOLコンパイラがインストールされており、かつ動作可能なことを確認してください。
(3) 環境にあわせてMakefileを修正します。
(4) 以下の例に従って環境変数を設定してください。
%setenv OD_HOME /opt/FSUNod
%setenv CORBA ${OD_HOME}/include/COBOL
%setenv OTS_HOME /opt/FSUNots
%setenv TD_HOME /opt/FSUNtd
(5) CORBAサービスが起動していることを確認してください。
アプリケーションをコンパイルする手順を説明します。説明には、以下の記号を使用しま す。
“%”は、一般ユーザ時のプロンプトを示します。
“#”は、スーパユーザ時のプロンプトを示します。
$CURRENTは、本サンプルファイルが存在するディレクトリを示します。
(1) makeコマンドを実行し、コンパイルを行います。
%cd /$CURRENT %make
makeが失敗する場合には、以下のコマンドを実行してください。
%make remake
(2) (1)が失敗する場合は、コンパイルの準備作業を確認してください。
サンプルプログラムの実行方法について説明します。
Interstageのセットアップ
isinitコマンドを投入して、Interstageの動作環境をセットアップしてください。
リソース管理プログラムの作成
Symfoware/RDB用のリソース管理プログラムを、データベース連携サービスのインストールディレクトリ配下の/program/rsc/fjotsrsc_symfoとして提供していますので、それを使用してください。それ以外の場合に作成する必要がある場合は、以下の例を参考にリソース管理プログラムを作成してください。このコマンドによってリソース管理プログラム“rdbresource”が作成されます。
% cd $CURRENT % otslinkrsc -l $OTS_HOME/lib/libotsxasym.o -r "-L$RDBOPT/FSUNrdb2b/lib -lsqldrv -lrdbxa" -o rdbresource
※$OTS_HOMEは、データベース連携サービスのインストールディレクトリです。
※$RDBOPTは、Symfoware/RDBのインストールディレクトリです。
リソース定義ファイルの登録
サンプルのリソース定義ファイルを参照し、動作環境にあわせて修正してください。修正にはテキストエディタを使用してください。リソース管理プログラムの登録には、リソース定義ファイル名を指定して行います。リソース管理プログラムを起動するマシンで、必ずotssetrscコマンドで登録してください。修正したリソース定義ファイルはリソース環境定義ディレクトリに格納してください。
以下の例を参考にSymfoware/RDB用のAPMを作成してください。このコマンドによってAPM“rdb”が作成されます。
# tdlinkapm -l $OTS_HOME/lib/libotsxasym.o -r "-L$RDBOPT/FSUNrdb2b/lib -lsqldrv -lrdbxa" -o rdb
※ $OTS_HOMEは、データベース連携サービスのインストールディレクトリです。
※ $RDBOPTは、Symfoware/RDBのインストールディレクトリです。
サンプルのワークユニット定義ファイルを参照し、動作環境にあわせて修正してください。修正にはテキストエディタを使用してください。
修正したワークユニット定義ファイルは、ワークユニット定義ディレクトリに格納してください。
次にワークユニット定義を登録します。
%isaddwudef otssample.wu
まず、Symfoware/RDBをセットアップし、データベースが作成できる状態にしてください。詳細はSymfoware/RDBのマニュアルを参照してください。
次にサンプルとして準備されているサンプルデータベース作成用ファイルを参照し、動作環境にあわせて修正してください。また、データベーススペース用のローデバイスを用意してください(Solarisの場合)。
最後に以下の例を参考にサンプルデータベースを作成します。ただし、以下の操作は、Symfoware/RDBを起動した後に行ってください。 rdbddlexおよびrdbfmtの詳細は、Symfoware/RDBのマニュアルを参照してください。
#rdbddlex crtdbddl #rdbfmt -mi -i RDB1.DSICAR
Symfoware/RDBを以下のとおり起動してください。
#rdbstart
isstartコマンドを投入して、Interstageを起動してください。
otsstartrscコマンドを投入して、リソース管理プログラムを起動してください。
以下のとおりリソース管理プログラムを起動します。
#otsstartrsc -pg $TD_HOME/sample/otsc/rdbresouce2 -n rdbresouce2
以下のとおり、ワークユニットを起動します。
%isstartwu OTSSAMPLE
以下のとおり、クライアントアプリケーションを起動します。
%otssample_c
本サンプルプログラムではクライアントアプリケーションを起動するたびにデータベースRDB1のテーブルCAR_TABLEへレコードを追加します。このためクライアントアプリケーションを起動する前後で以下の確認用アプリケーションを実行すると、動作を確認することができます。
%rdbselect
レコードの追加が確認できない場合は、
“$TD_HOME/sample/OTS/OTSSAMPLE/pppp/stdout”(ppppはpid)ファイルを参照し、原因を取り除いてください。