ILE COBOL プログラムの取り消し

INITIAL 属性のないサブプログラムを EXIT PROGRAM または GOBACK を使用して終了すると、最後に使用された状態のままになります。 AND CONTINUE RUN UNIT 句の指定された EXIT PROGRAM ステートメントを使用するサブプログラムも、最後に使用した状態のままです。 実行単位の中で次にサブプログラムを呼び出すと、内部値はそのままです。 ただし、PERFORM ステートメントはリセットされます。

サブプログラムの内部値を再呼び出し前の初期状態にリセットするには、サブプログラムを取り消さなければなりません。 サブプログラムを取り消すことにより、次の呼び出し時にサブプログラムは初期状態になります。