COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

You can also use the predefined SEARCH DEFINEs to specify one or more subvolumes to be
searched for unqualified files (see Predefined SEARCH DEFINEs).
edit-file-name
is a file-system file name that identifies an accessible EDIT file. If any of the system, volume, or
subvolume components are omitted, the compiler supplies the missing ones from its process
defaults. edit-file-name can be the name of a DEFINE of the class MAP.
section-name-list
section-name-list can be continued onto subsequent lines, provided that the
edit-file-name and the left parenthesis appear on the same directive line as the keyword
SOURCE. Each continuation line for a SOURCE directive must have a question-mark (?) in the
indicator area. If a SOURCE directive spans multiple lines, they must be consecutive (no blank
lines, comment lines, or program text lines can intervene).
The default for section-name-list is the entire file.
section-name
is the name of a section in an EDIT file (a text-name in the directive SECTION).
NoneDefault:
Must be the last directive on its line.Placement:
NoneDependencies:
When the compiler encounters a SOURCE directive, it suspends reading of the current source file
and begins reading lines from the specified file. If no section-name list appears, the compiler
incorporates the entire file into its stream of source text lines. If a section-name list does appear,
the compiler incorporates text from the designated sections only, in the order in which the sections
appear within the specified file (not in the order of the list). When the compiler reaches the end
of the file specified in the SOURCE directive, or has copied all specified sections, it resumes reading
from the prior source file.
Usage Considerations:
• Effect on Compilation Output Listing
If a SHOWFILE directive is active, when the compilation encounters an input line containing
a SOURCE directive, (assuming that the LIST and NOSUPPRESS directives are active) the
compiler lists the directive line, then a line showing the fully qualified name of the new source
file and the date and time it was last modified.
When no SHOWFILE directive is active (the default condition), the directive line containing
the SOURCE directive appears in the output, but the additional line does not.
570 Program Compilation