Specifies that the record buffer for a file should be cleared after every write operation.
>>-.---.-.-------FDCLEAR--"integer"--.----->< +-/-+ +.----.-FDCLEAR-------------+ +-NO-+
integer | Must be one of:
|
Default: | NOFDCLEAR (DIALECT DIALECT |
Phase: | Syntax check |
$SET: | Any |
The FDCLEAR directive is effective while the SELECT clauses are being processed. Use $SET statements before and after each SELECT clause to apply this feature to selected files. Alternatively, use it once before processing any SELECT statements to apply it to all files in a program.
The FDCLEAR directive is ignored for files subject to a SAME RECORD AREA clause in the I-O-Control paragraph.
Specifying FDCLEAR with no parameter has the same effect as specifying FDCLEAR "1".
In the following code, FDCLEAR is applied only to file-2:
file-control. select file-1 ... $set fdclear select file-2 ... $set nofdclear select file-3 ...