isCOBOL Evolve : SDK User's Guide : Compiler and Runtime : Compiler : Compiler Directives : SOURCE Directive
SOURCE Directive
The SOURCE directive sets the format of the source code.
>> SOURCE FORMAT IS { FIXED    }
                    { FREE     }
                    { PREVIOUS }
                    { TERMINAL }
                    { VARIABLE }
 
Syntax:
1. FIXED is ANSI format.
2. FREE is Free format.
3. PREVIOUS restores the format that was set before the last SOURCE directive.
4. TERMINAL is Terminal format.
5. VARIABLE is Variable format.
General rules:
1. The SOURCE FORMAT directive indicates that the source text or library text following the directive and continuing through a subsequent SOURCE FORMAT directive shall be treated as fixed form if FIXED is specified, as terminal form if TERMINAL is specified, as variable form if VARIABLE is specified or as free form if FREE is specified. See Source Formats for more information about the different source formats.
2. The default reference format of a compilation group is fixed form.
3. The default reference format of library text is the reference format that was in effect for the COPY statement that resulted in processing of this library text.
4. If a SOURCE FORMAT directive is specified in library text, the specified format shall be in effect until another SOURCE FORMAT directive is encountered or the end of the library text is reached. When the processing of that library text is completed, the reference format shall revert to the reference format that was in effect for the COPY statement that resulted in processing of that library text.
5. This directive overrides -sa, -sf, -smat, -st and -sv compiler options.
Example
The source code of the following program will be treated according to the FREE format rules:
           >>SOURCE FORMAT FREE
       program-id. eg001.
        ...