1289 lines
64 KiB
HTML
1289 lines
64 KiB
HTML
|
|
||
|
|
<!doctype html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
|
||
|
|
<html>
|
||
|
|
<head><META http-equiv="Content-Type" content="text/html; charset=utf-8">
|
||
|
|
<title>Create COBOL Module (CRTCBLMOD)</title>
|
||
|
|
<link rel="stylesheet" type="text/css" href="../rzahg/ic.css">
|
||
|
|
</head>
|
||
|
|
<body bgcolor="white">
|
||
|
|
<script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
|
||
|
|
<a name="CRTCBLMOD.Top_Of_Page"></a>
|
||
|
|
<h2>Create COBOL Module (CRTCBLMOD)</h2>
|
||
|
|
<table width="100%">
|
||
|
|
<tr>
|
||
|
|
<td valign="top" align="left"><b>Where allowed to run: </b>All environments (*ALL)<br>
|
||
|
|
<b>Threadsafe: </b>No
|
||
|
|
</td>
|
||
|
|
<td valign="top" align="right">
|
||
|
|
<a href="#CRTCBLMOD.PARAMETERS.TABLE">Parameters</a><br>
|
||
|
|
<a href="#CRTCBLMOD.COMMAND.EXAMPLES">Examples</a><br>
|
||
|
|
<a href="#CRTCBLMOD.ERROR.MESSAGES">Error messages</a></td>
|
||
|
|
</tr>
|
||
|
|
</table>
|
||
|
|
|
||
|
|
<div> <a name="CRTCBLMOD"></a>
|
||
|
|
<p>The CRTCBLMOD command compiles an ILE COBOL source program into a module. You can use this command interactively, in batch mode, or in a CL program.
|
||
|
|
</p>
|
||
|
|
<p>All object names specified for the CRTCBLMOD command must follow server naming conventions.
|
||
|
|
</p>
|
||
|
|
<p>A description of the parameters for the CRTCBLMOD command follows.
|
||
|
|
</p>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<hr size="2" width="100%">
|
||
|
|
|
||
|
|
<div>
|
||
|
|
<h3><a name="CRTCBLMOD.PARAMETERS.TABLE">Parameters</a></h3>
|
||
|
|
<table border="1" cellpadding="4" cellspacing="0">
|
||
|
|
<!-- col1="10" col2="15" col3="30" col4="10" -->
|
||
|
|
<tr>
|
||
|
|
<th bgcolor="aqua" valign="bottom" align="left">Keyword</th>
|
||
|
|
<th bgcolor="aqua" valign="bottom" align="left">Description</th>
|
||
|
|
<th bgcolor="aqua" valign="bottom" align="left">Choices</th>
|
||
|
|
<th bgcolor="aqua" valign="bottom" align="left">Notes</th>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top" rowspan="3"><a href="#CRTCBLMOD.MODULE"><b>MODULE</b></a></td>
|
||
|
|
<td valign="top">Module</td>
|
||
|
|
<td valign="top"><i>Qualified object name</i></td>
|
||
|
|
<td valign="top" rowspan="3">Optional, Positional 1</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Qualifier 1: Module</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>*PGMID</u></b></td>
|
||
|
|
</tr><tr>
|
||
|
|
<td valign="top">Qualifier 2: Library</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>*CURLIB</u></b></td>
|
||
|
|
</tr><tr>
|
||
|
|
<td valign="top" rowspan="3"><a href="#CRTCBLMOD.SRCFILE"><b>SRCFILE</b></a></td>
|
||
|
|
<td valign="top">Source file</td>
|
||
|
|
<td valign="top"><i>Qualified object name</i></td>
|
||
|
|
<td valign="top" rowspan="3">Optional, Positional 2</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Qualifier 1: Source file</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>QCBLLESRC</u></b></td>
|
||
|
|
</tr><tr>
|
||
|
|
<td valign="top">Qualifier 2: Library</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>*LIBL</u></b>, *CURLIB</td>
|
||
|
|
</tr><tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.SRCMBR"><b>SRCMBR</b></a></td>
|
||
|
|
<td valign="top">Source member</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>*MODULE</u></b></td>
|
||
|
|
<td valign="top">Optional, Positional 3</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.SRCSTMF"><b>SRCSTMF</b></a></td>
|
||
|
|
<td valign="top">Source stream file</td>
|
||
|
|
<td valign="top"><i>Path name</i></td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.GENLVL"><b>GENLVL</b></a></td>
|
||
|
|
<td valign="top">Generation severity level</td>
|
||
|
|
<td valign="top">0-30, <b><u>30</u></b></td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.TEXT"><b>TEXT</b></a></td>
|
||
|
|
<td valign="top">Text 'description'</td>
|
||
|
|
<td valign="top"><i>Character value</i>, <b><u>*SRCMBRTXT</u></b>, *BLANK</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.OUTPUT"><b>OUTPUT</b></a></td>
|
||
|
|
<td valign="top">Output</td>
|
||
|
|
<td valign="top"><b><u>*PRINT</u></b>, *NONE</td>
|
||
|
|
<td valign="top">Optional, Positional 4</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.OPTION"><b>OPTION</b></a></td>
|
||
|
|
<td valign="top">Compiler options</td>
|
||
|
|
<td valign="top">Values (up to 50 repetitions): *SOURCE, *NOSOURCE, *SRC, *NOSRC, *NOXREF, *XREF, *GEN, *NOGEN, *NOSEQUENCE, *SEQUENCE, *NOVBSUM, *VBSUM, *NONUMBER, *NUMBER, *LINENUMBER, *NOMAP, *MAP, *NOOPTIONS, *OPTIONS, *QUOTE, *APOST, *NOSECLVL, *SECLVL, *PRTCORR, *NOPRTCORR, *MONOPRC, *NOMONOPRC, *RANGE, *NORANGE, *NOUNREF, *UNREF, *NOSYNC, *SYNC, *NOCRTF, *CRTF, *NODUPKEYCHK, *DUPKEYCHK, *NOINZDLT, *INZDLT, *NOBLK, *BLK, *STDINZ, *NOSTDINZ, *STDINZHEX00, *NODDSFILLER, *DDSFILLER, *NOIMBEDERR, *IMBEDERR, *STDTRUNC, *NOSTDTRUNC, *NOCHGPOSSGN, *CHGPOSSGN, *NOEVENTF, *EVENTF, *MONOPIC, *NOMONOPIC, *NOCRTARKIDX, *CRTARKIDX</td>
|
||
|
|
<td valign="top">Optional, Positional 5</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.CVTOPT"><b>CVTOPT</b></a></td>
|
||
|
|
<td valign="top">Conversion options</td>
|
||
|
|
<td valign="top">Values (up to 8 repetitions): *NOVARCHAR, *VARCHAR, *NODATETIME, *DATETIME, *NOPICXGRAPHIC, *PICXGRAPHIC, *NOPICGGRAPHIC, *PICGGRAPHIC, *NOFLOAT, *FLOAT, *NODATE, *DATE, *NOTIME, *TIME, *NOTIMESTAMP, *TIMESTAMP, *NOCVTTODATE, *CVTTODATE, *NOPICNGRAPHIC, *PICNGRAPHIC</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top" rowspan="3"><a href="#CRTCBLMOD.MSGLMT"><b>MSGLMT</b></a></td>
|
||
|
|
<td valign="top">Message limit</td>
|
||
|
|
<td valign="top"><i>Element list</i></td>
|
||
|
|
<td valign="top" rowspan="3">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 1: Number of messages</td>
|
||
|
|
<td valign="top">
|
||
|
|
0-9999, <b><u>*NOMAX</u></b></td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 2: Message limit severity</td>
|
||
|
|
<td valign="top">
|
||
|
|
0-30, <b><u>30</u></b></td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top" rowspan="3"><a href="#CRTCBLMOD.DBGVIEW"><b>DBGVIEW</b></a></td>
|
||
|
|
<td valign="top">Debug view option</td>
|
||
|
|
<td valign="top"><i>Element list</i></td>
|
||
|
|
<td valign="top" rowspan="3">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 1: Debug view</td>
|
||
|
|
<td valign="top">
|
||
|
|
<b><u>*STMT</u></b>, *SOURCE, *LIST, *ALL, *NONE</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 2: Compress listing view</td>
|
||
|
|
<td valign="top">
|
||
|
|
<b><u>*NOCOMPRESSDBG</u></b>, *COMPRESSDBG</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.OPTIMIZE"><b>OPTIMIZE</b></a></td>
|
||
|
|
<td valign="top">Optimize level</td>
|
||
|
|
<td valign="top"><b><u>*NONE</u></b>, *BASIC, *FULL</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.FLAGSTD"><b>FLAGSTD</b></a></td>
|
||
|
|
<td valign="top">FIPS flagging</td>
|
||
|
|
<td valign="top">Values (up to 2 repetitions): *NOFIPS, *MINIMUM, *INTERMEDIATE, *HIGH, *NOOBSOLETE, *OBSOLETE</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.EXTDSPOPT"><b>EXTDSPOPT</b></a></td>
|
||
|
|
<td valign="top">Extended display options</td>
|
||
|
|
<td valign="top">Values (up to 3 repetitions): *DFRWRT, *NODFRWRT, *UNDSPCHR, *NOUNDSPCHR, *ACCUPDALL, *ACCUPDNE</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.FLAG"><b>FLAG</b></a></td>
|
||
|
|
<td valign="top">Flagging severity</td>
|
||
|
|
<td valign="top">0-99, <b><u>0</u></b></td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.REPLACE"><b>REPLACE</b></a></td>
|
||
|
|
<td valign="top">Replace module</td>
|
||
|
|
<td valign="top"><b><u>*YES</u></b>, *NO</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.AUT"><b>AUT</b></a></td>
|
||
|
|
<td valign="top">Authority</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>*LIBCRTAUT</u></b>, *ALL, *CHANGE, *USE, *EXCLUDE</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.LINKLIT"><b>LINKLIT</b></a></td>
|
||
|
|
<td valign="top">Link literal</td>
|
||
|
|
<td valign="top"><b><u>*PGM</u></b>, *PRC</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.TGTRLS"><b>TGTRLS</b></a></td>
|
||
|
|
<td valign="top">Target release</td>
|
||
|
|
<td valign="top"><i>Simple name</i>, <b><u>*CURRENT</u></b>, *PRV</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top" rowspan="3"><a href="#CRTCBLMOD.SRTSEQ"><b>SRTSEQ</b></a></td>
|
||
|
|
<td valign="top">Sort sequence</td>
|
||
|
|
<td valign="top">Single values: <b><u>*HEX</u></b>, *JOB, *JOBRUN, *LANGIDUNQ, *LANGIDSHR<br>Other values: <i>Qualified object name</i></td>
|
||
|
|
<td valign="top" rowspan="3">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Qualifier 1: Sort sequence</td>
|
||
|
|
<td valign="top"><i>Name</i></td>
|
||
|
|
</tr><tr>
|
||
|
|
<td valign="top">Qualifier 2: Library</td>
|
||
|
|
<td valign="top"><i>Name</i>, <b><u>*LIBL</u></b>, *CURLIB</td>
|
||
|
|
</tr><tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.LANGID"><b>LANGID</b></a></td>
|
||
|
|
<td valign="top">Language id</td>
|
||
|
|
<td valign="top"><i>Character value</i>, <b><u>*JOBRUN</u></b>, *JOB</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top" rowspan="2"><a href="#CRTCBLMOD.ENBPFRCOL"><b>ENBPFRCOL</b></a></td>
|
||
|
|
<td valign="top">Enable performance collection</td>
|
||
|
|
<td valign="top">Single values: <b><u>*PEP</u></b><br>Other values: <i>Element list</i></td>
|
||
|
|
<td valign="top" rowspan="2">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 1: Collection level</td>
|
||
|
|
<td valign="top">
|
||
|
|
<b><u>*FULL</u></b>, *ENTRYEXIT</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.PRFDTA"><b>PRFDTA</b></a></td>
|
||
|
|
<td valign="top">Profiling data</td>
|
||
|
|
<td valign="top"><b><u>*NOCOL</u></b>, *COL</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.CCSID"><b>CCSID</b></a></td>
|
||
|
|
<td valign="top">Coded character set ID</td>
|
||
|
|
<td valign="top"><i>Integer</i>, <b><u>*JOBRUN</u></b>, *HEX, *JOB</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.ARITHMETIC"><b>ARITHMETIC</b></a></td>
|
||
|
|
<td valign="top">Arithmetic mode</td>
|
||
|
|
<td valign="top"><b><u>*NOEXTEND</u></b>, *EXTEND31, *EXTEND63</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top" rowspan="4"><a href="#CRTCBLMOD.NTLPADCHAR"><b>NTLPADCHAR</b></a></td>
|
||
|
|
<td valign="top">Padding character</td>
|
||
|
|
<td valign="top"><i>Element list</i></td>
|
||
|
|
<td valign="top" rowspan="4">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 1: Single byte to national</td>
|
||
|
|
<td valign="top">
|
||
|
|
<i>Character value</i>, <b><u>*DEFAULT</u></b></td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 2: Double byte to national</td>
|
||
|
|
<td valign="top">
|
||
|
|
<i>Character value</i>, <b><u>*DEFAULT</u></b></td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top">Element 3: National to national</td>
|
||
|
|
<td valign="top">
|
||
|
|
<i>Character value</i>, <b><u>*DEFAULT</u></b></td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.LICOPT"><b>LICOPT</b></a></td>
|
||
|
|
<td valign="top">Licensed Internal Code options</td>
|
||
|
|
<td valign="top"><i>Character value</i></td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.INCDIR"><b>INCDIR</b></a></td>
|
||
|
|
<td valign="top">Include directory</td>
|
||
|
|
<td valign="top">Values (up to 32 repetitions): <i>Path name</i>, <b><u>*NONE</u></b></td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.PGMINFO"><b>PGMINFO</b></a></td>
|
||
|
|
<td valign="top">Generate program interface</td>
|
||
|
|
<td valign="top"><b><u>*NO</u></b>, *PCML</td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
<tr>
|
||
|
|
<td valign="top"><a href="#CRTCBLMOD.INFOSTMF"><b>INFOSTMF</b></a></td>
|
||
|
|
<td valign="top">Program interface stream file</td>
|
||
|
|
<td valign="top"><i>Path name</i></td>
|
||
|
|
<td valign="top">Optional</td>
|
||
|
|
</tr>
|
||
|
|
</table>
|
||
|
|
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
</div>
|
||
|
|
<div> <a name="CRTCBLMOD.MODULE"></a>
|
||
|
|
<h3>Module (MODULE)</h3>
|
||
|
|
<p>Specifies the module name and library name for the module object you are creating. The module name and library name must conform to server naming conventions. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*PGMID</u></b></dt>
|
||
|
|
<dd>The name for the module is taken from the PROGRAM-ID paragraph in the outermost ILE COBOL source program of the compilation unit.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>module-name</i></b></dt>
|
||
|
|
<dd>Enter a name to identify the compiled ILE COBOL module. If you specify a module name for this parameter, and compile a <u> sequence of source programs</u> (multiple compilation units in a single source file member) the first module in the sequence uses this name; any other modules use the name specified in the PROGRAM-ID paragraph in the corresponding outermost ILE COBOL source program of the compilation unit.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
<p>The possible library values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*CURLIB</u></b></dt>
|
||
|
|
<dd>The created module object is stored in the current library. If you have not assigned a library as the current library, QGPL is used.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>library-name</i></b></dt>
|
||
|
|
<dd>Enter the name of the library where the created module object is to be stored.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.SRCFILE"></a>
|
||
|
|
<h3>Source file (SRCFILE)</h3>
|
||
|
|
<p>Specifies the name of the source file and library that contains the ILE COBOL source code to be compiled. This source file should have a record length of 92. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>QCBLLESRC</u></b></dt>
|
||
|
|
<dd>Specifies that the source file, QCBLLESRC, contains the ILE COBOL source code to be compiled.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>source-file-name</i></b></dt>
|
||
|
|
<dd>Enter the name of the source file that contains the ILE COBOL source code to be compiled.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
<p>The possible library values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*LIBL</u></b></dt>
|
||
|
|
<dd>The library list is searched to find the library where the source file is located.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CURLIB</b></dt>
|
||
|
|
<dd>The current library is used. If you have not assigned a library as the current library, QGPL is used.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>library-name</i></b></dt>
|
||
|
|
<dd>Enter the name of the library where the source file is located.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.SRCMBR"></a>
|
||
|
|
<h3>Source member (SRCMBR)</h3>
|
||
|
|
<p>Specifies the name of the member that contains the ILE COBOL source code to be compiled. You can specify this parameter only if the source file referred to in the SRCFILE parameter is a database file. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*MODULE</u></b></dt>
|
||
|
|
<dd>The source file member with the same name as the module name specified on the MODULE parameter, is used.
|
||
|
|
<p>If you do not specify a module name for the MODULE parameter, the first member of the database source file is used.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>source-file-member-name</i></b></dt>
|
||
|
|
<dd>Enter the name of the member that contains the ILE COBOL source code.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.SRCSTMF"></a>
|
||
|
|
<h3>Source stream file (SRCSTMF)</h3>
|
||
|
|
<p>Specifies the path name of the stream file containing the ILE COBOL source code to be compiled.
|
||
|
|
</p>
|
||
|
|
<p>The path name can be either absolutely or relatively qualified. An absolute path name starts with '/'; a relative path name starts with a character other than '/'.
|
||
|
|
</p>
|
||
|
|
<p>If absolutely-qualified, the path name is complete. If relatively-qualified, the path name is completed by appending the job's current working directory to the path name.
|
||
|
|
</p>
|
||
|
|
<p>The SRCMBR and SRCFILE parameters cannot be specified with the SRCSTMF parameter.
|
||
|
|
</p>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.GENLVL"></a>
|
||
|
|
<h3>Generation severity level (GENLVL)</h3>
|
||
|
|
<p>Specifies the severity level that determines if a module object is created. The severity level corresponds to the severity level of the messages produced during compilation. This parameter applies individually to each compilation unit in a source file member. Other compilation units in the source file member will still be compiled even if a previous compilation unit fails.
|
||
|
|
</p>
|
||
|
|
<p>The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>30</u></b></dt>
|
||
|
|
<dd>No module object is created if errors occur with a severity level equal to or greater than 30.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>severity-level</i></b></dt>
|
||
|
|
<dd>Specify a one or two-digit number, 0 through 30, which is the severity level you want to use to determine if a module object is to be created. No module object is created if errors occur with a severity level equal to or greater than this severity level.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.TEXT"></a>
|
||
|
|
<h3>Text 'description' (TEXT)</h3>
|
||
|
|
<p>Allows you to enter text that briefly describes the module and its function.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*SRCMBRTXT</u></b></dt>
|
||
|
|
<dd>The same text that describes the database file member containing the ILE COBOL source code, is used to describe the module object. If the source comes from a device or inline file, specifying *SRCMBRTXT has the same effect as specifying *BLANK.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*BLANK</b></dt>
|
||
|
|
<dd>No text is specified.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>text-description</i></b></dt>
|
||
|
|
<dd>Enter text briefly describing the module and its function. The text can be a maximum of 50 SBCS characters in length and must be enclosed in single quotation marks. The single quotation marks are not part of the 50-character string.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.OUTPUT"></a>
|
||
|
|
<h3>Output (OUTPUT)</h3>
|
||
|
|
<p>Specifies if the compiler listing is generated or not. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*PRINT</u></b></dt>
|
||
|
|
<dd>A compiler listing is generated. If a member is being compiled, the output file has the same name as the member. If a stream file is being compiled and *PGMID is specified in the PGM parameter, the output file has the name COBOLPGM00. Otherwise, it has the same name as the program.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NONE</b></dt>
|
||
|
|
<dd>No compiler listing is generated.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.OPTION"></a>
|
||
|
|
<h3>Compiler options (OPTION)</h3>
|
||
|
|
<p>Specifies the options to use when the ILE COBOL source code is compiled.
|
||
|
|
</p>
|
||
|
|
<p>Options specified in the PROCESS statement of an ILE COBOL source program override the corresponding options of the OPTION parameter.
|
||
|
|
</p>
|
||
|
|
<p>The possible values of the OPTION parameter are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*SOURCE</u> or <u>*SRC</u></b></dt>
|
||
|
|
<dd>The compiler produces a source listing, consisting of the ILE COBOL source program and all compilation-time error messages.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOSOURCE or *NOSRC</b></dt>
|
||
|
|
<dd>The compiler does not produce the source part of the listing. If you do not require a source listing, you should use this option because compilation may take less time.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOXREF</u></b></dt>
|
||
|
|
<dd>The compiler does not produce a cross-reference listing for the ILE COBOL source program.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*XREF</b></dt>
|
||
|
|
<dd>The compiler produces a cross-reference listing for the ILE COBOL source program.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*GEN</u></b></dt>
|
||
|
|
<dd>The compiler creates a module object after the ILE COBOL source is compiled.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOGEN</b></dt>
|
||
|
|
<dd>The compiler does not create a module object after the ILE COBOL source program is compiled. You might specify this option if you want only error messages or listings.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOSEQUENCE</u></b></dt>
|
||
|
|
<dd>The reference numbers are not checked for sequence errors.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*SEQUENCE</b></dt>
|
||
|
|
<dd>The reference numbers are checked for sequence errors. Sequence errors do not occur if the *LINENUMBER option is specified.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOVBSUM</u></b></dt>
|
||
|
|
<dd>Verb usage counts are not printed.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*VBSUM</b></dt>
|
||
|
|
<dd>Verb usage counts are printed.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NONUMBER</u></b></dt>
|
||
|
|
<dd>The source-file sequence numbers are used for reference numbers.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NUMBER</b></dt>
|
||
|
|
<dd>The user-supplied sequence numbers (columns 1 through 6) are used for reference numbers.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*LINENUMBER</b></dt>
|
||
|
|
<dd>The sequence numbers created by the compiler are used for reference numbers. This option combines ILE COBOL program source code and source code introduced by COPY statements into one consecutively numbered sequence. Use this option if you specify FIPS (Federal Information Processing Standards) flagging or SAA flagging.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOMAP</u></b></dt>
|
||
|
|
<dd>The compiler does not list the Data Division map.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*MAP</b></dt>
|
||
|
|
<dd>The compiler lists the Data Division map.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOOPTIONS</u></b></dt>
|
||
|
|
<dd>Options in effect are not listed for this compilation.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*OPTIONS</b></dt>
|
||
|
|
<dd>Options in effect are listed for this compilation.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*QUOTE</u></b></dt>
|
||
|
|
<dd>Specifies that the delimiter quotation mark (") is used for nonnumeric literals, hexadecimal literals, and Boolean literals. This option also specifies that the value of the figurative constant QUOTE has the EBCDIC value of a quotation mark.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*APOST</b></dt>
|
||
|
|
<dd>Specifies that the delimiter apostrophe (') is used for nonnumeric literals, hexadecimal literals, and Boolean literals. This option also specifies that the value of the figurative constant QUOTE has the EBCDIC value of an apostrophe.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOSECLVL</u></b></dt>
|
||
|
|
<dd>Second level message text is not listed for this compilation.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*SECLVL</b></dt>
|
||
|
|
<dd>Second level message text is listed for this compilation, along with the first-level error text, in the message section of the compiler listing.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*PRTCORR</u></b></dt>
|
||
|
|
<dd>Comment lines are inserted in the compiler listing indicating which elementary items were included as a result of the use of the CORRESPONDING phrase.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOPRTCORR</b></dt>
|
||
|
|
<dd>Comment lines are not inserted in the compiler listing when the CORRESPONDING phrase is used.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*MONOPRC</u></b></dt>
|
||
|
|
<dd>The program-name (literal or word) found in the PROGRAM-ID paragraph, the CALL, CANCEL, or SET ENTRY statements, and the END PROGRAM header is converted to all upper-case characters (monocasing) and the rules for program-name formation are enforced.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOMONOPRC</b></dt>
|
||
|
|
<dd>The program-name (literal or word) found in the PROGRAM-ID paragraph, the CALL, CANCEL, or SET ENTRY statements, and the END PROGRAM header is not converted to all upper-case characters (no monocasing) and the rules for program-name formation are not enforced. This option allows special characters not allowed for standard COBOL to be used in the CALL target.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*RANGE</u></b></dt>
|
||
|
|
<dd>At run time, subscripts are verified to ensure they are within the correct ranges, but index ranges are not verified. Reference modification and compiler-generated substring operations are also checked.
|
||
|
|
<p>The contents of date-time items are checked to make sure their format is correct, and that they represent a valid date, time, or timestamp.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NORANGE</b></dt>
|
||
|
|
<dd>Ranges are not verified at run time.
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>The *RANGE option generates code for checking subscript ranges. For example, it ensures that you are not attempting to access element 21 of a 20-element array.
|
||
|
|
</p>
|
||
|
|
<p>The *NORANGE option does not generate code to check subscript ranges. As a result, the *NORANGE option produces faster running code.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOUNREF</u></b></dt>
|
||
|
|
<dd>Unreferenced data items are not included in the compiled module. This reduces the amount storage used, allowing a larger program to be compiled. You cannot look at or assign to an unreferenced data item during debugging when the *NOUNREF option is chosen. The unreferenced data items still appear in the cross-reference listings produced by specifying OPTION (*XREF).
|
||
|
|
</dd>
|
||
|
|
<dt><b>*UNREF</b></dt>
|
||
|
|
<dd>Unreferenced data items are included in the compiled module.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOSYNC</u></b></dt>
|
||
|
|
<dd>The SYNCHRONIZED clause is syntax checked only.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*SYNC</b></dt>
|
||
|
|
<dd>The SYNCHRONIZED clause is compiled by the compiler. The SYNCHRONIZED clause causes the position of a data item to be aligned such that the right-hand (least-significant) end is on the natural storage boundary. The natural storage boundary is the next nearest 4-byte, 8-byte, or 16-byte boundary in storage depending on the length and type of data being stored. Extra storage is reserved adjacent to the synchronized item to achieve this alignment. Each elementary data item that is described as SYNCHRONIZED is aligned to the natural storage boundary that corresponds to its data storage assignment.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOCRTF</u></b></dt>
|
||
|
|
<dd>Disk files that are unavailable at the time of an OPEN operation are not created dynamically.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CRTF</b></dt>
|
||
|
|
<dd>Disk files that are unavailable at the time of an OPEN operation are created dynamically.
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>The maximum record length for a file that will be created dynamically is 32&rbl.766. Indexed files will not be dynamically created even though the *CRTF option has been specified.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NODUPKEYCHK</u></b></dt>
|
||
|
|
<dd>Does not check for duplicate primary and alternate record keys for INDEXED files.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*DUPKEYCHK</b></dt>
|
||
|
|
<dd>Checks for duplicate primary and alternate record keys for INDEXED files.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOINZDLT</u></b></dt>
|
||
|
|
<dd>Relative files with sequential access are not initialized with deleted records during the CLOSE operation if the files have been opened for OUTPUT. The record boundary is determined by the number of records written at OPEN OUTPUT time. Subsequent OPEN operations allow access only up to the record boundary.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*INZDLT</b></dt>
|
||
|
|
<dd>Relative files with sequential access are initialized with deleted records during the CLOSE operation if the files were opened for OUTPUT. Active records in the files are not affected. The record boundary is defined as the file size for subsequent OPEN operations.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOBLK</u></b></dt>
|
||
|
|
<dd>The compiler allows blocking only of SEQUENTIAL access files with no START statement. The BLOCK CONTAINS clause, if specified, is ignored, except for tape files.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*BLK</b></dt>
|
||
|
|
<dd>When *BLK is used and a BLOCK CONTAINS clause is specified, the compiler allows blocking for DYNAMIC access files and SEQUENTIAL access files with a START statement. Blocking is not allowed for RELATIVE files opened for output operations. The BLOCK CONTAINS clause controls the number of records to be blocked.
|
||
|
|
<p>When *BLK is used and no BLOCK CONTAINS clause is specified, the compiler allows blocking only of SEQUENTIAL access files with no START statement. The operating system determines the number of records to be blocked.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*STDINZ</u></b></dt>
|
||
|
|
<dd>For those items with no VALUE clause, the compiler initializes data items to system defaults.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOSTDINZ</b></dt>
|
||
|
|
<dd>For those items with no VALUE clause, the compiler does not initialize data items to system defaults.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*STDINZHEX00</b></dt>
|
||
|
|
<dd>For those items with no VALUE clause, the compiler initializes data items to hexadecimal zero.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NODDSFILLER</u></b></dt>
|
||
|
|
<dd>If no matching fields are found by a COPY DDS statement, no field descriptions are generated.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*DDSFILLER</b></dt>
|
||
|
|
<dd>If no matching fields are found by a COPY DDS statement, a single character FILLER field description, "07 FILLER PIC X", is always created.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOIMBEDERR</u></b></dt>
|
||
|
|
<dd>Error messages are not included in the source listing section of the compiler listing. Error messages only appear in the error message section of the compiler listing.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*IMBEDERR</b></dt>
|
||
|
|
<dd>First level error messages are included in the source listing section of the compiler listing, immediately following the line where the error occurred. Error messages also appear in the error message section of the compiler listing.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*STDTRUNC</u></b></dt>
|
||
|
|
<dd>This option applies only to USAGE BINARY data. When *STDTRUNC is selected, USAGE BINARY data is truncated to the number of digits in the PICTURE clause of the BINARY receiving field.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOSTDTRUNC</b></dt>
|
||
|
|
<dd>This option applies only to USAGE BINARY data. When *NOSTDTRUNC is selected, BINARY receiving fields are truncated only at half-word, full-word, or double-word boundaries. BINARY sending fields are also handled as half-words, full-words, or double-words. Thus, the full binary content of the field is significant. Also, the DISPLAY statement will convert the entire content of a BINARY field, with no truncation.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOCHGPOSSGN</u></b></dt>
|
||
|
|
<dd>Hexadecimal F is used as the default positive sign for zoned and packed numeric data. Hexadecimal F is the system default for the operating system.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CHGPOSSGN</b></dt>
|
||
|
|
<dd>Hexadecimal C is used as the default positive sign for zoned and packed numeric data. This applies to all results of the MOVE, ADD, SUBTRACT, MULTIPLY, DIVIDE, COMPUTE, and INITIALIZE statements, as well as the results of the VALUE clause.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOEVENTF</u></b></dt>
|
||
|
|
<dd>Do not create an Event File for use by CoOperative Development Environment/400 (CODE/400). CODE/400 uses this file to provide error feedback integrated with the CODE/400 editor. An Event File is normally created when you create a module or program from within CODE/400.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*EVENTF</b></dt>
|
||
|
|
<dd>Create an Event File for use by CoOperative Development Environment/400 (CODE/400). The Event File is created as a member in file EVFEVENT in the library where the created module or program object is to be stored. If the file EVFEVENT does not exist it is automatically created. The Event File member name is the same as the name of the object being created.
|
||
|
|
<p>CODE/400 uses this file to provide error feedback integrated with the CODE/400 editor. An Event File is normally created when you create a module or program from within CODE/400.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*MONOPIC</u></b></dt>
|
||
|
|
<dd>The PICTURE character-string is converted to all uppercase characters (monocasing).
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOMONOPIC</b></dt>
|
||
|
|
<dd>The currency symbol used in the PICTURE character-string is case sensitive. That is, the lowercase letters corresponding to the uppercase letters for the PICTURE symbols A, B, E, G, N, P, S, V, X, Z, CR, and DB are equivalent to their uppercase representations in a PICTURE character-string. All other lowercase letters are not equivalent to their corresponding uppercase representations.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOCRTARKIDX</u></b></dt>
|
||
|
|
<dd>Temporary alternate record key (ARK) indexes are not created if permanent ones cannot be found.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CRTARKIDX</b></dt>
|
||
|
|
<dd>Temporary alternate record key (ARK) indexes are created if permanent ones cannot be found.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.CVTOPT"></a>
|
||
|
|
<h3>Conversion options (CVTOPT)</h3>
|
||
|
|
<p>Specifies how the compiler handles date, time, and timestamp field types, DBCS field types, variable-length character field types, and floating-point field types passed from externally-described files to your program through COPY DDS. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NOVARCHAR</u></b></dt>
|
||
|
|
<dd>Variable-length fields are declared as FILLER fields.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*VARCHAR</b></dt>
|
||
|
|
<dd>Variable-length fields are declared as group items, and are accessible to the ILE COBOL source program.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NODATETIME</u></b></dt>
|
||
|
|
<dd>Date, time, and timestamp data types are declared as FILLER fields.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*DATETIME</b></dt>
|
||
|
|
<dd>Date, time, and timestamp DDS data types are given COBOL data item names based on their DDS names. The category of the COBOL data item is alphanumeric, unless one of the CVTOPT parameter values *DATE, *TIME, or *TIMESTAMP is specified. In this case, the category of the COBOL data item is date, time, or timestamp, respectively.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOPICXGRAPHIC</u></b></dt>
|
||
|
|
<dd>DBCS-graphic data types are declared as FILLER fields.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*PICXGRAPHIC</b></dt>
|
||
|
|
<dd>Fixed-length DBCS-graphic data types are declared as fixed-length alphanumeric fields, and are accessible to the ILE COBOL source program.
|
||
|
|
<p>When the *VARCHAR option is also in use, variable-length DBCS-graphic data types are declared as fixed-length group items, and are accessible to the ILE COBOL source program.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*PICGGRAPHIC</u></b></dt>
|
||
|
|
<dd>Fixed-length DBCS-graphic data types are declared as fixed-length G-type fields, and are accessible to the ILE COBOL source program.
|
||
|
|
<p>When the *VARCHAR option is also in use, variable-length DBCS-graphic data types are declared as fixed-length group items (made of a numeric field followed by G type field), and are accessible to the ILE COBOL source program.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOPICGGRAPHIC</b></dt>
|
||
|
|
<dd>DBCS-graphic data types are declared as FILLER fields.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOFLOAT</u></b></dt>
|
||
|
|
<dd>Floating-point data types are declared as FILLER fields with a USAGE of binary.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*FLOAT</b></dt>
|
||
|
|
<dd>Floating-point data types are brought into the program with their DDS names and a USAGE of COMP-1 (single-precision) or COMP-2 (double-precision). The fields are made accessible to the ILE COBOL source program.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NODATE</u></b></dt>
|
||
|
|
<dd>DDS date data types are declared as category alphanumeric COBOL data items, for example:
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
06 FILLER PIC X(10).
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The COBOL data item name is determined by the *NODATETIME/*DATETIME CVTOPT parameter.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*DATE</b></dt>
|
||
|
|
<dd>DDS date data types are declared as category date COBOL data items, for example:
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
06 FILLER FORMAT DATE '@Y-%m-%d'.
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The COBOL data item name is determined by the *NODATETIME/*DATETIME CVTOPT parameter.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOTIME</u></b></dt>
|
||
|
|
<dd>DDS time data types are declared as category alphanumeric COBOL data items, for example:
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
06 FILLER PIC X(8).
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The COBOL data item name is determined by the *NODATETIME/*DATETIME CVTOPT parameter.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*TIME</b></dt>
|
||
|
|
<dd>DDS time data types are declared as category time COBOL data items, for example:
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
06 FILLER FORMAT TIME '%H:%M:%S'.
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The COBOL data item name is determined by the *NODATETIME/*DATETIME CVTOPT parameter.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOTIMESTAMP</u></b></dt>
|
||
|
|
<dd>DDS timestamp data types are declared as category alphanumeric COBOL data items, for example:
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
06 FILLER PIC X(26).
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The COBOL data item name is determined by the *NODATETIME/*DATETIME CVTOPT parameter.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*TIMESTAMP</b></dt>
|
||
|
|
<dd>DDS timestamp data types are declared as category timestamp COBOL data items, for example:
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
06 FILLER FORMAT TIMESTAMP.
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The COBOL data item name is determined by the *NODATETIME/*DATETIME CVTOPT parameter.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOCVTTODATE</u></b></dt>
|
||
|
|
<dd>DDS data types with the DATFMT keyword (excluding the DDS date data type) are declared in ILE COBOL based on their original DDS type.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CVTTODATE</b></dt>
|
||
|
|
<dd>DDS data types with the DATFMT keyword (excluding the DDS date data type) are declared in ILE COBOL as date data types.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOPICNGRAPHIC</u></b></dt>
|
||
|
|
<dd>DBCS-graphic data types are declared as FILLER fields.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*PICNGRAPHIC</b></dt>
|
||
|
|
<dd>Fixed-length DBCS-graphic data types are declared as fixed-length national data fields, and are accessible to the ILE COBOL source program.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.MSGLMT"></a>
|
||
|
|
<h3>Message limit (MSGLMT)</h3>
|
||
|
|
<p>Specifies the maximum number of messages of a given error severity level that can occur for each compilation unit before compilation stops. As soon as one compilation unit reaches the maximum, compilation stops for the entire source member.
|
||
|
|
</p>
|
||
|
|
<p>For example, if you specify 3 for the maximum number of messages and 20 for the error severity level then compilation will stop if three or more errors with a severity level of 20 or higher occur. If no messages equal or exceed the given error severity level, compilation continues regardless of the number of errors encountered.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><i>number-of-messages</i></b></dt>
|
||
|
|
<dd>Specifies the maximum number of messages. The possible values are:
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NOMAX</u></b></dt>
|
||
|
|
<dd>Compilation continues until normal completion regardless of the number of errors encountered.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>maximum-number</i></b></dt>
|
||
|
|
<dd>Specifies the maximum number of messages that can occur at or above the specified error severity level before compilation stops. The valid range is 0-9999.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>message-limit-severity</i></b></dt>
|
||
|
|
<dd>Specifies the error severity level used to determine whether or not to stop compilation. The possible values are:
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>30</u></b></dt>
|
||
|
|
<dd>Compilation stops if the number of errors with severity level 30 or higher exceeds the maximum number of messages specified.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>error-severity-level</i></b></dt>
|
||
|
|
<dd>Enter a one or two-digit number, 0 through 30, which is the error severity level you want to use to determine whether or not to stop compilation. Compilation stops if the number of errors with this severity level or higher exceeds the maximum number of messages you specified.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.DBGVIEW"></a>
|
||
|
|
<h3>Debug view option (DBGVIEW)</h3>
|
||
|
|
<p>Specifies options that control which views of the source program or generated listing is available for debugging the compiled module, and if the debug listing view is compressed or not.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><i>debug-view</i></b></dt>
|
||
|
|
<dd>Specify the views to be available for debugging. The possible values are:
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*STMT</u></b></dt>
|
||
|
|
<dd>The compiled module can be debugged using symbolic names and statement numbers.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*SOURCE</b></dt>
|
||
|
|
<dd>The primary source member, as well as copied source members which were included through COPY statements, will have source views available for debugging the compiled module. These views are available only if the primary source member and copied source members come from local database source files. Do not change or delete members during the time between compile and debug.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*LIST</b></dt>
|
||
|
|
<dd>A listing view, which shows the source code after the processing of any COPY and REPLACE statements, will be made available for debugging the compiled module. This option increases the size of the compiled module, without affecting the runtime performance of the compiled module.
|
||
|
|
<p>The listing view will include the cross-reference listing, Data Division map, and verb usage counts when the corresponding compiler options are requested. For example, a cross-reference listing will be included if OPTION(*XREF) is specified.
|
||
|
|
</p>
|
||
|
|
<p>Listing views can be generated regardless of where the primary source members or copied source members come from. Listing views are not affected by changes to or deletion of the source members following the compilation.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*ALL</b></dt>
|
||
|
|
<dd>Equivalent to specifying *STMT, *SOURCE, and *LIST combined.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NONE</b></dt>
|
||
|
|
<dd>The compiled module cannot be debugged. This reduces the size of the compiled program, but does not affect its runtime performance. When this option is specified, a formatted dump can not be taken.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>compress-listing-view</i></b></dt>
|
||
|
|
<dd>Specifies if the listing view is compressed or not when *LIST or *ALL is specified in debug-view. The possible values are:
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NOCOMPRESSDBG</u></b></dt>
|
||
|
|
<dd>The listing view is not compressed.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*COMPRESSDBG</b></dt>
|
||
|
|
<dd>The listing view is compressed when *LIST or *ALL is specified in debug-view.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.OPTIMIZE"></a>
|
||
|
|
<h3>Optimize level (OPTIMIZE)</h3>
|
||
|
|
<p>Specifies the level of optimization of the module. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NONE</u></b></dt>
|
||
|
|
<dd>No optimization is performed on the compiled module. Compilation time is minimized when this option is used. This option allows variables to be displayed and changed during debugging.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*BASIC</b></dt>
|
||
|
|
<dd>Some optimization (only at the local block level) is performed on the compiled module. This option allows user variables to be displayed but not changed during debugging.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*FULL</b></dt>
|
||
|
|
<dd>Full optimization (at the global level) is performed on the compiled module. This optimization increases compilation time but also generates the most efficient code. This option allows user variables to be displayed but not changed during debugging. The displayed values of the variables may not be their current values. Some variables may not be displayable.
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>Regardless of the optimization level chosen, all information to allow full optimization is generated. The user can change optimization levels of the module object from *NONE to *FULL using the CHGMOD command without having to recompile the source program.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.FLAGSTD"></a>
|
||
|
|
<h3>FIPS flagging (FLAGSTD)</h3>
|
||
|
|
<p>Specifies the options for FIPS flagging. (Select the *LINENUMBER option to ensure that the reference numbers used in the FIPS messages are unique.) The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NOFIPS</u></b></dt>
|
||
|
|
<dd>The ILE COBOL source program is not FIPS flagged.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*MINIMUM</b></dt>
|
||
|
|
<dd>FIPS flag for minimum subset and higher.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*INTERMEDIATE</b></dt>
|
||
|
|
<dd>FIPS flag for intermediate subset and higher.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*HIGH</b></dt>
|
||
|
|
<dd>FIPS flag for high subset.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*NOOBSOLETE</u></b></dt>
|
||
|
|
<dd>Obsolete language elements are not flagged.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*OBSOLETE</b></dt>
|
||
|
|
<dd>Obsolete language elements are flagged.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.EXTDSPOPT"></a>
|
||
|
|
<h3>Extended display options (EXTDSPOPT)</h3>
|
||
|
|
<p>Specifies the options to use for extended ACCEPT and extended DISPLAY statements for workstation I/O. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*DFRWRT</u></b></dt>
|
||
|
|
<dd>Extended DISPLAY statements are held in a buffer until an extended ACCEPT statement is encountered, or until the buffer is filled.
|
||
|
|
<p>The contents of the buffer are written to the display when the extended ACCEPT statement is encountered or the buffer is full.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NODFRWRT</b></dt>
|
||
|
|
<dd>Each extended DISPLAY statement is performed as it is encountered.
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*UNDSPCHR</u></b></dt>
|
||
|
|
<dd>Displayable and undisplayable characters are handled by extended ACCEPT and extended DISPLAY statements.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NOUNDSPCHR</b></dt>
|
||
|
|
<dd>Only displayable characters are handled by extended ACCEPT and extended DISPLAY statements.
|
||
|
|
<p>Although you must use this option for display stations attached to remote 3174 and 3274 controllers, you can also use it for local workstations. If you do use this option, your data must contain displayable characters only. If the data contains values less than hexadecimal 20, the results are not predictable, ranging from unexpected display formats to severe errors.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b><u>*ACCUPDALL</u></b></dt>
|
||
|
|
<dd>All types of data are predisplayed in the extended ACCEPT statements regardless of the existence of the UPDATE phrase.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*ACCUPDNE</b></dt>
|
||
|
|
<dd>Only numeric edited data are predisplayed in the extended ACCEPT statements that do not contain the UPDATE phrase.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.FLAG"></a>
|
||
|
|
<h3>Flagging severity (FLAG)</h3>
|
||
|
|
<p>Specifies the minimum severity level of messages that will appear in the compiler listing. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>0</u></b></dt>
|
||
|
|
<dd>All messages will appear in the compiler listing.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>severity-level</i></b></dt>
|
||
|
|
<dd>Enter a one or two-digit number that specifies the minimum severity level of messages that you want to appear in the compiler listing. Messages that have severity levels of this specified value or higher will appear in the compiler listing.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.REPLACE"></a>
|
||
|
|
<h3>Replace module (REPLACE)</h3>
|
||
|
|
<p>Specifies if a new module is created when a module of the same name in the specified or implied library already exists. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*YES</u></b></dt>
|
||
|
|
<dd>A new module is created and it replaces any existing module of the same name in the specified or implied library. The existing module of the same name in the specified or implied library is moved to library QRPLOBJ.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*NO</b></dt>
|
||
|
|
<dd>A new module is not created if a module of the same name already exists in the specified or implied library. The existing module is not replaced, a message is displayed, and compilation stops.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.AUT"></a>
|
||
|
|
<h3>Authority (AUT)</h3>
|
||
|
|
<p>Specifies the authority given to users who do not have specific authority to the module object, who are not on the authorization list, or whose group has no specific authority to the module object. You can change the authority for all users, or for specific users after the module object is created by using the GRTOBJAUT (Grant Object Authority) or RVKOBJAUT (Revoke Object Authority) commands.
|
||
|
|
</p>
|
||
|
|
<p>The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*LIBCRTAUT</u></b></dt>
|
||
|
|
<dd>The public authority for the object is taken from the CRTAUT keyword of the target library (the library that is to contain the created module object). This value is determined when the module object is created. If the CRTAUT value for the library changes after the module object is created, the new value does NOT affect any existing objects.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*ALL</b></dt>
|
||
|
|
<dd>Provides authority for all operations on the module object except those limited to the owner or controlled by authorization list management authority. The user can control the module object's existence, specify security for it, change it, and perform basic functions on it, but cannot transfer its ownership.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CHANGE</b></dt>
|
||
|
|
<dd>Provides all data authority and the authority for performing all operations on the module object except those limited to the owner or controlled by object authority and object management authority. The user can change the object and perform basic functions on it.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*USE</b></dt>
|
||
|
|
<dd>Provides object operational authority and read authority; authority for basic operations on the module object. The user can perform basic operations on the object but is prevented from changing the object.
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>A user must have *USE authority to a program to obtain a formatted dump of the variables of the program. To dump variables, the program must also have observable information.
|
||
|
|
</p>
|
||
|
|
<p>If you do not want some users to be able to dump the variables, then give them only *OBJOPR plus *EXECUTE authority to the program or service program containing the module. This will allow them to call the program but not dump its variables. Use EDTOBJAUT, GRTOBJAUT or RVKOBJAUT to change the authority of the created program or service program.
|
||
|
|
</p>
|
||
|
|
<p>If you do not want any users to be able to dump the variables, then remove the observable information using Change Module (CHGMOD) on the module, or using Change Program (CHGPGM) or Change Service Program (CHGSRVPGM) on the program containing the module.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*EXCLUDE</b></dt>
|
||
|
|
<dd>The user cannot access the module object.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>authorization-list-name</i></b></dt>
|
||
|
|
<dd>The name of an authorization list of users and authorities to which the module is added. The module object is secured by this authorization list, and the public authority for the module object is set to *AUTL. The authorization list must exist on the system when the CRTCBLMOD command is issued. Use the Create Authorization List (CRTAUTL) command to create your own authorization list.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.LINKLIT"></a>
|
||
|
|
<h3>Link literal (LINKLIT)</h3>
|
||
|
|
<p>Specifies the linkage type for external CALL/CANCEL 'literal' target and the SET ENTRY target. You may override this option for specific external CALL/CANCEL 'literal' target and the SET ENTRY target lists by specifying the following sentence in the SPECIAL-NAMES paragraph:
|
||
|
|
</p>
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
LINKAGE TYPE IS implementer-name FOR target-list.
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>The possible values for LINKLIT are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*PGM</u></b></dt>
|
||
|
|
<dd>Target for CALL/CANCEL or SET ENTRY is a program object.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*PRC</b></dt>
|
||
|
|
<dd>Target for CALL/CANCEL or SET ENTRY is an ILE procedure.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.TGTRLS"></a>
|
||
|
|
<h3>Target release (TGTRLS)</h3>
|
||
|
|
<p>Specifies the release of the operating system on which you intend to use the module object being created. In the examples given for the *CURRENT and *PRV values, and when specifying the <u> target-release</u> value, the format VxRxMx is used to specify the release, where Vx is the version, Rx is the release, and Mx is the modification level. For example, V2R3M0 is version 2, release 3, modification level 0.
|
||
|
|
</p>
|
||
|
|
<p>Valid values for this parameter change every release. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*CURRENT</u></b></dt>
|
||
|
|
<dd>The object is to be used on the release of the operating system currently running on your system. For example, if V2R3M5 is running on the system, *CURRENT means that you intend to use the object on a system with V2R3M5 installed. The object can also be used on a system with any subsequent release of the operating system installed.
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>If V2R3M5 is running on the system, and the object is to be used on a system with V2R3M0 installed, specify TGTRLS(V2R3M0), not TGTRLS(*CURRENT).
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*PRV</b></dt>
|
||
|
|
<dd>The object is to be used on the previous release with modification level 0 of the operating system. For example, if V2R3M5 is running on your system, *PRV means you intend to use the object on a system with V2R2M0 installed. The object can also be used on a system with any subsequent release of the operating system installed.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>target-release</i></b></dt>
|
||
|
|
<dd>Specify the release in the format VxRxMx. The object can be used on a system with the specified release or with any subsequent release of the operating system installed.
|
||
|
|
<p>Valid values depend on the current version, release, and modification level, and they change with each new release. If you specify a <u> target-release</u> that is earlier than the earliest release level supported by this command, an error message is sent indicating the earliest supported release.
|
||
|
|
</p>
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>The current version of the command may support options that are not available in previous releases of the command. If the command is used to create objects that are to be used on a previous release, it will be processed by the compiler appropriate to that release, and any unsupported options will not be recognized. The compiler will not necessarily issue any warnings regarding options that it is unable to process.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.SRTSEQ"></a>
|
||
|
|
<h3>Sort sequence (SRTSEQ)</h3>
|
||
|
|
<p>Specifies the sort sequence used when NLSSORT is associated with an alphabet-name in the ALPHABET clause. The SRTSEQ parameter is used in conjunction with the LANGID parameter to determine which system-defined or user-defined sort sequence table the module will use. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*HEX</u></b></dt>
|
||
|
|
<dd>No sort sequence table will be used, and the hexadecimal values of the characters will be used to determine the sort sequence.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*JOB</b></dt>
|
||
|
|
<dd>The sort sequence will be resolved and associated with the module at compile time using the sort sequence of the compile job. The sort sequence table must exist in the system at compile time. If at run time, the CCSID of the runtime job differs from the CCSID of the compile time job, the sort sequence table loaded at compile time is converted to match the CCSID of the runtime job.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*JOBRUN</b></dt>
|
||
|
|
<dd>The sort sequence of the program will be resolved and associated with the module at run time. At compile time, the compiler will associate the sort sequence of the compile job with the module. At run time, this sort sequence will be replaced by the sort sequence associated with the job at run time. This value allows a module to be compiled once and used with different sort sequences at run time.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*LANGIDUNQ</b></dt>
|
||
|
|
<dd>Specifies that the sort sequence table being used must contain a unique weight for each character in the code page. The sort sequence table used will be the unique weighted table associated with the language specified in the LANGID parameter.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*LANGIDSHR</b></dt>
|
||
|
|
<dd>Specifies that the sort sequence table being used can contain the same weight for multiple characters in the code page. The sort sequence table used will be the shared weighted table associated with the language specified in the LANGID parameter.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>table-name</i></b></dt>
|
||
|
|
<dd>Enter the name of the sort sequence table to be used. The table contains weights for all characters in a given code page. A weight is associated with the character that is defined at the code point. When using a sort sequence table name, the library in which the object resides can be specified. The valid values for the library are:
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*LIBL</u></b></dt>
|
||
|
|
<dd>The library list is searched to find the library where the sort sequence table is located.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*CURLIB</b></dt>
|
||
|
|
<dd>The current library is used. If you have not assigned a library as the current library, QGPL is used.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>library-name</i></b></dt>
|
||
|
|
<dd>Enter the name of the library where the sort sequence table is found.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.LANGID"></a>
|
||
|
|
<h3>Language id (LANGID)</h3>
|
||
|
|
<p>Specifies the language identifier which is used in conjunction with the sort sequence. The LANGID parameter is used only when the SRTSEQ value in effect is *LANGIDUNQ or *LANGIDSHR. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*JOBRUN</u></b></dt>
|
||
|
|
<dd>The language identifier of the program will be resolved at run time. When the compiled program is run, the language identifier of the job is used. This value allows a module to be compiled once and used with different language identifiers at run time.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*JOB</b></dt>
|
||
|
|
<dd>The language identifier of the module will be resolved at compile time.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>language-identifier-name</i></b></dt>
|
||
|
|
<dd>Enter a valid 3-character language identifier.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.ENBPFRCOL"></a>
|
||
|
|
<h3>Enable performance collection (ENBPFRCOL)</h3>
|
||
|
|
<p>Specifies whether performance measurement code should be generated in the module or program. The data collected can be used by the system performance tool to profile an application's performance. Generating the addition of the performance measurement code in a compiled module or program will result in slightly larger objects and may affect performance.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*PEP</u></b></dt>
|
||
|
|
<dd>Performance statistics are gathered on the entry and exit of the program entry procedure only. Choose this value when you want to gather overall performance information for an application. This support is equivalent to the support formally provided with the TPST tool. This is the default.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*ENTRYEXIT</b></dt>
|
||
|
|
<dd>Performance statistics are gathered on the entry and exit of all the procedures of the program. This includes the program PEP routine.
|
||
|
|
<p>This choice would be useful if you want to capture information on all routines. Use this option when you know that all the programs called by your application were compiled with either the *PEP, *ENTRYEXIT or *FULL option. Otherwise, if your application calls other programs that are not enabled for performance measurement, the performance tool will charge their use of resources against your application. This would make it difficult for you to determine where resources are actually being used.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>*FULL</b></dt>
|
||
|
|
<dd>Performance statistics are gathered on the entry and exit of all procedures. Also statistics are gathered before and after each call to an external procedure.
|
||
|
|
<p>Use this option when you think that your application will call other programs that were not compiled with either *PEP, *ENTRYEXIT or *FULL. This option allows the performance tools to distinguish between resources that are used by your application and those used by programs it calls (even if those programs are not enabled for performance measurement). This option is the most expensive but allows for selectively analyzing various programs in an application.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.PRFDTA"></a>
|
||
|
|
<h3>Profiling data (PRFDTA)</h3>
|
||
|
|
<p>Specifies the program profiling data attribute for the module. Program profiling is an advanced optimization technique used to reorder procedures and code within the procedures based on statistical data (profiling data).
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NOCOL</u></b></dt>
|
||
|
|
<dd>This module is not enabled to collect profiling data. This is the default.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*COL</b></dt>
|
||
|
|
<dd>This module is enabled to collect profiling data.
|
||
|
|
<p>
|
||
|
|
<b>Note: </b>*COL can be specified only when the optimization level of the module is *FULL.
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.CCSID"></a>
|
||
|
|
<h3>Coded character set ID (CCSID)</h3>
|
||
|
|
<p>Specifies the coded character set identifier (CCSID) that records in files, and data associated with LOCALEs, are converted to at run time.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*JOBRUN</u></b></dt>
|
||
|
|
<dd>The CCSID of the program is resolved at run time. When the compiled program is run, the current job's default CCSID is used.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*JOB</b></dt>
|
||
|
|
<dd>The current job's default CCSID at compile time is used.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*HEX</b></dt>
|
||
|
|
<dd>The CCSID 65535 is used, which indicates that data in the fields is treated as bit data, and is not converted.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>coded-character-set-identifier</i></b></dt>
|
||
|
|
<dd>Specifies the CCSID to be used.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.ARITHMETIC"></a>
|
||
|
|
<h3>Arithmetic mode (ARITHMETIC)</h3>
|
||
|
|
<p>Specifies the arithmetic mode for numeric data. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NOEXTEND</u></b></dt>
|
||
|
|
<dd>This option specifies the default arithmetic mode for numeric data. The intermediate result of a fixed-point arithmetic expression can be up to 30 digits and numeric literals may only have a maximum length of 18 digits.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*EXTEND31</b></dt>
|
||
|
|
<dd>Use this option to increase the precision of intermediate results for fixed-point arithmetic. The intermediate result of a fixed-point arithmetic expression can be up to 31 digits and numeric literals may have a maximum length of 31 digits.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*EXTEND63</b></dt>
|
||
|
|
<dd>Use this option to increase the precision of intermediate results for fixed-point arithmetic. The intermediate result of a fixed-point arithmetic expression can be up to 63 digits and numeric literals may have a maximum length of 63 digits.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.NTLPADCHAR"></a>
|
||
|
|
<h3>Padding character (NTLPADCHAR)</h3>
|
||
|
|
<p>Specifies the national padding character (NTLPADCHAR) used when padding occurs in the following conversion situations:
|
||
|
|
</p>
|
||
|
|
<p>1. Single byte character to national character.
|
||
|
|
</p>
|
||
|
|
<p>2. Double byte character to national character.
|
||
|
|
</p>
|
||
|
|
<p>3. National character to national character.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*DEFAULT</u></b></dt>
|
||
|
|
<dd>This option specifies the default padding characters as follows:
|
||
|
|
<p>1. Single byte character to national character (NX"0020")
|
||
|
|
</p>
|
||
|
|
<p>2. Double byte character to national character (NX"3000")
|
||
|
|
</p>
|
||
|
|
<p>3. National character to national character (NX"3000")
|
||
|
|
</p>
|
||
|
|
</dd>
|
||
|
|
<dt><b>national hexadecimal literal</b></dt>
|
||
|
|
<dd>Specifies any valid national hexadecimal literal of length 1 in format NX" " or NX' '.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.LICOPT"></a>
|
||
|
|
<h3>Licensed Internal Code options (LICOPT)</h3>
|
||
|
|
<p>Specifies one or more Licensed Internal Code compile-time options. This parameter allows individual compile-time options to be selected, and is intended for the advanced programmer who understands the potential benefits and drawbacks of each selected type of compiler option.
|
||
|
|
</p>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.INCDIR"></a>
|
||
|
|
<h3>Include directory (INCDIR)</h3>
|
||
|
|
<p>Specifies one or more directories to add to the search path used by the compiler to find copy files. The compiler will search the directories specified here if the copy files in the source program can not be resolved.
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NONE</u></b></dt>
|
||
|
|
<dd>No user directories are searched for copy files. By default, the current directory will still be searched.
|
||
|
|
</dd>
|
||
|
|
<dt><b><i>'directory'</i></b></dt>
|
||
|
|
<dd>Specify up to 32 directories in which to search for copy files. In addition to the specified directories, the current directory is also searched for copy files.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.PGMINFO"></a>
|
||
|
|
<h3>Generate program interface (PGMINFO)</h3>
|
||
|
|
<p>Specifies whether program interface information should be generated into a stream file. The possible values are:
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b><u>*NO</u></b></dt>
|
||
|
|
<dd>This option specifies the default which does not generate program interface information.
|
||
|
|
</dd>
|
||
|
|
<dt><b>*PCML</b></dt>
|
||
|
|
<dd>Specifies that PCML (Program Call Markup Language) should be generated into a stream file. The generated PCML makes it easier for JAVA methods to call the procedure in this COBOL module, with less Java code. The name of a stream file that will contain the generated PCML must be specified on the INFOSTMF option.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<div> <a name="CRTCBLMOD.INFOSTMF"></a>
|
||
|
|
<h3>Program interface stream file (INFOSTMF)</h3>
|
||
|
|
<p>Specifies the path name of the stream file to contain the generated program interface information specifed on the PGMINFO option.
|
||
|
|
</p>
|
||
|
|
<p>The path name can be either absolutely or relatively qualified. An absolute path name starts with '/'; a relative path name starts with a character other than '/'.
|
||
|
|
</p>
|
||
|
|
<p>If absolutely-qualified, the path name is complete. If relatively-qualified, the path name is completed by appending the job's current working directory to the path name.
|
||
|
|
</p>
|
||
|
|
<p>This parameter can only be specified when the PGMINFO parameter has a value other than *NO.
|
||
|
|
</p>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<hr size="2" width="100%">
|
||
|
|
<div><h3><a name="CRTCBLMOD.COMMAND.EXAMPLES">Examples</a> </h3>
|
||
|
|
<p><b>Example 1: Compiling a Source Program into a Module Object </b>
|
||
|
|
</p>
|
||
|
|
<p>
|
||
|
|
<pre>
|
||
|
|
CRTCBLMOD MODULE(MYLIB/XMPLE1) SRCFILE(MYLIB/QCBLLESRC)
|
||
|
|
SRCMBR(XMPLE1) OUTPUT(*PRINT)
|
||
|
|
TEXT('My ILE COBOL module')
|
||
|
|
</pre>
|
||
|
|
</p>
|
||
|
|
<p>This command calls the ILE COBOL compiler to create a module named XMPLE1. The source program is in member XMPLE1 of source file QCBLLESRC in library MYLIB. A compiler listing is created.
|
||
|
|
</p>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
<hr size="2" width="100%">
|
||
|
|
<div><h3><a name="CRTCBLMOD.ERROR.MESSAGES">Error messages</a> </h3>
|
||
|
|
<p><b><u>*ESCAPE Messages</u></b>
|
||
|
|
</p>
|
||
|
|
<dl>
|
||
|
|
<dt><b>LNC9001</b></dt>
|
||
|
|
<dd>Compile failed. &1 not created.
|
||
|
|
</dd>
|
||
|
|
<dt><b>LNC9006</b></dt>
|
||
|
|
<dd>TGTRLS(&1) specified, but compiler is not installed.
|
||
|
|
</dd>
|
||
|
|
<dt><b>LNC9007</b></dt>
|
||
|
|
<dd>The product library is damaged, or the user is not allowed to use it.
|
||
|
|
</dd>
|
||
|
|
<dt><b>LNC9015</b></dt>
|
||
|
|
<dd>TGTRLS(&1) is not valid.
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
<table width="100%">
|
||
|
|
<tr><td align="right"><a href="#CRTCBLMOD.Top_Of_Page">Top</a></td></tr>
|
||
|
|
</table>
|
||
|
|
</body>
|
||
|
|
</html>
|