ibm-information-center/dist/eclipse/plugins/i5OS.ic.apis_5.4.0.1/qcladdbe.htm

220 lines
6.1 KiB
HTML
Raw Normal View History

2024-04-02 14:02:31 +00:00
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta name="Copyright" content="Copyright (c) 2006 by IBM Corporation">
<title>Add Bindtime Exit (QbnAddBindtimeExit) API</title>
<!-- Begin Header Records ========================================== -->
<!-- All rights reserved. Licensed Materials Property of IBM -->
<!-- US Government Users Restricted Rights -->
<!-- Use, duplication or disclosure restricted by -->
<!-- GSA ADP Schedule Contract with IBM Corp. -->
<!-- QCLADDB SCRIPT A converted by B2H R4.1 (346) (CMS) by HOLTJM at -->
<!-- RCHVMW2 on 5 Feb 1999 at 14:56:19 -->
<!-- Change History: -->
<!-- YYMMDD USERID Change description -->
<!--File Edited By Kersten Nov 2001 -->
<!--End Header Records -->
<link rel="stylesheet" type="text/css" href="../rzahg/ic.css">
</head>
<body>
<a name="Top_Of_Page"></a>
<!-- Java sync-link -->
<script language="Javascript" src="../rzahg/synch.js" type="text/javascript">
</script>
<h2>Add Bindtime Exit (QbnAddBindtimeExit) API</h2>
<div class="box" style="width: 80%;">
<br>
&nbsp;&nbsp;Required Parameter Group:<br>
<!-- iddvc RMBR -->
<br>
<table width="100%">
<tr>
<td align="center" valign="top" width="10%">1</td>
<td align="left" valign="top" width="50%">Qualified exit program name</td>
<td align="left" valign="top" width="20%">Input</td>
<td align="left" valign="top" width="20%">Char(20)</td>
</tr>
<tr>
<td align="center" valign="top">2</td>
<td align="left" valign="top">Exit program data</td>
<td align="left" valign="top">Input</td>
<td align="left" valign="top">Char(*)</td>
</tr>
<tr>
<td align="center" valign="top">3</td>
<td align="left" valign="top">Length of exit program data</td>
<td align="left" valign="top">Input</td>
<td align="left" valign="top">Binary(4)</td>
</tr>
<tr>
<td align="center" valign="top">4</td>
<td align="left" valign="top">Error code</td>
<td align="left" valign="top">I/O</td>
<td align="left" valign="top">Char(*)</td>
</tr>
</table>
<br>
&nbsp;&nbsp;Default Public Authority: *USE<br>
<!-- iddvc RMBR -->
<br>
&nbsp;&nbsp;Service Program: QBNPREPR<br>
<!-- iddvc RMBR -->
<br>
&nbsp;&nbsp;Threadsafe: No<br>
<!-- iddvc RMBR -->
<br>
</div>
<p>The Add Bindtime Exit (QbnAddBindtimeExit) API may be used by a compiler
preprocessor to define an exit program that is called when the created module
is bound into a ILE program.</p>
<br>
<h3>Authorities and Locks</h3>
<p>None</p>
<br>
<h3>Required Parameter Group</h3>
<dl>
<dt><strong>Qualified exit program name</strong></dt>
<dd>INPUT; CHAR(20)
<p>The qualified name of the exit program to be called when the created module
is bound into an ILE program. The first 10 characters contain the program name,
which is left-justified and padded with blanks. The second 10 characters
contain the name of the library where the exit program is located and is
left-justified and padded with blanks.</p>
<p>The library name can be specified with the following special value:</p>
<table cellpadding="5">
<!-- cols="15 85" -->
<tr>
<td align="left" valign="top"><em>*LIBL</em></td>
<td align="left" valign="top">The library list.</td>
</tr>
</table>
<p>The exit program is passed five parameters when called. The first two
parameters are the exit program data and the exit program data length. The
third parameter is a reserved CHAR(10). The fourth and fifth parameters are
both reserved BINARY(4).</p>
<p>The exit program data being used in this API is defined by the user.</p>
</dd>
<dt><strong>Exit program data</strong></dt>
<dd>INPUT; CHAR(*)
<p>This data is copied into the output source file member by the
QbnEndPreProcessor API. When the exit program is called at ILE program creation
time, a copy of the data is passed. The format of this data is specified by the
supplier of the exit program. This data is ignored if the length of data to be
passed to the length of exit program data parameter value is 0.</p>
</dd>
<dt><strong>Length of exit program data</strong></dt>
<dd>INPUT; BINARY(4)
<p>The length of the data contained in the exit program data parameter.</p>
</dd>
<dt><strong>Error code</strong></dt>
<dd>I/O; CHAR(*)
<p>The structure in which to return error information. For the format of the
structure, see <a href="../apiref/error.htm#hdrerrcod">Error Code Parameter</a>.</p>
</dd>
</dl>
<br>
<h3>Error Messages</h3>
<table width="100%" cellpadding="5">
<!-- cols="15 85" -->
<tr>
<th align="left" valign="top">Message ID</th>
<th align="left" valign="top">Error Message Text</th>
</tr>
<tr>
<td width="15%" valign="top">CPF24B4 E</td>
<td width="85%" valign="top">Severe error while addressing parameter list.</td>
</tr>
<tr>
<td align="left" valign="top">CPF3C90 E</td>
<td align="left" valign="top">Literal value cannot be changed.</td>
</tr>
<tr>
<td align="left" valign="top">CPF3CF1 E</td>
<td align="left" valign="top">Error code parameter not valid.</td>
</tr>
<tr>
<td align="left" valign="top">CPF5CA4 E</td>
<td align="left" valign="top">Error occurred while addressing API
Parameter.</td>
</tr>
<tr>
<td align="left" valign="top">CPF5CEA E</td>
<td align="left" valign="top">Library value &amp;1 is not valid.</td>
</tr>
<tr>
<td align="left" valign="top">CPF5D22 E</td>
<td align="left" valign="top">Not able to locate internal data.</td>
</tr>
<tr>
<td align="left" valign="top">CPF5D24 E</td>
<td align="left" valign="top">Unexpected error occurred during preprocessor
processing.</td>
</tr>
<tr>
<td align="left" valign="top">CPF9872 E</td>
<td align="left" valign="top">Program or service program &amp;1 in library
&amp;2 ended. Reason code &amp;3.</td>
</tr>
</table>
<hr>
API introduced: V3R1
<hr>
<center>
<table cellpadding="2" cellspacing="2">
<tr align="center">
<td valign="middle" align="center"><a href="#Top_Of_Page">Top</a> | <a href=
"pgm1.htm">Program and CL Command APIs</a> | <a href="aplist.htm">APIs by
category</a></td>
</tr>
</table>
</center>
</body>
</html>