FDCLEAR

書込み操作を行うごとに、ファイルのレコードバッファをクリアするように指定する。

構文:

>>-.---.-.-------FDCLEAR--"integer"--.-----><
   +-/-+ +.----.-FDCLEAR-------------+
          +-NO-+

パラメータ:

integer

いずれかひとつ 1 書込み操作を行うごとに、ファイルのレコードバッファをクリアするように指定する。バッファは DEFAULTBYTE 指令で指定された値にクリアされる。 2 1の場合と同様、レコード バッファはまた、初期のOPEN文後にクリアされる。

属性:

省略値:	NOFDCLEAR (方言 )
段階:	構文チェック
$SET:	任意

説明:

FDCLEAR指令は、SELECT句が処理されている間だけ有効である。選択したファイルにこの機能を適用するには、各SELECT句の前後に$SET 文を用いる。あるいは、すべてのSELECT文を処理する前に一度この指令を用いて、プログラム内のすべてのファイルにこの指令を適用できる。　

I-O-CONTROL段落中にSAME RECORD AREA句が指定されているファイルに関しては、FDCLEAR指令は無視される。

パラメタを用いずにFDCLEARを指定すると、FDCLEAR "1"を指定した場合と同じ効果が得られる。

例:

以下のコードでは、FDCLEARはfile-2に対して適用される。

 file-control.
     select file-1 ...
$set fdclear
     select file-2 ...
"set nofdclear
     select file-3 ...

他参照:

関連項目