7.7 COBOLアプリケーション使用時の注意事項

Interstage Application Server アプリケーション作成ガイド（CORBAサービス編）

目次索引

第7章アプリケーションの開発（COBOL）

7.7 COBOLアプリケーション使用時の注意事項

“CORBAアプリケーション開発時の留意事項”についても参照してください。

メッセージについて

COBOLアプリケーション実行時に、COBOLランタイムライブラリからメッセージが表示される場合があります。JMPではじまるメッセージが出力されていた場合は、COBOL使用手引書（実行時のメッセージ）を参照してください。

関数名／変数名の扱い

関数名/変数名の長さは30文字までです。30文字を超える場合、30文字以降を切り捨てます。
関数名/変数名の文字長が30文字を超える場合で、同一名になる場合、27文字目以降を数値に置き換えます。
アンダースコア("_")は、COBOLで使用できないため、ハイフン("-")に置換します。ただし、オペレーション名、インタフェース名で使用されているアンダースコア("_")はそのまま使用します。
IDLファイルからクラス名と変数名の関係で、同じ名称に変換される場合、以下のケースで変数の型等が不明になるため、使用してはいけません。
typedef long foo_bar;
interface foo { typedef short bar; };

予約語の扱い

COBOLの予約語の文字列がIDLファイルに記述されている場合、文字列の前に"IDL-"を付加します。予約語については、COBOLのマニュアルを参照してください。
const宣言は、COBOLの"SYMBOLIC CONSTANT"になります。OMG規定では">>CONSTANT"文節に対応しますが、COBOLで未サポートのため"SYMBOLIC CONSTANT"になります。

NVList使用方法

COBOLでのNVListは、NamedValue構造体（登録集NAMEDVALUE.cbl）の配列を指すアドレスを格納するポインタです。
パラメタの設定は、CORBA-NVLIST-ADD-ITEMで行います。その際、以下の点に注意が必要です。

LIST

　初期化（CORBA-ORB-CREATE-LIST使用）が必要です。
ITEM－NAME

　CORBA-STRING-SETで値を設定されたポインタを指定し、省略時にはNULLを指定してください。
ITEM－TYPE

　CORBA-TYPECODE-FROM-CGEN-TCで作成されたTYPECODEを指定します。省略不可。
注) CORBA-ORB-TYPECODE-FROM-CGEN-TCに指定できるパラメタは、登録集CONST.cblに記載されている基本型のTC-XXX、登録集で頭にTCのつくもの、またはIDLコンパイルで作成されるIDLファイル名_h.cblに定義されている、TC-XXX-IMPL-SEQを使用します。
VALUE

　パラメタの値のアドレスを設定します。（注意、STRINGやOBJECTのようなポインタで扱われるデータも、FUNCTION ADDRでアドレスを取り出して設定します。）ITEM-FLAGにCORBA-ARG-OUTなどを指定するときは、NULLを設定します（要）。
VALUE-LEN

　VALUEの領域の長さを指定します。省略時は、0を指定します。
ITEM-FLAGS

　登録集FLAGS.cblを使用します。省略不可。
領域の解放
NVList自体を解放するときは、CORBA-NVLIST-FREE、NVListに設定された値だけを解放したいときは、CORBA-NVLIST-FREE-MEMBERを使用します。

文字列の設定について

関数で文字列をパラメタに持つ場合、文字列をCORBA-STRING-SET関数で設定する必要があります。以下に例を示します。

  *文字列の長さを求めます
   MOVE FUNCTION LENG (CORBA-ORB-OBJECTID-IMPLREP) TO STRING-LENGTH. 
  *文字列を作業用のTEMP-BUFに格納します
   CALL "CORBA-STRING-SET" USING
         TEMP-BUF
         STRING-LENGTH
         CORBA-ORB-OBJECTID-IMPLREP. 
  *関数を呼び出します
   CALL "CORBA-ORB-RESOLVE-INITIAL-REFERENCES" USING
         ORB
         TEMP-BUF
         ENV
         IMPL-REP.

PIC X(m)で宣言されたin,out,inoutの各文字型への代入は、MOVE命令で行います。ただし、COBOL以外にマッピングされたアプリケーションで扱える文字列長は'\0'を含みます。
日本語文字列を扱う場合、COBOLの日本語項目N（またはNC）から文字項目Xに直接代入することはできません。CORBA-STRING-SET関数またはCORBA-WSTRING-SET関数でNULL文字を設定したうえで使用してください。なお、文字列の取出しはCORBA-STRING-GET関数またはCORBA-WSTRING-GET関数を使用します。

Windows(R)アプリケーション作成時／運用時の注意事項

