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

196 lines
11 KiB
HTML
Raw 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 in COBOL applications that use SQL" />
<meta name="abstract" content="The following figure shows the syntax for the valid host structure." />
<meta name="description" content="The following figure shows the syntax for the valid host structure." />
<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="rzajphoststruccobol" />
<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 in COBOL applications that use SQL</title>
</head>
<body id="rzajphoststruccobol"><a name="rzajphoststruccobol"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Host structure in COBOL applications that use SQL</h1>
<div><p>The following figure shows the syntax for the valid host structure.</p>
<div class="section"><pre><span><img src="./c.gif" border="0" alt="Read syntax diagram" longdesc="rzajphoststruccobolsyn1.htm" /></span><a href="#d0e13"><img src="./c.gif" border="0" alt="Skip visual syntax diagram" /></a>
>>-<i>level-1</i>--<i>variable-name</i>--.------------------------------------>
   .--------------------------------------------------------------------------.   
   V .-IS-. |   
>----<i>level-2</i>--<i>var-1</i>--+-+-PICTURE-+--+----+--<i>picture-string</i>--<i>usage-clause</i>--.-+-+->&lt;
    | '-PIC-----' |    
    +-<i>floating-point</i>--.------------------------------------+    
    +-.--<i>varchar-string</i>--.---------------------------------+    
    +-.--<i>vargraphic-string</i>--.------------------------------+    
    +-<i>lob</i>--.-----------------------------------------------+    
    +-<i>datetime</i>--.------------------------------------------+    
    +-<i>rowid</i>--.---------------------------------------------+    
    '-<i>binary</i>--.--------------------------------------------'    
floating-point
|--+----------------------------------------+------------------->
   | .-IS-. |   
   | .-USAGE--+----+-. |   
   '-+---------------+--+-COMPUTATIONAL-1-+-'   
    +-COMP-1----------+    
    +-COMPUTATIONAL-2-+    
    '-COMP-2----------'    
>--+-------------------------+----------------------------------|
   | .-IS-. |   
   '-VALUE--+----+--<i>constant</i>-'   
usage-clause
|--+--------------------------------------------+--------------->
   | .-IS-. |   
   | .-USAGE--+----+-. |   
   '-+---------------+--+-+-BINARY----------+-+-'   
    | +-COMPUTATIONAL-4-+ |    
    | '-COMP-4----------' |    
    +-+-PACKED-DECIMAL--+-+    
    | +-COMPUTATIONAL-3-+ |    
    | +-COMP-3----------+ |    
    | +-COMPUTATIONAL---+ |    
    | '-COMP------------' |    
    +-+-DISPLAY--------+--+    
    | '-<i>display-clause</i>-' |    
    '---DISPLAY-1---------'    
>--+-------------------------+----------------------------------|
   | .-IS-. |   
   '-VALUE--+----+--<i>constant</i>-'   
display-clause
   .-DISPLAY-. .-IS-. .-CHARACTER-.   
|--+---------+--SIGN--+----+--LEADING--SEPARATE--+-----------+--|
</pre><a name="d0e13"></a></div>
<div class="section"><pre><span><img src="./c.gif" border="0" alt="Read syntax diagram" longdesc="rzajphoststruccobolsyn2.htm" /></span><a href="#d0e166"><img src="./c.gif" border="0" alt="Skip visual syntax diagram" /></a>
varchar-string
    .-IS-.    
|--49--<i>var-2</i>--+-PICTURE-+--+----+--<i>picture-string-1</i>------------->
    '-PIC-----'    
    .-IS-.    
   .-USAGE--+----+-.    
>--+---------------+--+-BINARY----------+--+---------------------------------+-->
    +-COMPUTATIONAL-4-+ | .-IS-. |   
    '-COMP-4----------' '-VALUE--+----+--<i>numeric-constant</i>-'   
    .-IS-.    
>--.--49--<i>var-3</i>--+-PICTURE-+--+----+--<i>picture-string-2</i>---------->
    '-PIC-----'    
>--+----------------------------+--+-------------------------+--|
   | .-IS-. | | .-IS-. |   
   | .-USAGE--+----+-. | '-VALUE--+----+--<i>constant</i>-'   
   '-+---------------+--DISPLAY-'    
vargraphic-string
    .-IS-.    
|--49--<i>var-2</i>--+-PICTURE-+--+----+--<i>picture-string-1</i>------------->
    '-PIC-----'    
    .-IS-.    
   .-USAGE--+----+-.    
>--+---------------+--+-BINARY----------+----------------------->
    +-COMPUTATIONAL-4-+   
    '-COMP-4----------'   
>--+---------------------------------+--.----------------------->
   | .-IS-. |    
   '-VALUE--+----+--<i>numeric-constant</i>-'    
    .-IS-.    
    .-IS-. .-USAGE--+----+-.    
>--49--<i>var-3</i>--+-PICTURE-+--+----+--<i>picture-string-2</i>--+---------------+--DISPLAY-1-->
    '-PIC-----'    
>--+-------------------------+----------------------------------|
   | .-IS-. |   
   '-VALUE--+----+--<i>constant</i>-'   
</pre><a name="d0e166"></a></div>
<div class="section"><pre><span><img src="./c.gif" border="0" alt="Read syntax diagram" longdesc="rzajphoststruccobolsyn3.htm" /></span><a href="#d0e316"><img src="./c.gif" border="0" alt="Skip visual syntax diagram" /></a>
lob
    .-IS-.    
   .-USAGE--+----+-.    
|--+---------------+--SQL TYPE IS--+-+-CLOB---+--(--<i>lob-length</i>--+---+--)-+--|
    | +-DBCLOB-+ +-K-+ |   
    | '-BLOB---' '-M-' |   
    +-+-CLOB-LOCATOR---+------------------+   
    | +-DBCLOB-LOCATOR-+ |   
    | '-BLOB-LOCATOR---' |   
    '-+-CLOB-FILE---+---------------------'   
    +-DBCLOB-FILE-+    
    '-BLOB-FILE---'    
datetime
    .-OF-. .-IS-.   
|--<i>variable-name</i>--FORMAT--+----+--+-DATE------+--+----+--------->
    +-TIME------+    
    '-TIMESTAMP-'    
>--<i>format-options</i>-----------------------------------------------|
rowid
|--SQL TYPE IS ROWID--------------------------------------------|
binary
    .-IS-.    
   .-USAGE--+----+-.    
|--+---------------+--SQL TYPE IS----+-BINARY---------+--(--<i>length</i>--)----|
    +-VARBINARY------+    
    '-BINARY VARYING-'    
</pre><a name="d0e316"></a></div>
<div class="section"> <div class="note"><span class="notetitle">Notes:</span> <ol><li>level-1 indicates a COBOL level between 1 and 47.</li>
<li>level-2 indicates a COBOL level between 2 and 48 where level-2 &gt; level-1.</li>
<li>Graphic host variables, LOB host variables, and floating-point host variables
are only supported for ILE COBOL for <span class="keyword">iSeries™</span>.</li>
<li>For details on declaring numeric, character, graphic, LOB, ROWID, and
binary host variables, see the notes under numeric-host variables, character-host
variables, graphic-host variables, LOB host variables, ROWID, and binary host
variables.</li>
<li><em>format-options</em> indicates valid datetime options that are supported
by the COBOL compiler. See the <em>ILE COBOL Reference</em> manual
on the <a href="http://publib.boulder.ibm.com/iseries/v5r1/ic2924/rzaqhindex.htm">V5R1
Supplemental Manuals</a><img src="www.gif" alt="Link outside information center" /> Web site for details.</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>