64 lines
5.1 KiB
HTML
64 lines
5.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="copyright" content="(C) Copyright IBM Corporation 2005" />
|
|||
|
|
<meta name="DC.rights.owner" content="(C) Copyright IBM Corporation 2005" />
|
|||
|
|
<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="Effect of TFRCTL on overrides: Scenario" />
|
|||
|
|
<meta name="abstract" content="The TFRCTL command replaces one program with another program at the same call level. The program to which control is transferred runs at the same call level as the program that contained the TFRCTL command. An override command in a program that transfers control to another program is not deleted during the transfer of control." />
|
|||
|
|
<meta name="description" content="The TFRCTL command replaces one program with another program at the same call level. The program to which control is transferred runs at the same call level as the program that contained the TFRCTL command. An override command in a program that transfers control to another program is not deleted during the transfer of control." />
|
|||
|
|
<meta name="DC.subject" content="overriding file, applying, at same call level, database, call level, applying overrides at, applying override, at same call level, Override with Database File (OVRDBF) command, example, at same call level, OVRDBF (Override with Database File) command, Transfer Control (TFRCTL) command, file override example, command, CL, TFRCTL (Transfer Control), file overrides, Transfer Control (TFRCTL), file overrides" />
|
|||
|
|
<meta name="keywords" content="overriding file, applying, at same call level, database, call level, applying overrides at, applying override, at same call level, Override with Database File (OVRDBF) command, example, at same call level, OVRDBF (Override with Database File) command, Transfer Control (TFRCTL) command, file override example, command, CL, TFRCTL (Transfer Control), file overrides, Transfer Control (TFRCTL), file overrides" />
|
|||
|
|
<meta name="DC.Relation" scheme="URI" content="rbal3applyovr.htm" />
|
|||
|
|
<meta name="DC.Format" content="XHTML" />
|
|||
|
|
<meta name="DC.Identifier" content="rbal3aosin" />
|
|||
|
|
<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>Effect of TFRCTL on overrides: Scenario</title>
|
|||
|
|
</head>
|
|||
|
|
<body id="rbal3aosin"><a name="rbal3aosin"><!-- --></a>
|
|||
|
|
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
|
|||
|
|
<h1 class="topictitle1">Effect of TFRCTL on overrides: Scenario</h1>
|
|||
|
|
<div><p>The TFRCTL command replaces one program with another program at
|
|||
|
|
the same call level. The program to which control is transferred runs at the
|
|||
|
|
same call level as the program that contained the TFRCTL command. An override
|
|||
|
|
command in a program that transfers control to another program is not deleted
|
|||
|
|
during the transfer of control.</p>
|
|||
|
|
<p>In the following example, program A transfers control to program B, and
|
|||
|
|
program B runs in the same call level as program A. The<a href="../cl/ovrdbf.htm"> Override with Database File (OVRDBF)</a> command
|
|||
|
|
causes the file to be positioned at the last record of the member when it
|
|||
|
|
is opened and is used for both programs A and B.</p>
|
|||
|
|
<div class="note"><span class="notetitle">Note:</span> By using the code example, you agree to the terms of the <a href="codedisclaimer.htm">Code license and disclaimer information</a>.</div>
|
|||
|
|
<div class="fignone"><span class="figcap">Figure 1. An example of the TFRCTL command</span>. <span class="figdesc">The <a href="../cl/tfrctl.htm">TFRCTL</a> command replaces one program with another
|
|||
|
|
program at the same call level, which is outlined in the figure below.</span><p><samp class="codeph">CALL PGM(A)</samp> <br />
|
|||
|
|
Program A<br />
|
|||
|
|
<br />
|
|||
|
|
<samp class="codeph">OVRDBF FILE(INPUT) POSITION(*END)</samp><br />
|
|||
|
|
<br />
|
|||
|
|
(INPUT is opened and positioned at the last<br />
|
|||
|
|
record of the member and closed after<br />
|
|||
|
|
processing.) <samp class="codeph">TFRCTL PGM(B)</samp><br />
|
|||
|
|
Program B<br />
|
|||
|
|
<br />
|
|||
|
|
(INPUT is opened and positioned at the last<br />
|
|||
|
|
record of the member.)</p>
|
|||
|
|
</div>
|
|||
|
|
</div>
|
|||
|
|
<div>
|
|||
|
|
<div class="familylinks">
|
|||
|
|
<div class="parentlink"><strong>Parent topic:</strong> <a href="rbal3applyovr.htm" title="You can perform two general types of overrides, which are file overrides and overrides for program device entries.">Apply overrides</a></div>
|
|||
|
|
</div>
|
|||
|
|
</div>
|
|||
|
|
</body>
|
|||
|
|
</html>
|