サーバアプリケーションは、動的リンク構造（主プログラムのロード時に、呼び出される関数すべてをロードする）で作成する必要があります。
動的プログラム構造（ロードが関数の呼出し時に行われる）では、作成しないでください。
このため、アプリケーションの翻訳時は、翻訳オプションとしてDLOADオプションは指定しないでください。
サーバアプリケーションのメソッド部では、DISPLAY文を使用しないでください。
サーバアプリケーションで各インタフェース使用時にオブジェクトへのポインタが渡された場合、ユーザ例外を返すことがあります(例外コード:"BAD PARAM")。ENVIRONMENTをパラメタに持つ場合には、例外情報を参照してください。
サーバアプリケーションをshared、unsharedタイプとしてインプリメンテーションリポジトリに登録する場合は、以下の設定を行ってください。また、インプリメンテーションリポジトリの登録では、設定項目envは使用しないでください。
- システムの環境変数に次の設定を追加してください。
  　@EnvSetWindow=UNUSE
- システムの環境変数PATHに、アプリケーションのメソッド実装部であるDLLファイルのパスを追加してください。
クライアントアプリケーションでは、BOA、ServerRequestインタフェースは使用できません。
アプリケーションの運用前に以下の環境変数を設定する必要があります。
- @WinCloseMsg=OFF
クライアントアプリケーションとサーバアプリケーションを同一フォルダで作成しないでください。クライアントアプリケーションとサーバアプリケーションとで同名のオブジェクトファイルが生成され、アプリケーションが異常な動作をする可能性があります。

Windows(R)アプリケーションの作成

　Windows(R)でCOBOLアプリケーションを作成する場合の注意点を以下に示します。

備考

　CORBAサービスのインストールフォルダを"C:\Interstage\ODWIN"として説明します。

クライアントアプリケーションの作成

　クライアントアプリケーションを作成する場合の翻訳・リンク手順を以下に示します。

翻訳・リンク手順

IDLコンパイルを実行します。
　IDLc -cobol IDLファイル名
1.で生成されたスタブ、CDRソースをCOBOLソースファイルに登録し、主プログラムと合わせて翻訳します。翻訳時に「翻訳オプション」として以下のフォルダ配下の登録集を指定します。
　CORBA=C:\Interstage\ODWIN\INCLUDE\COBOL
「翻訳オプション」には以下のファイルを指定します。
［プロセスモードの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBL.LIB
［スレッドモードの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLMT.LIB
［UNICODE、UTF8の場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLUC.LIB

サーバアプリケーションの翻訳・リンク

　サーバアプリケーション作成時の翻訳・リンク手順と指定するファイル・オプションを以下に示します。

翻訳・リンク手順

IDLコンパイルを実行します。
　IDLc -cobol IDLファイル名
1で生成されたスケルトン、CDRソースを翻訳し、オブジェクトファイル(*.obj)を作成します。プロジェクトマネージャを起動し、「ツール」の「翻訳」を選択して「翻訳時の指定」のファイル・オプションを指定します。
サーバアプリケーションのメソッド部(サーバの実処理)を、同様の手順で翻訳します。（Windows(R)アプリケーション作成時／運用時の注意事項を参照）
翻訳したオブジェクトを結合し、DLLファイルを作成します。DLLファイル名は、モジュール名-インタフェース名.DLLです。「ツール」の「リンク」を選択し、以下のファイルと共に指定します。
［プロセスモードの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLSV.LIB
［スレッドモードの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLMTSV.LIB
［UNICODEの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLSVUC.LIB
サーバアプリケーションのメイン処理を主プログラムとして、実行プログラムを作成します。この際以下のファイルと共に指定します。
［プロセスモードの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLSV.LIB
［スレッドモードの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLMTSV.LIB
［UNICODEの場合］
　C:\Interstage\ODWIN\LIB\ODCOBCBLSVUC.LIB
OD_impl_instコマンドでサーバアプリケーションを登録します。実行時に指定する定義ファイルは、サンプルプログラムの以下のファイルを参照してください。
　C:\Interstage\ODWIN\SRC\SAMPLE\COMPLEX\SAMPLELIST.COBOL\DATA\*\*.DEF
注）modeは、SYNC_ENDを設定してください。
　　DLLは、DLL名のみを設定し、環境変数PATHにDLLのパスを追加してください。

翻訳対象ファイル

IDLファイル名_インタフェース名_SKEL.CBL
IDLファイル名_CDR.CBL
IDLファイル名_SKEL.CBL

（IDL定義により生成されないこともあります。）

翻訳オプション

［共通］

NAMEオプションを指定してください。
DLOADオプションは指定しないでください。

［スレッドモードの場合］

THREAD(MULTI)オプションを指定してください。

［UNICODE、UTF8の場合］

RCSオプション（UCS2-Unicode(UCS2)を使用する）を指定してください。

登録集の指定

　CORBA=C:\Interstage\ODWIN\INCLUDE\COBOL

生成ファイル

　モジュール名-インタフェース名-オペレーション名.OBJ
　スケルトン、CDRソースで定義された目的オブジェクト

目次索引