CCL command is used to compile and Link-Edit a COBOL program.
Normally this task is handled by a Change Control system, but the
overhead of such system tends to be rather annoying on the early stage
of program development when it is necessary to put things together and
to get a clean compile. In such situation the CCL command might
be quite usefull though it's JCL skeleton requires some analysis of a
compile JCL generated by a Change Control system (or corresponding
installation cataloged procedure).
|
|
CCL command tailors the CCL job skeleton according
to parameters specified and sets both short and long (available upon
hitting [F1]) messages for user information.
|
|
CCL command is self-documented; entry of 'CCL ?' will result in
display of the following help window:
|
Usage : CCL command is used to Compile and Link-Edit COBOL program Format: CCL <source>,G(<group>),S,R,C,M,X (all parms except 1-st are opt) <source> - Source/Load partition name or Help display request (/,?,H) G(PGMR) - Source library group M - COBOL MVS (Deflt: COBOL II) S - Precompile SQL and exec BIND X - Compile COBOL with XPediter C - Precompile CICS command level R - Execute GRANT after BIND |
Notes: |
CCL command is a CList which should be placed in a library specified
in a TSO SYSPROC concatenation (use 'TSO ISRDDN' command to see your
current data set allocations).
|
|
In no way CCL command can replace a Change Control
system, it is designed exclusively for early stages of
development.
|
/* CCL COBOL Compile and Link-Edit 07/10/1993–09/24/1997 /* -------------------------------------------------------------------- /* Copyright (C) 1993–1997 by Vladimir Veytsel PROC 1 SOURCE, /* Source/Load partition name or Help request */+ /* 'CCL ?' or 'CCL /' or 'CCL H' - display Help */+ G(PGMR), /* Source library group */+ S, /* Precompile SQL and exec BIND after compile */+ R, /* Execute GRANT after BIND */+ C, /* Precompile CICS command level */+ M, /* Compile COBOL for MVS (Default: COBOL II) */+ X /* Compile COBOL with XPediter */ CONTROL NOCAPS /* CONTROL SYMLIST,CONLIST,LIST,MSG IF ((&STR(&SOURCE)=&STR(/))| + (&STR(&SOURCE)=&STR(?))| + (&STR(&SOURCE)=&STR(h))| + (&STR(&SOURCE)=&STR(H))) + THEN DO SET ZEDLMSG= + &STR(Usage : CCL command is used to Compile and + Link-Edit a COBOL program + Format: CCL