Specifies that words reserved in IBM COBOL/370 are to be treated as reserved words, and allows features selectively for compatibility with a given level of that product.
>>-.---.-.-------COBOL370--"integer"-.----->< +-/-+ ++----+-COBOL370------------+ +-NO-+
integer | The level of IBM COBOL/370 to be compatible with:
|
Default: | NOCOBOL370 |
Phase: | Syntax check |
$SET: | Initial |
COBOL370 sets DBSPACE and DBCS"3" immediately.
Specifying COBOL370 without a parameter is the same as specifying COBOL370"2".