COBOL 環境を初期化し、非 COBOL プログラムからの COBOL プログラムの呼び出しを可能にします。
制約事項: この関数は、ネイティブ COBOL でのみサポートされます。
構文:
#include "cobmain.h"
int cobinit (void);
例:
次のコード例は、C の main() から COBOL 環境を初期化し、COBOL プログラムを呼び出した後、COBOL 環境を終了します。
main(int argv, char *argv)
{
cobinit(); /* Initialize COBOL environment */
cobcall("cobep", 0, NULL); /* Call a COBOL program */
cobtidy(); /* Close down COBOL environment */
return(0);
)
説明:
メイン プログラムが COBOL で記述されていない場合は、COBOL プログラムを呼び出す前に cobinit() を呼び出す必要があります。
cobinit() を実行しないと、COBOL プログラムに制御を移したときに初期化エラーが発生する可能性があります。
使用しているプラットフォームによっては、COBOL ランタイム システムのロード時 (プロセスの開始時など) に COBOL 環境が初期化されることもあります。
COBOL 環境がすでに初期化されている場合は、cobinit() がそのまま正常終了します。
この関数は、正常時には 0 を返します。