ibm-information-center/dist/eclipse/plugins/i5OS.ic.ddm_5.4.0.1/rbae5cobstatements.htm

131 lines
7.7 KiB
HTML
Raw Permalink Normal View History

2024-04-02 14:02:31 +00:00
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="en-us" xml:lang="en-us">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta name="security" content="public" />
<meta name="Robots" content="index,follow" />
<meta http-equiv="PICS-Label" content='(PICS-1.1 "http://www.icra.org/ratingsv02.html" l gen true r (cz 1 lz 1 nz 1 oz 1 vz 1) "http://www.rsac.org/ratingsv01.html" l gen true r (n 0 s 0 v 0 l 0) "http://www.classify.org/safesurf/" l gen true r (SS~~000 1))' />
<meta name="DC.Type" content="reference" />
<meta name="DC.Title" content="ILE COBOL statements" />
<meta name="abstract" content="These topics describe considerations you should be aware of when using ILE COBOL statements to access remote VSAM data sets." />
<meta name="description" content="These topics describe considerations you should be aware of when using ILE COBOL statements to access remote VSAM data sets." />
<meta name="DC.Relation" scheme="URI" content="rbae5xcobol.htm" />
<meta name="copyright" content="(C) Copyright IBM Corporation 1999, 2006" />
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 1999, 2006" />
<meta name="DC.Format" content="XHTML" />
<meta name="DC.Identifier" content="rbae5cobstatements" />
<meta name="DC.Language" content="en-us" />
<!-- 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. -->
<link rel="stylesheet" type="text/css" href="./ibmdita.css" />
<link rel="stylesheet" type="text/css" href="./ic.css" />
<title>ILE COBOL statements</title>
</head>
<body id="rbae5cobstatements"><a name="rbae5cobstatements"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">ILE COBOL statements</h1>
<div><p>These topics describe considerations you should be aware of when
using ILE COBOL statements to access remote VSAM data sets.</p>
<div class="section"><h4 class="sectiontitle">ILE COBOL OPEN statement</h4><p>When accessing remote CICS<sup>®</sup> files,
the ILE COBOL OPEN statement must use the open modes that are specified in
the following table.</p>
<div class="tablenoborder"><a name="rbae5cobstatements__rbae5coop"><!-- --></a><table cellpadding="4" cellspacing="0" summary="" id="rbae5cobstatements__rbae5coop" width="100%" frame="border" border="1" rules="all"><caption>Table 1. Use ILE COBOL programming language to open a CICS file</caption><thead align="left"><tr><th rowspan="2" align="center" valign="bottom" width="20%" id="d0e34">ILE COBOL open mode</th>
<th colspan="4" align="center" valign="bottom" id="d0e36">VSAM data
set organization</th>
</tr>
<tr><th align="left" valign="bottom" width="20%" id="d0e39">ESDS</th>
<th align="left" valign="bottom" width="20%" id="d0e41">RRDS</th>
<th align="left" valign="bottom" width="20%" id="d0e43">KSDS</th>
<th align="left" valign="bottom" width="20%" id="d0e45">VSAM Path</th>
</tr>
</thead>
<tbody><tr><td align="left" valign="top" width="20%" headers="d0e34 ">Input</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e39 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e41 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e43 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e45 ">X</td>
</tr>
<tr><td align="left" valign="top" width="20%" headers="d0e34 ">Output</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e39 ">E</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e41 ">E</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e43 ">E</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e45 ">E</td>
</tr>
<tr><td align="left" valign="top" width="20%" headers="d0e34 ">Input/Output</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e39 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e41 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e43 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e45 ">E</td>
</tr>
<tr><td align="left" valign="top" width="20%" headers="d0e34 ">Extend</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e39 ">X</td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e41 "></td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e43 "></td>
<td align="left" valign="top" width="20%" headers="d0e36 d0e45 "></td>
</tr>
<tr><td colspan="5" align="left" valign="top" headers="d0e34 d0e36 d0e39 d0e41 d0e43 d0e45 "><div class="p">Where: <dl><dt class="dlterm">X</dt>
<dd>Shows the open mode is allowed.</dd>
<dt class="dlterm">E</dt>
<dd>Shows the open mode is allowed by ILE COBOL programming language but that
the open fails when accessing the VSAM data set. A message occurs on an <span class="keyword">iSeries™</span> server.</dd>
<dt class="dlterm"></dt>
<dd>Shows the open mode is not applicable.</dd>
</dl>
</div>
</td>
</tr>
</tbody>
</table>
</div>
</div>
<div class="section"><h4 class="sectiontitle">ILE COBOL READ statement</h4><ul><li>The PRIOR phrase and the LAST phrase are not supported by CICS/DDM when
accessing a VSAM path. It is supported when accessing a VSAM KSDS.</li>
<li>Because the RELATIVE file organization can only be used to open a VSAM
RRDS, it is not possible to access records by relative record number or to
have the relative record number returned from the remote file unless the remote
file is a VSAM RRDS.</li>
</ul>
</div>
<div class="section"><h4 class="sectiontitle">ILE COBOL WRITE statement</h4><ul><li>The WRITE statement does not work when the ILE COBOL program is running
on an <span class="keyword">iSeries</span> server and the
file was opened with a RELATIVE file organization.</li>
<li>The WRITE statement does not work when writing a record to a VSAM KSDS
and the data set already contains a record with the same key value.</li>
<li>Because the input/output and output open modes cannot be used to open
a VSAM path, it is not possible to write records to a VSAM path. Instead,
the application program must write the record by using the base data set of
the VSAM path.</li>
</ul>
</div>
<div class="section"><h4 class="sectiontitle">ILE COBOL REWRITE statement</h4><ul><li>The REWRITE statement does not work when rewriting the record of a VSAM
KSDS and the key value of the record is changed.</li>
<li>Because the input/output open mode cannot be used to open a VSAM path,
it is not possible to rewrite records in a VSAM path. Instead, the application
program must rewrite the record by using the base data set of the VSAM path.</li>
</ul>
</div>
<div class="section"><h4 class="sectiontitle">ILE COBOL START statement</h4><ul><li>The START statement does work if the open mode is INPUT.</li>
</ul>
</div>
<div class="section"><h4 class="sectiontitle">ILE COBOL DELETE statement</h4><ul><li>Because the sequential file organization must be used to open a VSAM ESDS,
it is not possible to delete records in a VSAM ESDS.</li>
<li>Because the input/output open mode cannot be used to open a VSAM path,
it is not possible to delete records in a VSAM path. Instead, the application
program must delete the record by using the base data set of the VSAM path.
However, if the base data set of the VSAM path is a VSAM ESDS, the DELETE
does not work.</li>
</ul>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="rbae5xcobol.htm" title="These topics summarize the limitations that exist when using the ILE COBOL programming language to access remote VSAM data sets from an iSeries server.">ILE COBOL considerations</a></div>
</div>
</div>
</body>
</html>