Specifies that words reserved in the ISO2002 COBOL Standard are to be treated as reserved words, and changes the behavior
of certain features to be compatible with that standard.
Syntax:
>>-.----.-.-ISO2002.-------.-.----><
| | | +"<opt>"+ |
+-/--+ +-NOISO2002--------+
Parameters:
- <opt>
[5]
- <opt> can be one of:
- 1
- This is intended for backwards compatibility with Net Express and Server Express. It includes the following behaviors:
- ANS85 PERFORM VARYING behavior.
- Program names can be the same as data names.
- The COMMUNICATION SECTION will not be recognized.
- The class name in the INHERITANCE clause must be the specified ID in the REPOSITORY paragraph.
- OCCURS ASCENDING/DESCENDING KEY cannot be an OBJECT REFERENCE.
- SOURCE-COMPUTER/OBJECT-COMPUTER not allowed in a FACTORY or OBJECT paragraph.
- CURSOR IS, CURRENCY SIGN, CRT clauses only allowed in outer level SPECIAL-NAMES paragraph.
- ALPHABET, and other SPECIAL-NAMES clauses only allowed in a FACTORY or OBJECT paragraph.
- CURRENCY SIGN SYMBOL literal-1 cannot be E or U.
- ISO2002 additional values for the file status.
- CLASS-ID WITH DATA behavior.
- OBJECT-STORAGE not written to
.cls/.ins files.
- USAGE OBJECT REFERENCE cannot be EXTERNAL, REDEFINES or redefined, or have OCCURS DEPENDING ON.
- Class names are not converted to lowercase.
- CYCLE, PARAGRAPH, ONLY and RELATION are additional context sensitive words.
- 2
-
Note: This option is the equivalent of specifying ISO2002 without a parameter.
Includes all behaviors in ISO2002"1" and the following additional behaviors added since the release of
Visual COBOL:
- PROCEDURE DIVISION/CALL RETURNING behavior.
- USAGE POINTER initialized to NULL.
- VALUE clause extensions for OCCURS.
Properties:
Default:
|
NOISO2002
|
Phase:
|
Syntax check
|
$SET:
|
Initial
|
Comments:
For maximum compatibility with the ISO2002 standard, you should also set the DIALECT"ISO2002" directive.