ibm-information-center/dist/eclipse/plugins/i5OS.ic.rzajp_5.4.0.1/rzajphostindicatorcobol.htm

72 lines
4.4 KiB
HTML
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

<?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="Host structure indicator array in COBOL applications that use SQL" />
<meta name="abstract" content="The following figure shows the syntax for valid indicator array declarations." />
<meta name="description" content="The following figure shows the syntax for valid indicator array declarations." />
<meta name="DC.subject" content="COBOL program, host structure, indicator array, host structure indicator array, COBOL" />
<meta name="keywords" content="COBOL program, host structure, indicator array, host structure indicator array, COBOL" />
<meta name="DC.Relation" scheme="URI" content="rzajphoststructurecobol.htm" />
<meta name="copyright" content="(C) Copyright IBM Corporation 1998, 2006" />
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 1998, 2006" />
<meta name="DC.Format" content="XHTML" />
<meta name="DC.Identifier" content="rzajphostindicatorcobol" />
<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>Host structure indicator array in COBOL applications that use SQL</title>
</head>
<body id="rzajphostindicatorcobol"><a name="rzajphostindicatorcobol"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Host structure indicator array in COBOL applications that use SQL</h1>
<div><p>The following figure shows the syntax for valid indicator array
declarations.</p>
<div class="section"><h4 class="sectiontitle">Host structure indicator array</h4><pre><span><img src="./c.gif" border="0" alt="Read syntax diagram" longdesc="rzajphostindicatorcobolsyn1.htm" /></span><a href="#d0e36"><img src="./c.gif" border="0" alt="Skip visual syntax diagram" /></a>
>>-<i>level-1</i>--variable-name--+-PICTURE-+-------------------------->
    '-PIC-----'   
    .-IS-.    
   .-IS-. .-USAGE--+----+-.   
>--+----+--<i>picture-string</i>--+---------------+-------------------->
    .-TIMES-.   
>--+-BINARY----------+--OCCURS--<i>dimension</i>--+-------+------------>
   +-COMPUTATIONAL-4-+    
   '-COMP-4----------'    
>--+-------------------------+--.------------------------------>&lt;
   | .-IS-. |    
   '-VALUE--+----+--<i>constant</i>-'    
</pre><a name="d0e36"></a></div>
<div class="section"> <div class="note"><span class="notetitle">Notes:</span> <ol><li>Dimension must be an integer between 1 and 32767.</li>
<li>level-1 must be an integer between 2 and 48.</li>
<li>BINARY, COMPUTATIONAL-4, and COMP-4 are equivalent. A
portable application should code BINARY because COMPUTATIONAL-4 and COMP-4
are IBM<sup>®</sup> extensions
that are not supported in ISO/ANSI COBOL. The <span class="synph"><span class="var">picture-string</span></span> associated
with these types must have the form S9(<em>i</em>) (or S9...9, with <em>i</em> instances
of 9). <em>i</em> must be less than or equal to 4.</li>
</ol>
</div>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="rzajphoststructurecobol.htm" title="A host structure is a named set of host variables that is defined in your program's DATA DIVISION.">Use host structures in COBOL applications that use SQL</a></div>
</div>
</div>
</body>
</html>