61 lines
4.0 KiB
HTML
61 lines
4.0 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="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 &QABNORMSW *CHAR LEN(1)
|
|||
|
|
4.00 RTVSYSVAL SYSVAL(QABNORMSW) RTNVAR(&QABNORMSW)
|
|||
|
|
5.00 IF (&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>
|