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.
Syntax:
>>-.---.-.-------COBOL370--"integer"-.-----><
+-/-+ ++----+-COBOL370------------+
+-NO-+
Parameters:
-
integer
- The level of IBM COBOL/370 to be compatible with:
- 1
- Specifies compatibility with Version 1 Release 1 of IBM COBOL/370
- 2
- Specifies compatibility with Version 1 Release 2 of IBM COBOL for MVS and VM
Properties:
| Default:
|
NOCOBOL370
|
| Phase:
|
Syntax check
|
| $SET:
|
Initial
|
Dependencies:
COBOL370 sets DBSPACE and DBCS"3" immediately.
Comments:
Specifying COBOL370 without a parameter is the same as specifying COBOL370"2".