122 lines
7.1 KiB
HTML
122 lines
7.1 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="concept" />
|
||
|
|
<meta name="DC.Title" content="Example: A subfile with paging by i5/OS operating system and high-level language program" />
|
||
|
|
<meta name="abstract" content="This example describes a combined method of paging a subfile that uses system resources efficiently." />
|
||
|
|
<meta name="description" content="This example describes a combined method of paging a subfile that uses system resources efficiently." />
|
||
|
|
<meta name="DC.subject" content="examples of DDS, subfile" />
|
||
|
|
<meta name="keywords" content="examples of DDS, subfile" />
|
||
|
|
<meta name="DC.Relation" scheme="URI" content="rbafpmstexamp.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="hllpagexamp" />
|
||
|
|
<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>Example: A subfile with paging by i5/OS operating
|
||
|
|
system and high-level language program</title>
|
||
|
|
</head>
|
||
|
|
<body id="hllpagexamp"><a name="hllpagexamp"><!-- --></a>
|
||
|
|
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
|
||
|
|
<h1 class="topictitle1">Example: A subfile with paging by <span class="keyword">i5/OS</span> operating
|
||
|
|
system and high-level language program</h1>
|
||
|
|
<div><p>This example describes a combined method of paging a subfile that
|
||
|
|
uses system resources efficiently.</p>
|
||
|
|
<p>In some applications, the number of records in the
|
||
|
|
subfile might be quite large. However, the application user might want to
|
||
|
|
view only the first page or two of these records. In this case, it might
|
||
|
|
be faster and more efficient for the application program to build the subfile
|
||
|
|
a page at a time as requested by the user. The <span class="keyword">i5/OS™</span> operating
|
||
|
|
system handles the paging of records in the subfile. It also returns a Page
|
||
|
|
Up key indicator to the high-level language program when another page should
|
||
|
|
be added to the end of the subfile. The application user can detect no difference
|
||
|
|
between a page-up request handled by the <span class="keyword">i5/OS</span> operating
|
||
|
|
system and one handled by the high-level language program.</p>
|
||
|
|
<pre class="screen">
|
||
|
|
NAME DEPARTMENT PHONE
|
||
|
|
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX XXXXXXXXXX NNNN
|
||
|
|
</pre>
|
||
|
|
<div class="p">The following keywords are important in the example: <p>SFLPAG<br />
|
||
|
|
SFLSIZ</p>
|
||
|
|
</div>
|
||
|
|
<p>The SFLSIZ value is larger than the SFLPAG value. The subfile is paged
|
||
|
|
by the SFLPAG value.</p>
|
||
|
|
<div class="fignone" id="hllpagexamp__o16"><a name="hllpagexamp__o16"><!-- --></a><span class="figcap">Figure 1. Subfile with paging by <span class="keyword">i5/OS</span> operating
|
||
|
|
system and high-level language program in DDS</span><pre>|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
|
||
|
|
00010A R SETSFL SFL
|
||
|
|
00020A 50 SFLNXTCHG
|
||
|
|
00030A NAME 30 0 5 2
|
||
|
|
00040A DEPT 10 5 40
|
||
|
|
00050A PHONE 4 0 5 58
|
||
|
|
00060A R SETCTL SFLCTL(SETSFL)
|
||
|
|
00070A SFLSIZ(0034) <strong>(1)</strong>
|
||
|
|
00080A SFLPAG(0017)
|
||
|
|
00090A 40 SFLDSP
|
||
|
|
00100A 41 SFLDSPCTL
|
||
|
|
00110A 42 SFLDLT
|
||
|
|
00120A 43 SFLCLR
|
||
|
|
00130A 49 SFLEND <strong>(2)</strong>
|
||
|
|
00140A N49 ROLLUP(26)
|
||
|
|
00150A LOCK
|
||
|
|
00160A OVERLAY
|
||
|
|
00170A SETRRN 4S 0H SFLRCDNBR(CURSOR)<strong>(3)</strong>
|
||
|
|
00180A 3 2'NAME'
|
||
|
|
00190A 3 40'DEPARTMENT'
|
||
|
|
00200A 3 58'PHONE'
|
||
|
|
A</pre>
|
||
|
|
</div>
|
||
|
|
<div class="p"><strong>Legend: </strong> <dl><dt class="dlterm">(1)</dt>
|
||
|
|
<dd>The SFLSIZ value must be greater than the SFLPAG
|
||
|
|
value so that the <span class="keyword">i5/OS</span> operating
|
||
|
|
system will handle paging within the subfile. A maximum of 9999 records can
|
||
|
|
be stored in the subfile.</dd>
|
||
|
|
<dt class="dlterm">(2)</dt>
|
||
|
|
<dd>The SFLEND keyword can be specified with the ROLLUP keyword. One indicator
|
||
|
|
can be used to option both keywords. The application program turns on the
|
||
|
|
indicator to disable the Page Up key and omit the plus sign (+) on the last
|
||
|
|
subfile page when the last page of the subfile is displayed.</dd>
|
||
|
|
<dt class="dlterm">(3)</dt>
|
||
|
|
<dd>The SFLRCDNBR keyword should be specified so the last subfile page can
|
||
|
|
be displayed after it is built by the high-level language program. <p>Records
|
||
|
|
in the subfile with changed input fields (modified data tags) will be changed
|
||
|
|
after a new page is added to the subfile by the high-level language program.</p>
|
||
|
|
</dd>
|
||
|
|
</dl>
|
||
|
|
</div>
|
||
|
|
</div>
|
||
|
|
<div>
|
||
|
|
<div class="familylinks">
|
||
|
|
<div class="parentlink"><strong>Parent topic:</strong> <a href="rbafpmstexamp.htm" title="This topic provides examples of data description specifications (DDS) for each type of file discussed in this topic. If you choose, you can use the examples in this topic with appropriate high-level language programs.">Examples: DDS for each file type</a></div>
|
||
|
|
</div>
|
||
|
|
</div>
|
||
|
|
</body>
|
||
|
|
</html>
|