CLOSE 文
CLOSE 文は リール/ユニットおよびファイルの処理を終了させる。可能な場合はオプションで、巻き戻し、ロック、または取り外し処理も実行できる。
書き方 1 の構文規則 (レコード順編成ファイル)
REEL および UNIT を指定するのは、SELECT 句で MULTIPLE REEL または MULTIPLE UNIT を指定したファイルに対してのみである。マルチユニット ファイルを認識しない実行時システムでは、CLOSE REEL 文および CLOSE UNIT 文は「空」の文、つまり注記になる。CLOSE REEL 文または CLOSE UNIT 文で閉じた装置では、他に開いているファイルはないことが重要である。 
CLOSE REEL WITH LOCK 文および CLOSE UNIT WITH LOCK 文は、CLOSE REEL FOR REMOVAL と同等として扱われる。- DISP オプションは、テープ ファイルにのみ適用できる。
この用途は注記用のみである。
すべての書き方に関する一般規則 (すべてのファイル)
- CLOSE 文は、開いているファイルにのみ実行できる。
- CLOSE 文が正常に実行されると、file-name-1 に関連付けられたレコード領域は使用できなくなる。CLOSE 文が正常に実行されない場合は、レコード領域の使用状況は不定となる。
STOP RUN 文の実行時に開いているファイルは閉じられる。呼び出される側のプログラムで開かれたファイルが、そのプログラムに CANCEL 文を実行する際に開かれたままである場合、そのファイルは閉じられる。- CLOSE 文が正常に実行されると、閉じたファイルに対して実行単位が保持していたレコード ロックまたはファイル ロックはすべて解除される。
- CLOSE 文を実行すると、file-name-1 に関連付けられた入出力状態の値が更新される。「手続き部」の章の「入出力状態」のトピックを参照。
- ファイルの種類ごとに、CLOSE 文の各形式の実行結果をまとめて次の表に示す。
表 1. ファイルの種類および CLOSE 文の書き方の関係 CLOSE 文の書き方 ファイルの種類 非リール/ユニット レコード順編成単一リール/ユニット レコード順編成複数リール/ユニット 非レコード順編成単一または複数リール/ユニット CLOSE C C、G A、C、G C CLOSE WITH LOCK C、E C、E、G A、C、E、G C、E CLOSE WITH NO REWIND レコード順編成のみ C、HB、C A、B、C X CLOSE REEL/UNIT レコード順編成のみ F F、GF、G X CLOSE REEL/UNIT FOR REMOVAL レコード順編成のみ F D、F、GD、F、G X CLOSE REEL/UNIT WITH NO REWIND レコード順編成のみ X X F、B X 上記の表に示した記号の意味を以下で説明する。入力ファイル、出力ファイル、または入出力ファイルかによって意味が異なる場合は、別の意味を示す。それ以外の場合は、入力ファイル、出力ファイル、および入出力ファイルのすべてに同じ意味が該当する。
すべての書き方に関する一般規則 (すべてのファイル)
- さまざまな記憶媒体に適用される各種 CLOSE 文の効果を示すために、すべてのファイルを以下の種類に分類する。
- 環境部のファイル管理段落でファイルに OPTIONAL を指定しているが、そのファイルが存在しない場合には、そのファイルに関して標準のファイル終了処理は行われない。
- あるファイルに対して REEL または UNIT を指定せずに CLOSE 文を実行すると、そのファイルを参照する他の文 (USING または GIVING を指定した SORT 文または MERGE 文を除く) は明示的にも暗黙的にも実行できなくなる。ただし、そのファイルに介入する OPEN 文を実行すれば、文を実行できるようになる。
- WITH NO REWIND および FOR REMOVAL 指定は、ファイルが存在する記憶媒体に対して適用しなければ、オブジェクト時に効果を持たない。
- WITH LOCK を指定すると、そのファイルはその実行単位の現在の実行中に再度開くことができなくなる。それ以外の場合は、通常の CLOSE が有効になる。 このオプションは、ファイルを共有する際のレコードまたはファイルのロックとは関係がない。