cobtidy

グローバルの COBOL ランタイム環境を整理します。
制約事項: この関数は、ネイティブ COBOL でのみサポートされます。

構文:

#include "cobmain.h"

int cobtidy (void);

パラメーター:

なし

説明:

この関数は COBOL 環境の初期設定を解除し、バッファーを空きにし、COBOL システムで割り当てられたデータ領域を解放します。

この関数は、COBOL システムを終了する場合に、まだ終了する準備ができていない状態で使用します。成功時には 0 を返します。

COBOL プログラムからは呼び出さないでください。

この関数は、すべての COBOL モジュールが終了し、再び呼び出さない場合にのみ呼び出せます。COBOL エントリ ポイントや COBOL ルーチン (cobinit() など) を cobtidy() の後で呼び出すと、その結果は予測できません。

相当する 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);
}