This option defines certain properties of the compilation group.
Format
| |||||||||||||||||||||||||||||||||||||||||||||
SOURCE-PROPERTIES = *STD
The default value of the following PARAMETERS structure is accepted.
SOURCE-PROPERTIES = *PARAMETERS(...)
RETURN-CODE = *FROM-COBOL-SUBPROGRAMS
The special register RETURN-CODE is used for information exchange between the COBOL programs in a compilation unit.
RETURN-CODE = *FROM-ALL-SUBPROGRAMS
The special register RETURN-CODE is also for accepting the function value from a subprogram (register 1).
ENABLE-KEYWORDS = *COBOL85 / *STD
If COBOL85 is specified, the additional keywords reserved by the COBOL2000 compiler (as opposed to those in COBOL85) are not recognized as such and can therefore be used as file names.
XML-SUPPORT = *YES / *NO
If YES is specified, the keywords of the new language elements are recognized for XML processing; these language elements are compiled and the special registers are available.
If NO is specified, the keywords of the new language elements are not reserved for XML processing, and these language elements are not recognized.
STANDARD-DEVIATION = *YES / *NO
If YES is specified, the compiler accepts certain deviations from the rules set out in the COBOL standard:
The address of another section or the contents of a pointer can be assigned to the data descriptions in the Linkage Section (level number 01 or 77) by means of a SET statement even without any BASED specification. No check is then performed to determine whether each used parameter has also been specified in the USING clause of the Procedure Division.
Data structures containing pointer data items or universal object references are also permitted as receiving items.
The following may also be redefined
Data structures containing pointer data items or universal object references, or
Pointer data items or universal object references with level number 01 or 77.
Data structures containing pointer data items or universal object references may also be subject to reference modification.
If YES is specified then the user is entirely responsible for ensuring that data structures are correctly aligned (at word or double word boundaries).
LINE-SEQUENTIAL = *STD / *SEQUENTIAL
If STD is specified, the compiler handles sequential files in compliance with their declarations.
If SEQUENTIAL is specified, the compiler ignores the keyword LINE in SELECT clauses and handles LINE SEQUENTIAL files as if they are with SEQUENTIAL organization.
XML-NAMES = *KEEP / *UPPER
If KEEP is specified, the statement XML GENERATE transfers data item names from the source code to the XML element names without any changes.
If UPPER is specified, the XML element names are additionally converted in upper case.