グローバルの COBOL ランタイム環境を整理します。
制約事項: この関数は、ネイティブ COBOL でのみサポートされます。
構文:
#include "cobmain.h"
int cobtidy (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 システムで割り当てられたデータ領域を解放します。
この関数は、COBOL システムを終了する場合に、まだ終了する準備ができていない状態で使用します。成功時には 0 を返します。
COBOL プログラムからは呼び出さないでください。
この関数は、すべての COBOL モジュールが終了し、再び呼び出さない場合にのみ呼び出せます。COBOL エントリ ポイントや COBOL ルーチン (cobinit() など) を cobtidy() の後で呼び出すと、その結果は予測できません。