ibm-information-center/dist/eclipse/plugins/i5OS.ic.rbam6_5.4.0.1/dountilcmd.htm

86 lines
4.9 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="DOUNTIL command" />
<meta name="abstract" content="The Do Until (DOUNTIL) command processes a group of CL commands one or more times." />
<meta name="description" content="The Do Until (DOUNTIL) command processes a group of CL commands one or more times." />
<meta name="DC.subject" content="DOUNTIL (Do Until) command, Do Until (DOUNTIL) command, command, CL, DOUNTIL (Do Until), Do Until (DOUNTIL), example, DOUNTIL command" />
<meta name="keywords" content="DOUNTIL (Do Until) command, Do Until (DOUNTIL) command, command, CL, DOUNTIL (Do Until), Do Until (DOUNTIL), example, DOUNTIL command" />
<meta name="DC.Relation" scheme="URI" content="contp.htm" />
<meta name="DC.Relation" scheme="URI" content="expr.htm" />
<meta name="DC.Relation" scheme="URI" content="../clfinder/finder.htm" />
<meta name="DC.Relation" scheme="URI" content="../cl/dountil.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="dountilcmd" />
<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>DOUNTIL command</title>
</head>
<body id="dountilcmd"><a name="dountilcmd"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">DOUNTIL command</h1>
<div><p>The Do Until (DOUNTIL) command processes a group of CL commands
one or more times. </p>
<div class="section"><p>The group of commands is defined as those commands between the <span class="cmdname">Do
Until (DOUNTIL)</span> and the matching <span class="cmdname">End Do (ENDDO)</span> command.</p>
<p>After
the group of commands is processed, the stated condition is evaluated. If
the condition is true, the DOUNTIL group will be exited and processing will
resume with the next command following the associated ENDDO. If the condition
is false, the group will continue processing with the first command in the
group.</p>
<p>The logical expression on the COND parameter may be a single
logical variable or constant, or it must describe a relationship between two
or more operands; the expression is then evaluated as true or false.</p>
<p>The
following is an example of conditional processing with a Do Until (DOUNTIL)
command.</p>
<pre>DOUNTIL (&amp;LGL)
.
.
.
CHGVAR &amp;INT (&amp;INT + 1)
IF (&amp;INT *GT 5) (CHGVAR &amp;LGL '1')
ENDDO
</pre>
<p>The body of the DOUNTIL group will be run at least one time.
If the initial value of the &amp;INT variable is 5 or more, &amp;LGL will
be set to true on the first time and processing will continue following the
ENDDO when the expression is evaluated at the end of the group. If the initial
value is less than 5, the body of the group will continue to be repeated until
the value of &amp;INT is greater than 5 and the value of &amp;LGL is changed
to true.</p>
<p>The <span class="cmdname">Leave (LEAVE)</span> command may be used to
exit the DOUNTIL group and resume processing following the ENDDO. The ITERATE
command may be used to skip the remaining commands in the group and evaluate
the stated condition immediately.</p>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="contp.htm" title="You can use commands to change the flow of logic within your CL procedure.">Control processing within a CL procedure</a></div>
</div>
<div class="relref"><strong>Related reference</strong><br />
<div><a href="expr.htm" title="The logical operators *AND and *OR specify the relationship between operands in a logical expression. The logical operator *NOT is used to negate logical variables or constants.">*AND, *OR, and *NOT operators</a></div>
</div>
<div class="relinfo"><strong>Related information</strong><br />
<div><a href="../clfinder/finder.htm">CL command finder</a></div>
<div><a href="../cl/dountil.htm">Do Until (DOUNTIL) command</a></div>
</div>
</div>
</body>
</html>