cobinit

COBOL 環境を初期化し、非 COBOL プログラムからの COBOL プログラムの呼び出しを可能にします。
制約事項: この関数は、ネイティブ COBOL でのみサポートされます。

構文:

#include "cobmain.h"

int cobinit (void);

パラメーター:

なし

説明:

メイン プログラムが COBOL で記述されていない場合は、COBOL プログラムを呼び出す前に cobinit() を呼び出す必要があります。

cobinit() を実行しないと、COBOL プログラムに制御を移したときに初期化エラーが発生する可能性があります。

使用しているプラットフォームによっては、COBOL ランタイム システムのロード時 (プロセスの開始時など) に COBOL 環境が初期化されることもあります。

COBOL 環境がすでに初期化されている場合は、cobinit() がそのまま正常終了します。

この関数は、正常時には 0 を返します。

相当する COBOL 構文:

なし。

例:

次のコード例は、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);
)