1107 lines
53 KiB
HTML
1107 lines
53 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 CICS Program (CRTCICSCBL)</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="CRTCICSCBL.Top_Of_Page"></a>
|
|
<h2>Create CICS Program (CRTCICSCBL)</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="#CRTCICSCBL.PARAMETERS.TABLE">Parameters</a><br>
|
|
<a href="#CRTCICSCBL.COMMAND.EXAMPLES">Examples</a><br>
|
|
<a href="#CRTCICSCBL.ERROR.MESSAGES">Error messages</a></td>
|
|
</tr>
|
|
</table>
|
|
|
|
<div> <a name="CRTCICSCBL"></a>
|
|
<p>The Create CICS COBOL (CRTCICSCBL) command calls the CICS precompiler, which precompiles either OPM or ILE COBOL source containing CICS statements and produces a temporary source member. (At this time COBOL copybooks are not expanded in the Cobol source.) If the source program also contains Structured Query Language (SQL) commands, it optionally calls the SQL precompiler following a successful CICS precompile. The resulting precompiler output is placed into a temporary source member. Following the CICS precompilation and the optional SQL precompilation, the COBOL compiler may optionally be called to compile the program.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>It is possible to precompile your SQL statements first by running the CRTSQLCBL command and specifying the *NOGEN option on the OPTION parameter. This puts the SQL precompiler output in QSQLTEMP in library QTEMP. You must then run the CRTCICSCBL command specifying SRCFILE as QTEMP/QSQLTEMP; the SRCMBR name can be obtained by looking in this file for your SQL precompiled program source. The rest of the parameters on CRTCICSCBL can be entered as normal.
|
|
</p>
|
|
<p>It is not recommended that applications be compiled in this way but, if necessary, it can be done.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<hr size="2" width="100%">
|
|
|
|
<div>
|
|
<h3><a name="CRTCICSCBL.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="#CRTCICSCBL.PGM"><b>PGM</b></a></td>
|
|
<td valign="top">Program</td>
|
|
<td valign="top"><i>Qualified object name</i></td>
|
|
<td valign="top" rowspan="3">Required, Positional 1</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top">Qualifier 1: Program</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>*CURLIB</u></b></td>
|
|
</tr><tr>
|
|
<td valign="top" rowspan="3"><a href="#CRTCICSCBL.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>QLBLSRC</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="#CRTCICSCBL.SRCMBR"><b>SRCMBR</b></a></td>
|
|
<td valign="top">Source member</td>
|
|
<td valign="top"><i>Name</i>, <b><u>*PGM</u></b></td>
|
|
<td valign="top">Optional, Positional 3</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.COMMIT"><b>COMMIT</b></a></td>
|
|
<td valign="top">Commitment control</td>
|
|
<td valign="top"><b><u>*CHG</u></b>, *CS, *ALL, *NONE</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.OBJTYPE"><b>OBJTYPE</b></a></td>
|
|
<td valign="top">Compile type</td>
|
|
<td valign="top"><b><u>*PGM</u></b>, *BNDPGM, *MODULE</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.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="#CRTCICSCBL.CICSOPT"><b>CICSOPT</b></a></td>
|
|
<td valign="top">CICS Options</td>
|
|
<td valign="top">Values (up to 11 repetitions): <b><u>*NOSOURCE</u></b>, *NOSRC, *SOURCE, *SRC, *NOVBREF, *VBREF, *NOXREFCICS, *XREFCICS, *NODEBUG, *DEBUG, *QUOTE, *APOST, *NOGEN, *GEN, *NOSECLVL, *SECLVL, *GRAPHIC, *NOPICXGRAPHIC, *PICXGRAPHIC, *NOPICGGRAPHIC, *PICGGRAPHIC</td>
|
|
<td valign="top">Optional, Positional 4</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.SQLOPT"><b>SQLOPT</b></a></td>
|
|
<td valign="top">SQL Options</td>
|
|
<td valign="top">Values (up to 10 repetitions): <b><u>*NOSOURCE</u></b>, *NOSRC, *SOURCE, *SRC, *XREF, *NOXREF, *GEN, *NOGEN, *JOB, *SYSVAL, *PERIOD, *COMMA, *QUOTESQL, *APOSTSQL, *QUOTE, *APOST, *SECLVL, *NOSECLVL, *SQL, *SYS</td>
|
|
<td valign="top">Optional, Positional 5</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.CBLOPT"><b>CBLOPT</b></a></td>
|
|
<td valign="top">COBOL options</td>
|
|
<td valign="top">Values (up to 6 repetitions): *NOSOURCE, *NOSRC, <b><u>*SOURCE</u></b>, *SRC, *RANGE, *NORANGE, *NOOPTIMIZE, *OPTIMIZE, *LSTDBG, *NOLSTDBG, *NOSTDTRUNC, *STDTRUNC</td>
|
|
<td valign="top">Optional, Positional 6</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top" rowspan="3"><a href="#CRTCICSCBL.OUTFILE"><b>OUTFILE</b></a></td>
|
|
<td valign="top">CICS Output file</td>
|
|
<td valign="top"><i>Qualified object name</i></td>
|
|
<td valign="top" rowspan="3">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top">Qualifier 1: CICS Output file</td>
|
|
<td valign="top"><i>Name</i>, <b><u>QACYCICS</u></b></td>
|
|
</tr><tr>
|
|
<td valign="top">Qualifier 2: Library</td>
|
|
<td valign="top"><i>Name</i>, <b><u>QTEMP</u></b>, *LIBL, *CURLIB</td>
|
|
</tr><tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.OUTMBR"><b>OUTMBR</b></a></td>
|
|
<td valign="top">CICS Output member</td>
|
|
<td valign="top"><i>Name</i>, <b><u>*PGM</u></b></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.TGTRLS"><b>TGTRLS</b></a></td>
|
|
<td valign="top">Target release</td>
|
|
<td valign="top"><i>Character value</i></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.ACTGRP"><b>ACTGRP</b></a></td>
|
|
<td valign="top">Activation group</td>
|
|
<td valign="top"><i>Name</i>, <b><u>QILE</u></b>, *NEW, *CALLER</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top" rowspan="3"><a href="#CRTCICSCBL.INCFILE"><b>INCFILE</b></a></td>
|
|
<td valign="top">INCLUDE file</td>
|
|
<td valign="top"><i>Qualified object name</i></td>
|
|
<td valign="top" rowspan="3">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top">Qualifier 1: INCLUDE file</td>
|
|
<td valign="top"><i>Name</i>, <b><u>*SRCFILE</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="#CRTCICSCBL.ALWCPYDTA"><b>ALWCPYDTA</b></a></td>
|
|
<td valign="top">Allow copy of data</td>
|
|
<td valign="top"><b><u>*YES</u></b>, *OPTIMIZE, *NO</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.ALWBLK"><b>ALWBLK</b></a></td>
|
|
<td valign="top">Allow blocking</td>
|
|
<td valign="top"><b><u>*READ</u></b>, *NONE, *ALLREAD</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.DLYPRP"><b>DLYPRP</b></a></td>
|
|
<td valign="top">Delay PREPARE</td>
|
|
<td valign="top"><b><u>*NO</u></b>, *YES</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.CLOSQLCSR"><b>CLOSQLCSR</b></a></td>
|
|
<td valign="top">Close SQL cursor</td>
|
|
<td valign="top"><b><u>*OBJTYPE</u></b>, *ENDPGM, *ENDSQL, *ENDJOB, *ENDACTGRP, *ENDMOD</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.CICSGENLVL"><b>CICSGENLVL</b></a></td>
|
|
<td valign="top">CICS gen. severity level</td>
|
|
<td valign="top"><b><u>10</u></b>, 20, 30, 40</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.CBLGENLVL"><b>CBLGENLVL</b></a></td>
|
|
<td valign="top">COBOL gen. severity level</td>
|
|
<td valign="top">0-29, <b><u>29</u></b></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.SQLGENLVL"><b>SQLGENLVL</b></a></td>
|
|
<td valign="top">SQL gen. severity level</td>
|
|
<td valign="top"><b><u>10</u></b>, 20, 30, 40</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.SAAFLAG"><b>SAAFLAG</b></a></td>
|
|
<td valign="top">SAA Flagging</td>
|
|
<td valign="top"><b><u>*NOFLAG</u></b>, *FLAG</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.FLAGSTD"><b>FLAGSTD</b></a></td>
|
|
<td valign="top">ANS Flagging</td>
|
|
<td valign="top"><b><u>*NONE</u></b>, *ANS</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.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" rowspan="3"><a href="#CRTCICSCBL.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>, *LIBL, *CURLIB</td>
|
|
</tr><tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.LANGID"><b>LANGID</b></a></td>
|
|
<td valign="top">Language identifier</td>
|
|
<td valign="top"><i>Character value</i></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.DATFMT"><b>DATFMT</b></a></td>
|
|
<td valign="top">Date Format</td>
|
|
<td valign="top"><b><u>*JOB</u></b>, *USA, *ISO, *EUR, *JIS, *MDY, *DMY, *YMD, *JUL</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.TIMFMT"><b>TIMFMT</b></a></td>
|
|
<td valign="top">Time Format</td>
|
|
<td valign="top"><b><u>*HMS</u></b>, *USA, *ISO, *EUR, *JIS</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.TIMSEP"><b>TIMSEP</b></a></td>
|
|
<td valign="top">Time separator character</td>
|
|
<td valign="top">' ', ':', '.', ',', <b><u>*JOB</u></b>, *BLANK</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.DATSEP"><b>DATSEP</b></a></td>
|
|
<td valign="top">Date separator character</td>
|
|
<td valign="top">' ', '.', ',', '/', '-', <b><u>*JOB</u></b>, *BLANK</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.REPLACE"><b>REPLACE</b></a></td>
|
|
<td valign="top">Replace</td>
|
|
<td valign="top"><b><u>*YES</u></b>, *NO</td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#CRTCICSCBL.DFTRDBCOL"><b>DFTRDBCOL</b></a></td>
|
|
<td valign="top">Default collection</td>
|
|
<td valign="top"><i>Name</i>, <b><u>*NONE</u></b></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
</table>
|
|
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
</div>
|
|
<div> <a name="CRTCICSCBL.PGM"></a>
|
|
<h3>Program (PGM)</h3>
|
|
<p>Specifies the qualified name by which the compiled program is known.
|
|
</p>
|
|
<p>The possible library values are:
|
|
</p>
|
|
<ul>
|
|
<li>*CURLIB: If a library is not specified, the program is created in the current library. If no current library entry exists in the library list, QGPL is used.
|
|
</li>
|
|
<li><b>library-name:</b> Specify the name of the library where the compiled program is created.
|
|
</li>
|
|
</ul>
|
|
<p><b>program-name:</b> Specify the name of the program being created that contains the CICS statements.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>If the program name you specify is the same name as an existing program, your new program replaces the existing one if the REPLACE parameter is specified as *YES (the default). If *MODULE is specified for the OBJTYPE parameter, the qualified name specified for this parameter is the name of the module object to be created.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.SRCFILE"></a>
|
|
<h3>Source file (SRCFILE)</h3>
|
|
<p>Specifies the qualified name of the source file that contains the COBOL source with the EXEC CICS or EXEC SQL statements.
|
|
</p>
|
|
<p>The possible library values are:
|
|
</p>
|
|
<ul>
|
|
<li>*LIBL: Specifies that the library list is used to locate the source file.
|
|
</li>
|
|
<li>*CURLIB: Specifies that the current library for the job is used to locate the source file. If no current library entry exists in the library list, QGPL is used.
|
|
</li>
|
|
<li><b>library-name:</b> Specify the library where the source file is located.
|
|
</li>
|
|
</ul>
|
|
<p>QLBLSRC: If a COBOL source file name is not specified, the supplied source file QLBLSRC contains the COBOL source.
|
|
</p>
|
|
<p><b>source-file-name:</b> Specify the name of the source file that contains the COBOL source. This source file should have a record length of 92 bytes. The source file can be a database file, device file, or an inline data file.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.SRCMBR"></a>
|
|
<h3>Source member (SRCMBR)</h3>
|
|
<p>Specifies the name of the source file member that contains the COBOL source. This parameter is only specified if the source file name in the SRCFILE parameter is that of a database file.
|
|
</p>
|
|
<ul>
|
|
<li>*PGM: Specifies that the COBOL source is in the source file member that has the same member name as that specified in the PGM parameter for the precompiler command.
|
|
</li>
|
|
<li><b>source-file-member-name:</b> Specify the name of the source file member that contains the COBOL source.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.COMMIT"></a>
|
|
<h3>Commitment control (COMMIT)</h3>
|
|
<p>Specifies whether SQL statements in the compiled program are run under commitment control. Files referred to in the host language source are not affected by this parameter. Only SQL tables, views, and SQL packages referred to in SQL statements are affected.
|
|
</p>
|
|
<ul>
|
|
<li>*CHG (change): Specifies the objects referred to in SQL COMMENT ON, CREATE, DROP, GRANT, LABEL ON, and REVOKE statements and the rows updated, deleted, and inserted are locked until the end of the unit of work (transaction). Uncommitted changes in other jobs can be seen.
|
|
</li>
|
|
<li>*CS (cursor stability): Specifies that objects referred to in SQL COMMENT ON, CREATE, DROP, GRANT, LABEL ON, and REVOKE statements and the rows updated, deleted, and inserted are locked until the end of the unit of work (transaction). A row that is selected, but not updated, is locked until the next row is selected. Uncommitted changes in other jobs cannot be seen.
|
|
</li>
|
|
<li>*ALL: Specifies that objects referred to in SQL COMMENT ON, CREATE, DROP, GRANT, LABEL ON, and REVOKE statements and the rows updated, deleted, and inserted are locked until the end of the unit of work (transaction). Uncommitted changes in other jobs cannot be seen.
|
|
</li>
|
|
<li>*NONE: Specifies that commitment control is not used. COMMIT and ROLLBACK statements are not allowed. Uncommitted changes in other jobs can be seen. If the SQL DROP COLLECTION statement is included in the program, *NONE must be used.
|
|
<p>
|
|
<b>Note: </b>If *CHG, *CS, or *ALL is specified, DROP COLLECTION cannot be included in the application. The default for this parameter for the Start SQL (STRSQL) command is *NONE.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.OBJTYPE"></a>
|
|
<h3>Compile type (OBJTYPE)</h3>
|
|
<p>Specifies the type of object to be created.
|
|
</p>
|
|
<p>The possible values are:
|
|
</p>
|
|
<ul>
|
|
<li>*PGM: Specifies that the translated CICS source is passed to the CRTCBLPGM command to create an OPM COBOL program object.
|
|
</li>
|
|
<li>*BNDPGM: Specifies that the translated CICS source is passed to the CRTBNDCBL command to create a bound ILE COBOL program object.
|
|
</li>
|
|
<li>*MODULE: Specifies that the translated CICS source is passed to the CRTCBLMOD command to create an ILE COBOL module object.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.TEXT"></a>
|
|
<h3>Text description (TEXT)</h3>
|
|
<p>Allows you to enter text that describes the compiled module or program and its function.
|
|
</p>
|
|
<ul>
|
|
<li>*SRCMBRTXT: Specifies that the text is taken from the source-file member being used to create the module or program. Text for a database source member can be added or changed by using the Source Entry Utility (STRSEU) command, or by using either the Add Physical File Member (ADDPFM) or Change Physical File Member (CHGPFM) command. If the source file is an inline file or a device file, the text is blank.
|
|
</li>
|
|
<li>*BLANK: No text is specified.
|
|
</li>
|
|
<li><b>'description':</b> Specify no more than 50 characters of text, enclosed in apostrophes.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.CICSOPT"></a>
|
|
<h3>CICS Options (CICSOPT)</h3>
|
|
<p>Specifies whether one or more of the following options are used when either the OPM or ILE COBOL source is CICS precompiled. If an option is specified more than once, or if two options conflict, the last option specified that does not conflict with the Compile type is used. If an option is not specified, then the default is used.
|
|
</p>
|
|
<p><b>Source Listing Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOSRC: or *NOSOURCE: Specifies that a source listing is not produced by the CICS precompiler.
|
|
</li>
|
|
<li>*SRC: or *SOURCE: Specifies that a source listing is produced by the CICS precompiler, consisting of the all the source input and error messages.
|
|
</li>
|
|
</ul>
|
|
<p><b>String Delimiter and Literal Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*QUOTE: Specifies that a double quotation mark (") is used for string delimiters within CICS statements, and also nonnumeric literals and Boolean literals in the COBOL statements.
|
|
</li>
|
|
<li>*APOST: Specifies that an apostrophe (') is used for string delimiters within CICS statements, and also for non-numeric literal and Boolean literals in the COBOL statements.
|
|
</li>
|
|
</ul>
|
|
<p><b>Cross-Reference Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOVBREF or *NOXREFCICS: Specifies that the CICS precompiler does not produce a cross-reference of EXEC CICS names.
|
|
</li>
|
|
<li>*VBREF: or XREFCICS: Specifies that the CICS precompiler produces a cross-reference between EXEC CICS names in the program and the statement numbers in the program that refer to them.
|
|
</li>
|
|
</ul>
|
|
<p><b>Debug options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NODEBUG: The precompiler will not produce code that will be passed through to CICS to be displayed by the CICS execution diagnostic facility (EDF).
|
|
</li>
|
|
<li>*DEBUG: The precompiler produces code that will be passed through to CICS to be displayed by EDF.
|
|
</li>
|
|
</ul>
|
|
<p><b>SQL precompiler option</b>
|
|
</p>
|
|
<ul>
|
|
<li>*GEN: The SQL precompiler or COBOL compiler will be called after a successful CICS precompilation.
|
|
<p>
|
|
<b>Note: </b>The SQL precompiler will only be called if during the CICS precompilation stage an EXEC SQL statement was found in the COBOL source code being CICS precompiled.
|
|
</p>
|
|
</li>
|
|
<li>*NOGEN: Job will terminate at the end of the CICS precompile.
|
|
</li>
|
|
</ul>
|
|
<p><b>Second level help text</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOSECLVL: No second level help text will be printed.
|
|
</li>
|
|
<li>*SECLVL: The second-level help text will be printed along with the first-level help text.
|
|
<p>
|
|
<b>Note: </b>The first-level help text is printed each time an error occurs.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
<p><b>DBCS enablement</b>
|
|
</p>
|
|
<ul>
|
|
<li>*GRAPHIC: The precompiler will accept double byte data. This data can only appear in columns 7 through 72. See the CICS Application Programming Guide for restrictions and examples of the use of double byte data.
|
|
<p>*NOPICXGRAPHIC: DBCS-graphic data types are declared as FILLER fields. This option is only valid for ILE COBOL objects.
|
|
</p>
|
|
<p>*PICXGRAPHIC: Fixed-length DBCS-graphic data types are declared as fixed-length alphanumeric fields, and are accessible to the ILE COBOL source program. This option is only valid for ILE COBOL objects.
|
|
</p>
|
|
<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>
|
|
<p>*PICGGRAPHIC: Fixed-length DBCS-graphic data types are declared as fixed-length G-type fields, and are accessible to the ILE COBOL source program. This option is only valid for ILE COBOL objects.
|
|
</p>
|
|
<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>
|
|
<p>*NOPICGGRAPHIC: DBCS-graphic data types are declared as FILLER fields. This option is only valid for ILE COBOL objects.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.SQLOPT"></a>
|
|
<h3>SQL Options (SQLOPT)</h3>
|
|
<p>Specifies whether one or more of the following options are used when either the OPM or ILE COBOL source is SQL precompiled. If an option is specified more than once, or if two options conflict, the last option specified that does not conflict with the Compile type is used. If an option is not specified then the default is used.
|
|
</p>
|
|
<p><b>Source Listing Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOSRC: or *NOSOURCE: Specifies that a source listing is not produced by the SQL precompiler.
|
|
</li>
|
|
<li>*SRC: or *SOURCE: Specifies that a source listing is produced by the SQL precompiler, consisting of the source and error messages.
|
|
</li>
|
|
</ul>
|
|
<p><b>Cross-Reference Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOXREF: Specifies that the SQL precompiler does not produce a cross-reference of EXEC SQL names.
|
|
</li>
|
|
<li>*XREF: Specifies that the SQL precompiler produces a cross-reference between items in the program and the numbers of the statements in the program that refer to these items.
|
|
</li>
|
|
</ul>
|
|
<p><b>Program Creation Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*GEN: The COBOL compiler will be called after a successful SQL precompilation.
|
|
</li>
|
|
<li>*NOGEN: Compilation will be complete at the end of the SQL precompilation.
|
|
</li>
|
|
</ul>
|
|
<p><b>Decimal point options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*JOB: The representation for the decimal point specified for the job at precompile time is used. This option is only valid for ILE COBOL objects.
|
|
<p>
|
|
<b>Note: </b>If QDECFMT specifies that the value used as the decimal point is a comma, any numeric constants in lists (such as in the SELECT clause and VALUES clause) must be separated by a comma followed by a blank. For example, VALUES(1,1, 2,23, 4,1) is equivalent to VALUES(1.1,2.23,4.1) where the decimal point is the period.
|
|
</p>
|
|
<p>*SYSVAL: Specifies that the value used as the decimal point is from the QDECFMT system value.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>If QDECFMT specifies that the value used as the decimal point is a comma, any numeric constants in lists (such as in the SELECT clause or the VALUES clause) must be separated by a comma followed by a blank. For example, VALUES(1,1, 2,23, 4,1) is equivalent to VALUES(1.1,2.23,4.1) in which the decimal point is a period.
|
|
</p>
|
|
</li>
|
|
<li>*PERIOD: Specifies that the value used as a decimal point is a period.
|
|
</li>
|
|
<li>*COMMA: Specifies that the value used as a decimal point is a comma.
|
|
<p>
|
|
<b>Note: </b>Any numeric constants in lists (such as in the SELECT clause, the VALUES clause, and so on ) must be separated by a comma followed by a blank. For example, VALUES(1,1, 2,23, 4,1) is equivalent to VALUES(1.1,2.23,4.1) where the decimal point is the period.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
<p><b>SQL String Delimiter Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*QUOTESQL: Specifies that a double quotation mark (") is used for string delimiters within SQL statements.
|
|
</li>
|
|
<li>*APOSTSQL: Specifies that an apostrophe (') is used for the string delimiters within SQL statements.
|
|
<p>
|
|
<b>Note: </b>If this option and the string delimiter option in CICSOPT are not set for the same delimiter, unexpected results may occur.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
<p><b>COBOL String Delimiter Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*QUOTE: The character used for nonnumeric literals and Boolean literals in the COBOL statements is the quote (").
|
|
</li>
|
|
<li>*APOST: The character used for nonnumeric literals and Boolean literals in the COBOL statements is the apostrophe (').
|
|
</li>
|
|
</ul>
|
|
<p><b>Naming Convention Option</b>
|
|
</p>
|
|
<ul>
|
|
<li>*SYS: Specifies that the OS/400 system naming convention will be used, (<u> library-name/file-name</u> ).
|
|
</li>
|
|
<li>*SQL: Specifies that the SQL naming convention will be used (<u> collection-name.table-name</u> ).
|
|
</li>
|
|
</ul>
|
|
<p><b>Second level help text</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOSECLVL: No second level help text will be printed.
|
|
</li>
|
|
<li>*SECLVL: The second-level help text will be printed along with the first-level help text.
|
|
<p>
|
|
<b>Note: </b>The first-level help text is printed each time an error occurs.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.CBLOPT"></a>
|
|
<h3>COBOL options (CBLOPT)</h3>
|
|
<p>Specifies the options to use when the object program is created. The listing may be required if a problem occurs in COBOL. Note that unpredictable results could occur when mixing CICS and COBOL file access.
|
|
</p>
|
|
<p>Some possible values are listed below. Refer to the CICS documentation for a complete list of options that are supported.
|
|
</p>
|
|
<p><b>Source Listing Options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOSRC: or *NOSOURCE: Specifies that a source listing is not produced by the compiler.
|
|
</li>
|
|
<li>*SRC or *SOURCE: Specifies that a source listing is produced by the compiler, consisting of all the source input and error messages.
|
|
</li>
|
|
</ul>
|
|
<p><b>Verify Ranges</b>
|
|
</p>
|
|
<ul>
|
|
<li>*RANGE: At run-time, the system verifies that subscripts are within the correct ranges, but does not verify index ranges. It also checks for reference modification and compiler-generated substring operations.
|
|
</li>
|
|
<li>*NORANGE: Does not verify ranges at run-time.
|
|
</li>
|
|
</ul>
|
|
<p><b>Optimization</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOOPTIMIZE: The compiler performs only standard optimizations for the program.
|
|
</li>
|
|
<li>*OPTIMIZE: The program object created may run more efficiently and may require less storage. However, specifying *OPTIMIZE can substantially increase the time required to compile a program.
|
|
</li>
|
|
</ul>
|
|
<p><b>CODE/400 options</b>
|
|
</p>
|
|
<ul>
|
|
<li>*NOLSTDBG: This option determines the kind of information you see on your programmable work station when using the IBM CoOperative Development Environment/400 product.
|
|
<p>The compiler does not produce a listing view, or listing-level debugging information.
|
|
</p>
|
|
</li>
|
|
<li>*LSTDBG: This option determines the kind of information you see on your programmable work station when using the IBM CoOperative Development Environment/400 product.
|
|
<p>The compiler produces a listing view, source-level error information, and listing-level debugging information.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
<p><b>Data truncation</b>
|
|
</p>
|
|
<ul>
|
|
<li>*STDTRUNC: 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. This option is only valid for ILE COBOL objects.
|
|
</li>
|
|
<li>*NOSTDTRUNC: 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. This option is only valid for ILE COBOL objects.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.OUTFILE"></a>
|
|
<h3>CICS Output file (OUTFILE)</h3>
|
|
<p>Specifies the qualified name of the intermediate precompiler output.
|
|
</p>
|
|
<p>The possible library values are:
|
|
</p>
|
|
<ul>
|
|
<li>*LIBL: Specifies that all libraries in the user and system portions of the job's library list are to be searched.
|
|
</li>
|
|
<li>*CURLIB: Specifies that the current library is to be searched. If no library is specified as the current library for the job, the QGPL library is used.
|
|
</li>
|
|
<li><b>library-name:</b> Specify the name of the library in which the intermediate precompiler output is to be placed.
|
|
</li>
|
|
</ul>
|
|
<p><b>source-file-name:</b> Specify the name of the source file that is to contain the intermediate precompiler output.
|
|
</p>
|
|
<p>QTEMP/QACYCICS: If an output source file name is not specified, the supplied source file QTEMP/QACYCICS is to contain the intermediate precompiler output.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.OUTMBR"></a>
|
|
<h3>CICS Output member (OUTMBR)</h3>
|
|
<p>Specifies the name of the source file member that is to contain the intermediate precompiler output. If this parameter is not specified, the program name specified on the PGM parameter is used.
|
|
</p>
|
|
<ul>
|
|
<li>*PGM: Specifies that the intermediate precompiler output has the same member name as that specified in the PGM parameter.
|
|
</li>
|
|
<li><b>source-member-name:</b> Specify the name of the source file member to which the intermediate precompiler output should be copied.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.TGTRLS"></a>
|
|
<h3>Target release (TGTRLS)</h3>
|
|
<p>Specifies the release level of the operating system on which you intend to use the object being created. In the examples given for the *CURRENT and *PRV values, and when specifying the target-release value, the format VxRxMx is used specify release, where Vx is the version, Rx is the release, and Mx is the modification level. For example, V5R3M0 is Version 5, Release 3, Modification 0.
|
|
</p>
|
|
<p>Valid values for this parameter change every release.
|
|
</p>
|
|
<p>The possible values are:
|
|
</p>
|
|
<ul>
|
|
<li>*CURRENT: The object is to be used on the release of the operating system currently running on your system. The object can also be used on a system with any subsequent release of the operating system installed.
|
|
</li>
|
|
<li>*PRV: The object is to be used on the previous release with modification level 0 of the operating system. The object can also be used on a system with any subsequent release of the operating system installed.
|
|
</li>
|
|
<li><b>release-level:</b> Specify the release level 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.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.ACTGRP"></a>
|
|
<h3>Activation group (ACTGRP)</h3>
|
|
<p>Specifies the activation group this program is associated with when it is called. It only works when the OBJTYPE parameter is *BNDPGM and the source program does not contain any SQL statement.
|
|
</p>
|
|
<ul>
|
|
<li>QILE: When this program is called, it is activated into the named activation group QILE. This is the default.
|
|
</li>
|
|
<li>*NEW: When this program is called, it is activated into a new activation group.
|
|
</li>
|
|
<li>*CALLER: When this program is called, it is activated into the caller's activation group.
|
|
</li>
|
|
<li>activation-group-name: Specify the name of the activation group to be used when this program is called.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.INCFILE"></a>
|
|
<h3>INCLUDE file (INCFILE)</h3>
|
|
<p>Specifies the qualified name of the source file that contains the members included in the program with any SQL INCLUDE statement.
|
|
</p>
|
|
<p>The possible library values are:
|
|
</p>
|
|
<ul>
|
|
<li>*LIBL: Specifies that the library list is used to locate the source file.
|
|
</li>
|
|
<li>*CURLIB: Specifies that the current library for the job is used to locate the source file. If no current library entry exists in the library list, QGPL is used.
|
|
</li>
|
|
<li>library-name: Specify the name of the library where the source file is located.
|
|
</li>
|
|
<li>*SRCFILE: Specifies the qualified source file you specified in the SRCFILE parameter that contains the source file members specified on any SQL INCLUDE statement.
|
|
</li>
|
|
<li>source-file-name: Specify the name of the source file that contains the source file members specified on any SQL INCLUDE statement. The record length of the source file you specify here must be no less than the record length of the source file you specified for the SRCFILE parameter.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.ALWCPYDTA"></a>
|
|
<h3>Allow copy of data (ALWCPYDTA)</h3>
|
|
<p>Specifies whether a copy of the data is allowed in a SELECT statement.
|
|
</p>
|
|
<ul>
|
|
<li>*YES: A copy of the data can only be used, if necessary, to run a SELECT statement.
|
|
</li>
|
|
<li>*OPTIMIZE: The system chooses whether or not to use the data retrieved directly from the database or to use a copy of the data. The decision is based on which choice will provide the best performance.
|
|
<p>This value decreases the time required for the total query. Because the copy of the data must be made before returning the first row of the result table, the time to retrieve the first row may be increased.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>If *CS or *ALL is specified on the COMMIT parameter, SQL run time ignores this parameter and uses current data.
|
|
</p>
|
|
</li>
|
|
<li>*NO: A copy of the data is not allowed. This option could return an negative SQLCODE if the clauses in the SELECT statement require a copy of the data. If the SELECT statement runs successfully, then current data was used.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.ALWBLK"></a>
|
|
<h3>Allow blocking (ALWBLK)</h3>
|
|
<p>Specifies whether the database manager can use record blocking and the extent to which blocking can be used for read-only cursors.
|
|
</p>
|
|
<p>*READ: Records are blocked for read-only retrieval of data for cursors when:
|
|
</p>
|
|
<ul>
|
|
<li>*NONE is specified on the COMMIT parameter, to indicate that commitment control is not used.
|
|
</li>
|
|
<li>The cursor is declared with a FOR FETCH ONLY clause or there are no dynamic statements that could run a positioned UPDATE or DELETE statement for the cursor.
|
|
</li>
|
|
</ul>
|
|
<p>Specifying *READ can improve the overall performance of queries that meet the above conditions and retrieve a large number or records.
|
|
</p>
|
|
<p>*NONE: Rows are not blocked for retrieval of data for cursors. Specifying *NONE:
|
|
</p>
|
|
<ul>
|
|
<li>Guarantees that the data retrieved is current.
|
|
</li>
|
|
<li>May reduce the amount of time required to retrieve the first row of data for a query.
|
|
</li>
|
|
<li>Stops the database manager from retrieving a block of data rows that is not used by the program when only the first few rows of a query are retrieved before the query is closed.
|
|
</li>
|
|
<li>Can degrade the overall performance of a query that retrieves a large number of rows.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.DLYPRP"></a>
|
|
<h3>Delay PREPARE (DLYPRP)</h3>
|
|
<p>Specifies whether the dynamic statement validation for a PREPARE statement is delayed until an OPEN, EXECUTE, or DESCRIBE statement is run. Delaying validation improves performance by eliminating duplicate validation.
|
|
</p>
|
|
<ul>
|
|
<li>*NO: Dynamic statement validation is not delayed. When the dynamic statement is prepared, the access plan is validated. When the dynamic statement is used in an OPEN or EXECUTE statement, the access plan is revalidated. Because the authority or the existence of objects referred to by the dynamic statement may change, you must still check the SQLCODE or SQLSTATE after issuing the OPEN or EXECUTE statement to ensure that the dynamic statement is still valid.
|
|
</li>
|
|
<li>*YES: Dynamic statement validation is delayed until the dynamic statement is used in an OPEN, EXECUTE, or DESCRIBE SQL statement. When the dynamic statement is used, the validation is completed and an access plan is built. If you specify *YES on this parameter for precompiled programs, you should check the SQLCODE and SQLSTATE after running an OPEN, EXECUTE, or DESCRIBE statement to ensure that the dynamic statement is valid. If you specify *YES, performance is not improved if the INTO clause is used on the PREPARE statement or if a DESCRIBE statement uses the dynamic statement before an OPEN is issued for the statement.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.CLOSQLCSR"></a>
|
|
<h3>Close SQL cursor (CLOSQLCSR)</h3>
|
|
<p>Specifies when SQL cursors are implicitly closed, SQL prepared statements are implicitly discarded, and LOCK TABLE locks are released. SQL cursors are explicitly closed by issuing the CLOSE, COMMIT (without HOLD), or ROLLBACK (without HOLD) SQL statements.
|
|
</p>
|
|
<ul>
|
|
<li>*OBJTYPE: Specifies that SQL cursors are handled according to the value defined in the *OBJTYPE parameter. If *PGM was specified then CRTCBLPGM uses *ENDPGM. If *BNDPGM was specified then CRTBNDCBL uses *ENDACTGRP.
|
|
</li>
|
|
<li>*ENDPGM: Specifies that SQL cursors are closed, SQL prepared statements are discarded, and LOCK TABLE locks are released when the program ends.
|
|
</li>
|
|
<li>*ENDSQL: Specifies that SQL cursors remain open between calls and can be fetched without running another SQL OPEN. One of the programs higher on the call stack must have run at least one SQL statement. SQL cursors are closed, SQL prepared statements discarded, and LOCK TABLE locks released when the first SQL program on the call stack ends. If *ENDSQL is specified for a program that is the first SQL program called (the first SQL program on the call stack), the program is treated as if *ENDPGM were specified.
|
|
</li>
|
|
<li>*ENDJOB: Specifies that SQL cursors remain open between calls and can be fetched without running another SQL OPEN. None of the programs higher on the call stack need to have run SQL statements. SQL cursors are left open, SQL prepared statements are preserved, and LOCK TABLE locks are held when the first SQL program on the call stack ends. SQL cursors are closed, SQL prepared statements are discarded, and LOCK TABLE locks are released when the job ends. If you are running distributed database and connected remotely, the connection is dropped.
|
|
</li>
|
|
<li>*ENDACTGRP: SQL cursors are closed and SQL prepared statements are implicitly discarded, and LOCK TABLE locks are released when the activation group ends. This option is only valid for ILE COBOL objects.
|
|
</li>
|
|
<li>*ENDMOD: SQL cursors are closed and SQL prepared statements are implicitly discarded when the module is exited. LOCK TABLE locks are released when the first SQL program on the call stack ends. This option is only valid for ILE COBOL objects.
|
|
</li>
|
|
<li>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.CICSGENLVL"></a>
|
|
<h3>CICS gen. severity level (CICSGENLVL)</h3>
|
|
<p>Specifies a level of CICS precompiler errors. If errors occur with a severity level greater than the value specified in this parameter, either the SQL precompiler is not called (if the CICS precompiler located any SQL in the source) or the COBOL compiler is not called.
|
|
</p>
|
|
<ul>
|
|
<li>10: If a severity level value is not specified, the default severity level is 10.
|
|
</li>
|
|
<li>severity-level: Specify a number from 0 through 40. Some suggested values are listed below:
|
|
<ul>
|
|
<li>10 The level value for warnings.
|
|
</li>
|
|
<li>20 The level value for general error messages.
|
|
</li>
|
|
<li>30 The level value for serious error messages.
|
|
</li>
|
|
<li>40 The level value for system detected error messages.
|
|
</li>
|
|
</ul>
|
|
<p>
|
|
<b>Note: </b>The value of CICSGENLVL only applies to messages generated as a result of CICS precompile errors. The specified CICSGENLVL value is <b>not</b> passed to the SQL precompiler or COBOL compiler.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.CBLGENLVL"></a>
|
|
<h3>COBOL gen. severity level (CBLGENLVL)</h3>
|
|
<p>Specifies a level of COBOL compiler errors. If errors occur with a severity level greater than the value specified in this parameter, then the COBOL program object is not created.
|
|
</p>
|
|
<ul>
|
|
<li>29: If a severity level value is not specified, the default severity level is 29.
|
|
</li>
|
|
<li>severity-level: Specify a number from 0 through 29.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.SQLGENLVL"></a>
|
|
<h3>SQL gen. severity level (SQLGENLVL)</h3>
|
|
<p>Specifies a level of SQL precompiler errors. If errors occur with a severity level greater than the value specified in the parameter, then the COBOL compiler is not called.
|
|
</p>
|
|
<ul>
|
|
<li>10: If no value is specified, the default severity level is 10.
|
|
</li>
|
|
<li>severity-level: Specify a number in the range 0 through 40. Some suggested values are listed below:
|
|
<ul>
|
|
<li>10 The level value for warnings.
|
|
</li>
|
|
<li>20 The level value for general error messages.
|
|
</li>
|
|
<li>30 The level value for serious error messages.
|
|
</li>
|
|
<li>40 The level value for system detected error messages.
|
|
</li>
|
|
</ul>
|
|
<p>
|
|
<b>Note: </b>The value of SQLGENLVL only applies to messages generated as a result of SQL precompilation errors. The specified SQLGENLVL value is <b>not</b> passed to the COBOL compiler.
|
|
</p>
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.SAAFLAG"></a>
|
|
<h3>SAA Flagging (SAAFLAG)</h3>
|
|
<p>Specifies whether SQL statements that do not SAA Level 2 Database standards are flagged. This parameter allows the user to flag SQL statements to verify that they conform to SAA Level 2 Database standards.
|
|
</p>
|
|
<ul>
|
|
<li>*NOFLAG: Specifies that the precompiler will <u> not</u> check for SAA standards.
|
|
</li>
|
|
<li>*FLAG: Specifies that the precompiler will check for SAA standards.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.FLAGSTD"></a>
|
|
<h3>ANS Flagging (FLAGSTD)</h3>
|
|
<p>Specifies whether nonstandard statements are flagged. This parameter allows you to flag SQL statements to verify if they have conformed to ANSI X3.135-1-1989, ANSI X3.168-1989, ISO 9075-1989, and FIPS 127.1 standards.
|
|
</p>
|
|
<ul>
|
|
<li>*NONE: Specifies that the precompiler will <u> not</u> check for ANSI standards.
|
|
</li>
|
|
<li>*ANS: Specifies that the precompiler checks for conformity to ANSI standards.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.FLAG"></a>
|
|
<h3>Flagging severity (FLAG)</h3>
|
|
<p>Specifies the minimum severity level of messages to be printed. The possible values area:
|
|
</p>
|
|
<ul>
|
|
<li>0 All messages are printed.
|
|
</li>
|
|
<li>severity-level: Enter a one or two-digit number that specifies the minimum severity level of messages that are printed. Messages that have severity levels of the specified value or higher ar listed.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.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 program will use. The possible values are:
|
|
</p>
|
|
<ul>
|
|
<li>*HEX: No sort sequence table will be used, and the hexadecimal values of the characters will be used to determine the sort sequence.
|
|
</li>
|
|
<li>*JOB: The sort sequence of the program will be resolved and associated with the program at compile time. The sort sequence table must exist in the system at compile time.
|
|
</li>
|
|
<li>*JOBRUN: The sort sequence of the program will be resolved and associated with the program at compile time. At compile time, the compiler will associate the sort sequence of the compile job with the program. At run time, this sort sequence will be replaced by the sort sequence associated with the job at run time.
|
|
</li>
|
|
<li>*LANGIDUNQ: 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.
|
|
</li>
|
|
<li>*LANGIDSHR: 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.
|
|
</li>
|
|
<li>table-name: 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 table resides can be specified. The valid values are:
|
|
<ul>
|
|
<li>*LIBL: The library list is searched to find the library where the sort sequence table is located.
|
|
</li>
|
|
<li>*CURLIB: The current library is searched. If you have not assigned a library as the current library, QGPL is used.
|
|
</li>
|
|
<li>library-name: Enter the name of the library where the sort not sequence table is found.
|
|
</li>
|
|
</ul>
|
|
</li>
|
|
<li>Note: The valid PROCESS statement options for SRTSEQ are SRTSEQ(HEX), SRTSEQ(JOB), SRTSEQ(JOBRUN), STRSEQ(LANGIDUNQ), SRTSEQ(LANGIDSHR), SRTSEQ("table-name"), SRTSEQ("library-name/table-name"), SRTSEQ("LIBL/table-name"), and SRTSEQ("CURLIB/table-name").
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.LANGID"></a>
|
|
<h3>Language identifier (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>
|
|
<ul>
|
|
<li>*JOBRUN: 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 program to be compiled once and used with different language identifiers at run time.
|
|
</li>
|
|
<li>*JOB: The language identifier of the program will be resolved at compile time.
|
|
</li>
|
|
<li>language-identifier: Enter a valid 3 character language identifier.
|
|
</li>
|
|
<li>Note: The valid PROCESS statement options for LANGID are LANGID(JOBRUN), LANGID(JOB), and LANGID("language-identifier").
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.DATFMT"></a>
|
|
<h3>Date Format (DATFMT)</h3>
|
|
<p>Specifies the format used when accessing date result columns. All output date fields are returned in the specified format. For input date strings, the specified value is used to determine if the date is in a valid format.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>An input date string that uses format *USA, *ISO, *EUR, or *JIS is always valid. If you connect to a relational database that is on a system that is not an iSeries system, *USA, *ISO, *EUR, or *JIS must be used.
|
|
</p>
|
|
<ul>
|
|
<li>*JOB: Specifies the format used for the job at precompilation. Use the Display Job (DSPJOB) command to determine the current date format for the job.
|
|
</li>
|
|
<li>*USA: The United States date format mm/dd/yyyy is used.
|
|
</li>
|
|
<li>*ISO: The International Organization for Standardization (ISO) date format yyyy-mm-dd is used.
|
|
</li>
|
|
<li>*EUR: The European date format dd.mm.yyyy is used.
|
|
</li>
|
|
<li>*JIS: The Japanese Industrial Standard date format yyyy-mm-dd is used.
|
|
</li>
|
|
<li>*MDY: The date format mm/dd/yy is used.
|
|
</li>
|
|
<li>*DMY: The date format dd/mm/yy is used.
|
|
</li>
|
|
<li>*YMD: The date format yy/mm/dd is used.
|
|
</li>
|
|
<li>*JUL: The Julian date format yy/ddd is used.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.TIMFMT"></a>
|
|
<h3>Time Format (TIMFMT)</h3>
|
|
<p>Specifies the format used when accessing time result columns. All output time fields are returned in the specified format. For input time strings, the specified value is used to determine if the time is specified in a valid format.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>An input time string that uses the format *USA, *ISO, *EUR, or *JIS is always valid. If you connect to a relational database that is on a system that is not an iSeries system, the time format must be *USA, *ISO, *EUR, *JIS, or *HMS with a time separator of colon or period.
|
|
</p>
|
|
<ul>
|
|
<li>*HMS: The hh:mm:ss format is used.
|
|
</li>
|
|
<li>*USA: The United States time format hh:mm xx is used, where xx is AM or PM.
|
|
</li>
|
|
<li>*ISO: The International Organization for Standardization (ISO) time format hh.mm.ss is used.
|
|
</li>
|
|
<li>*EUR: The European time format hh.mm.ss is used.
|
|
</li>
|
|
<li>*JIS: The Japanese Industrial standard time format hh:mm:ss is used.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.TIMSEP"></a>
|
|
<h3>Time separator character (TIMSEP)</h3>
|
|
<p>Specifies the separator used when accessing time result columns.
|
|
</p>
|
|
<p>
|
|
<b>Note: </b>This parameter applies only when *HMS is specified on the TIMFMT parameter.
|
|
</p>
|
|
<ul>
|
|
<li>*JOB The time separator specified for the job at precompile time is used. Use the Display Job (DSPJOB) command to determine the current value for the job.
|
|
</li>
|
|
<li>":": A colon (:) is used as the time separator.
|
|
</li>
|
|
<li>".": A period (.) is used as the time separator.
|
|
</li>
|
|
<li>",": A comma (,) is used as the time separator.
|
|
</li>
|
|
<li>" ": A blank space is used as the time separator.
|
|
</li>
|
|
<li>*BLANK A blank is used as the time separator.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.DATSEP"></a>
|
|
<h3>Date separator character (DATSEP)</h3>
|
|
<p>Specifies the separator used when accessing date result columns.
|
|
</p>
|
|
<ul>
|
|
<li>*JOB The date separator for the job at the precompile time is used. Use the Display Job (DSPJOB) command to determine the current value for the job.
|
|
</li>
|
|
<li>"/": A slash (/) is used as the date separator.
|
|
</li>
|
|
<li>".": A period (.) is used as the date separator.
|
|
</li>
|
|
<li>",": A comma (,) is used as the date separator.
|
|
</li>
|
|
<li>"-": A hyphen (-) is used as the date separator.
|
|
</li>
|
|
<li>" ": A blank space is used as the date separator.
|
|
</li>
|
|
<li>*BLANK A blank is used as the time separator.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.REPLACE"></a>
|
|
<h3>Replace (REPLACE)</h3>
|
|
<p>Specifies whether a SQL program is created when there is an existing SQL program the same name in the same library. The value of this parameter is passed to the CRTCBLPGM command.
|
|
</p>
|
|
<ul>
|
|
<li>*YES A CICS/SQL program is created, any existing program of the same name in the specified library is moved to QRPLOBJ. The *YES value is passed to the CRTCBLPGM command that creates the CICS/SQL program.
|
|
</li>
|
|
<li>*NO A CICS/SQL program is not created if a CICS/SQL program of the same name already exists in the specified library.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="CRTCICSCBL.DFTRDBCOL"></a>
|
|
<h3>Default collection (DFTRDBCOL)</h3>
|
|
<p>Specifies the name of the collection identifier to be used for unqualified names of tables, views, indexes, and SQL packages. This parameter applies only to static SQL statements.
|
|
</p>
|
|
<ul>
|
|
<li>*NONE: The naming convention specified on the SQLOPT parameter is used.
|
|
</li>
|
|
<li>collection name: Specifies the name of the collection identifier to be used instead of the naming convention specified on the SQLOPT parameter.
|
|
</li>
|
|
</ul>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<hr size="2" width="100%">
|
|
<div>
|
|
<h3><a name="CRTCICSCBL.COMMAND.EXAMPLES">Examples</a></h3>None
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<hr size="2" width="100%">
|
|
<div>
|
|
<h3><a name="CRTCICSCBL.ERROR.MESSAGES">Error messages</a></h3>Unknown
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#CRTCICSCBL.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
</body>
|
|
</html>
|