ibm-information-center/dist/eclipse/plugins/i5OS.ic.dm_5.4.0.1/rbal3aosin.htm

64 lines
5.1 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="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>