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".