Workstationプラットフォームの詳細は、『Oracle Tuxedo Workstationコンポーネントの使用』を参照してください。
以下に、COBOL言語を使用してUNIX上でOracle Tuxedoアプリケーションを開発する場合に、クライアント・プログラムを作成してビルドする方法、および正しい環境変数の設定方法について説明します。
UNIXプラットフォーム用COBOLクライアント・プログラムは、Oracle Tuxedo管理ドメインでCOBOLクライアントを開発する場合と同じように開発できます。すべてのATMI呼出しを使用することができます。
ワークステーション・クライアント・プログラムをコンパイルしてリンクするには、buildclient(1)コマンドを使用します。ネイティブ・ノードでUNIXワークステーション・クライアントをビルドする場合、-w
オプションを指定して、ワークステーション・ライブラリを使用してクライアントがビルドされるようにします。
ネイティブ・ノードでクライアントをビルドする場合に、ネイティブ・ライブラリとワークステーション・ライブラリの両方が存在しているときは、デフォルトでネイティブ・ライブラリが使用されます。その場合、-w
オプションを指定すると、ワークステーション・クライアントに対応するライブラリが必ず使用されます。
ワークステーション・ライブラリのみが存在する場合は、-w
を指定する必要はありません。
リスト12-3は、ネイティブ・ノード上でbuildclient
コマンドを使用する方法を示しています。
ALTCC=cobcc ALTCFLAGS="-I /APPDIR/include"
COBCPY=$TUXDIR/cobinclude
COBOPT="-C ANS85 -C ALIGN=8 -C NOIBMCOMP -C TRUNC=ANSI -C OSEXT=cbl"
export COBOPT COBCPY ALTCC ALTCFLAGS
buildclient -C -w -o empclient -f name.cbl -f "userlib1.a userlib2.a"
-o
オプションは、出力ファイルに名前を指定する場合に使用します。-f
オプションが指定された入力ファイルは、システム・ライブラリの前にリンクされます。
上記のサンプル・コードに示してあるように、TUXDIR
環境変数を使用して、buildclient
コマンドがシステム・ライブラリの場所を認識できるようにします。TUXDIR
は必ず指定してください。CC
環境変数には、デフォルトでcc
が設定されます。ただし、ALTCC
を使用して、別のコンパイラを設定することもできます。
ワークステーション・クライアントでは、いくつかの環境変数を使用します。
表12-1は、ワークステーション・クライアントがアプリケーションに参加する場合に、TPINITIALIZE
で確認される環境変数です。
使用されているOracle Tuxedoシステムのコンポーネントによっては、UNIXワークステーション上のWorkstation COBOLクライアントでほかの環境変数が必要になる場合もあります。
注: | MicroFocusでは、共用オブジェクトとしてLIBNSL.a が提供されています。このオブジェクトは、ワークステーション・クライアントのリンク時にbuildclient で必要になります。MicroFocus COBOLでは、UNIX 3.2上で共用オブジェクトがサポートされていません。そのため、UNIX 3.2版Workstationはサポートされていません。 |
以下に、COBOL言語を使用してMicrosoft Windowsプラットフォーム上でOracle Tuxedoアプリケーションを開発する場合に、クライアント・プログラムを作成してビルドする方法、ACCEPT/DISPLAYクライアントをビルドする方法、ネットワークの動作をブロックする方法、そしてネットワーク環境を復元する方法について説明します。
プログラム固有のすべてのATMI呼出しを使用することができます。
ATMIを呼び出すCOBOLのソース・コードをコンパイルするには、LITLINK
オプションを指定して、COBOLコンパイラを使用する必要があります。ワークステーション・クライアントのオブジェクト・ファイルをリンクするには、buildclient(1)コマンドを使用します。コマンドの構文はわかりやすいものですが、その使い方は使用しているコンパイラによって異なります。
リスト12-2は、buildclient
コマンドの使用方法を示しています。
COBCPY=C:\TUXEDO\COBINC
COBDIR=C:\COBOL\LBR;C:\COBOL\EXEDLL
PATH=C:\COBOL\EXEDLL;...
TUXDIR=C:\tuxedo
LIB=C:\NET\TOOLKIT\LIB;C:\MSVC\LIB;C:\TUXEDO\LIB;C:\COBOL\LIB
buildclient -C -o EMP.EXE -f EMP -f "/NOD/NOI/NOE/CO/SE:300" -l WLIBSOCK
For Windows NT:
buildclient -C -o EMP.EXE -f empobj
表12-2は、前述のサンプル・コードで使用されているbuildclient
コマンドのオプションを示しています。
次のサンプル・コードは、CSIMPAPP
などのACCEPT/DISPLAY
アプリケーションに対する実行可能クライアントをビルドする方法を示しています。
a) compile the COBOL module and create a file.obj
cobol file.cbl omf(obj) litlink;
b) use the following link statement
link FILE+cblwinaf,,,\
wcobatmi+cobws+wtuxws+ \
lcobol+lcoboldw+cobw+cobfp87w+ \
wlibsock,FILE.def /nod/noe;
For Windows NT the link statement is:
cbllink -oEMP.exe EMP.obj \
cobws.lib ncobatmi.lib wtuxws32.lib \
libcmt.lib user32.lib