#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 を返します。