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

• Each directive that applies to more than one separately compiled program in the
source-file (for example, ICODE or NOBLANK) must be specified as a
compiler-directive in the compiler command.
• Each separately compiled program in the source-file must end with an END
PROGRAM statement or an ENDUNIT compiler directive.
• In the source-file, compiler directives must be contained in separately compiled
programs. They cannot appear before, between, or after them.
• A COPY or SOURCE statement cannot bring in the beginning or end of a separately
compiled program.
file-name-3
is a disk or nondisk file name. For syntax, see the Guardian Procedure Calls Reference
Manual. The default file-id of file-name-3 is COPYLIB.
define-name
is the name of a DEFINE established in the current run-time environment.
copy-library
is the name of a COPY library, a disk file in EDIT format, which is to be the default COPY
library (for any COPY statement in the source program that does not specify a library from
which to copy).
file-name-4
is a disk file name. For syntax, see the Guardian Procedure Calls Reference Manual. The
default file-id of file-name-3 is COPYLIB.
define-name
is the name of a DEFINE established in the current run-time environment.
compiler-directive
is any directive described in Compiler Directives.
Examples of Commands That Run the Compiler
Each of these commands initiates compilation of the program contained in MYSRC (on the default
system, volume, and subvolume), directing the listing to $SPOOL (a spooler collector):
ECOBOL /IN MYSRC,OUT $SPOOL,PRI 140/MYPROG;INNERLIST
The compiler is to run at a priority of 140. The name of the target file, if the compilation succeeds,
is to be MYPROG on the default system, volume, and subvolume. The directive specifies that a
listing of the mnemonic version of the generated code is to be produced.
The next command initiates compilation of the program contained in file COBOLPRG on system
\MM, volume $DEV, subvolume PYRL and directs that the listing output be discarded:
ECOBOL /IN \MM.$DEV.PYRL.COBOLPRG,OUT/; SETTOG 3
If the compilation succeeds, the loadfile is to be named RUNUNIT. The directive sets a compilation
toggle that presumably governs the inclusion or exclusion of certain portions of the source text.
532 Program Compilation