ibm-information-center/dist/eclipse/plugins/i5OS.ic.rzaks_5.4.0.1/rzaksspcliplrecovery.htm

61 lines
4.0 KiB
HTML
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. 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="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="task" />
<meta name="DC.Title" content="Call a special IPL recovery program" />
<meta name="abstract" content="To call a special recovery program for situations when the IPL senses that the previous system ending was abnormal, you can add an autostart job entry to the subsystem description for the controlling subsystem." />
<meta name="description" content="To call a special recovery program for situations when the IPL senses that the previous system ending was abnormal, you can add an autostart job entry to the subsystem description for the controlling subsystem." />
<meta name="DC.Relation" scheme="URI" content="rzaksdailyworkmanage.htm" />
<meta name="copyright" content="(C) Copyright IBM Corporation 2004-2006" />
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 2004-2006" />
<meta name="DC.Format" content="XHTML" />
<meta name="DC.Identifier" content="rzaksspcliplrecovery" />
<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>Call a special IPL recovery program</title>
</head>
<body id="rzaksspcliplrecovery"><a name="rzaksspcliplrecovery"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Call a special IPL recovery program</h1>
<div><p>To call a special recovery program for situations when the IPL
senses that the previous system ending was abnormal, you can add an autostart
job entry to the subsystem description for the controlling subsystem.</p>
<div class="p"></div>
<div class="section">This program checks the Previous system ending status (QABNORMSW)
system value . For a normal system ending, the value of QABNORMSW is 0,
and for an abnormal system ending the value of QABNORMSW is 1. An alternative
is to drop the messages and start up other subsystems when your recovery function
is complete.</div>
<div class="example"><pre class="screen">1.00 /* SPCRECOV - Autostart program to call special recovery program */
2.00 PGM
3.00 DCL &amp;QABNORMSW *CHAR LEN(1)
4.00 RTVSYSVAL SYSVAL(QABNORMSW) RTNVAR(&amp;QABNORMSW)
5.00 IF (&amp;QABNORMSW *EQ '1') DO /* Recover */
6.00 SNDPGMMSG MSG('Recovery program in operation-do not +
7.00 start subsystems until notified') +
8.00 TOMSGQ(QSYSOPR)
9.00 CALL RECOVERY
10.00 SNDPGMMSG MSG('Recovery complete-jobs may be started') +
11.00 TOMSGQ(QSYSOPR)
12.00 ENDDO /* Recover */
13.00 ENDPGM</pre>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="rzaksdailyworkmanage.htm" title="As a system operator or administrator, one of your tasks is to keep your server running smoothly. This means you monitor, manage, and ensure that your jobs, job queues, subsystems, memory pools, job logs, and output queues function properly.">Manage work</a></div>
</div>
</div>
</body>
</html>