75 lines
4.9 KiB
HTML
75 lines
4.9 KiB
HTML
<?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="Binary host variables in COBOL applications that use SQL" />
|
||
<meta name="abstract" content="COBOL does not have variables that correspond to the SQL binary data types. To create host variables that can be used with these data types, use the SQL TYPE IS clause. The SQL precompiler replaces this declaration with a COBOL language structure in the output source member." />
|
||
<meta name="description" content="COBOL does not have variables that correspond to the SQL binary data types. To create host variables that can be used with these data types, use the SQL TYPE IS clause. The SQL precompiler replaces this declaration with a COBOL language structure in the output source member." />
|
||
<meta name="DC.Relation" scheme="URI" content="rzajpdeclaringhostcobol.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="rzajpcobbinary" />
|
||
<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>Binary host variables in COBOL applications that use SQL</title>
|
||
</head>
|
||
<body id="rzajpcobbinary"><a name="rzajpcobbinary"><!-- --></a>
|
||
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
|
||
<h1 class="topictitle1">Binary host variables in COBOL applications that use SQL</h1>
|
||
<div><p>COBOL does not have variables that correspond to the SQL binary
|
||
data types. To create host variables that can be used with these data types,
|
||
use the SQL TYPE IS clause. The SQL precompiler replaces this declaration
|
||
with a COBOL language structure in the output source member.</p>
|
||
<div class="section"><h4 class="sectiontitle">BINARY and VARBINARY</h4><pre><span><img src="./c.gif" border="0" alt="Read syntax diagram" longdesc="rzajpcobbinarysyn1.htm" /></span><a href="#d0e15"><img src="./c.gif" border="0" alt="Skip visual syntax diagram" /></a>
|
||
>>-01--<i>variable-name</i>-------------------------------------------->
|
||
|
||
.-IS-.
|
||
.-USAGE--+----+-.
|
||
>--+---------------+--SQL TYPE IS--+-BINARY---------+--(--<i>length</i>--)-->
|
||
+-VARBINARY------+
|
||
'-BINARY VARYING-'
|
||
|
||
>-- . ---------------------------------------------------------><
|
||
|
||
</pre><a name="d0e15"></a></div>
|
||
<div class="section"><div class="note"><span class="notetitle">Notes:</span> <ol><li>For BINARY host variables, the length must be in the range 1 to 32766.</li>
|
||
<li>For VARBINARY host variables, the length must be in the range 1 to 32740.</li>
|
||
<li>SQL TYPE IS, BINARY, VARBINARY, and BINARY VARYING can be in mixed case.</li>
|
||
</ol>
|
||
</div>
|
||
</div>
|
||
<div class="section"><h4 class="sectiontitle"><em>BINARY Example</em></h4><p>The following declaration: </p>
|
||
<pre>01 MY-BINARY SQL TYPE IS BINARY(200).</pre>
|
||
</div>
|
||
<div class="section"><p>Results in the generation of the following code: </p>
|
||
<pre>01 MY-BINARY PIC X(200).</pre>
|
||
</div>
|
||
<div class="section"><h4 class="sectiontitle"><em>VARBINARY Example</em></h4><p>The following declaration: </p>
|
||
<pre>01 MY-VARBINARY SQL TYPE IS VARBINARY(250).</pre>
|
||
</div>
|
||
<div class="section"><p>Results in the generation of the following structure: </p>
|
||
<pre>01 MY-VARBINARY.
|
||
49 MY-VARBINARY-LENGTH PIC 9(5) BINARY.
|
||
49 MY-VARBINARY-DATA PIC X(250).</pre>
|
||
</div>
|
||
</div>
|
||
<div>
|
||
<div class="familylinks">
|
||
<div class="parentlink"><strong>Parent topic:</strong> <a href="rzajpdeclaringhostcobol.htm" title="The COBOL precompiler only recognizes a subset of valid COBOL declarations as valid host variable declarations.">Declare host variables in COBOL applications that use SQL</a></div>
|
||
</div>
|
||
</div>
|
||
</body>
|
||
</html>
|