99 lines
5.4 KiB
HTML
99 lines
5.4 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="Interactive job log considerations" />
|
||
|
<meta name="abstract" content="The following information gives suggestions to apply to using interactive job logs." />
|
||
|
<meta name="description" content="The following information gives suggestions to apply to using interactive job logs." />
|
||
|
<meta name="DC.subject" content="interactive, job log, consideration, consideration for interactive" />
|
||
|
<meta name="keywords" content="interactive, job log, consideration, consideration for interactive" />
|
||
|
<meta name="DC.Relation" scheme="URI" content="jblog.htm" />
|
||
|
<meta name="copyright" content="(C) Copyright IBM Corporation 1998, 2006" />
|
||
|
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 1998, 2006" />
|
||
|
<meta name="DC.Format" content="XHTML" />
|
||
|
<meta name="DC.Identifier" content="cijls" />
|
||
|
<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>Interactive job log considerations</title>
|
||
|
</head>
|
||
|
<body id="cijls"><a name="cijls"><!-- --></a>
|
||
|
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
|
||
|
<h1 class="topictitle1">Interactive job log considerations</h1>
|
||
|
<div><p>The following information gives suggestions to apply to using interactive
|
||
|
job logs.</p>
|
||
|
<p>The IBM-supplied job descriptions QCTL, QINTER, and QPGMR all have a log
|
||
|
level of LOG(4 0 *NOLIST); therefore, all messages and both first- and second-level
|
||
|
text for the messages are written to the job log. However, the job logs are
|
||
|
not printed unless you specify *LIST on the SIGNOFF command. To change the
|
||
|
log level for interactive jobs, you can use the <span class="cmdname">Change
|
||
|
Job (CHGJOB)</span> or <span class="cmdname">Change Job Description (CHGJOBD)</span> command.</p>
|
||
|
<p>If a display station user uses an IBM-supplied menu or the command entry
|
||
|
display, all error messages are displayed. If the display station user uses
|
||
|
a user-written initial program, any unmonitored message causes the initial
|
||
|
program to end and a job log to be produced. However, if the initial program
|
||
|
monitors for messages, it receives control when a message is received. In
|
||
|
this case, it may be important to ensure that the job log is produced so you
|
||
|
can determine the specific error that occurred. For example, assume that the
|
||
|
initial program displays a menu that includes a sign-off option, which defaults
|
||
|
to *NOLIST. The initial program monitors for all exceptions and includes a <span class="cmdname">Change
|
||
|
Variable (CHGVAR)</span> command that changes the sign-off option to *LIST
|
||
|
if an exception occurs: </p>
|
||
|
<pre> PGM
|
||
|
DCLF MENU
|
||
|
DCL &SIGNOFFOPT TYPE(*CHAR) LEN(7) VALUE(*NOLIST)
|
||
|
.
|
||
|
.
|
||
|
.
|
||
|
MONMSG MSG(CPF0000) EXEC(GOTO ERROR)
|
||
|
PROMPT: SNDRCVF RCDFMT(PROMPT)
|
||
|
CHGVAR &IN41 '0'
|
||
|
.
|
||
|
.
|
||
|
.
|
||
|
IF (&OPTION *EQ '90') SIGNOFF LOG(&SIGNOFFOPT)
|
||
|
.
|
||
|
.
|
||
|
.
|
||
|
GOTO PROMPT
|
||
|
ERROR: CHGVAR &SIGNOFFOPT '*LIST'
|
||
|
CHGVAR &IN41 '1'
|
||
|
GOTO PROMPT
|
||
|
ENDPGM</pre>
|
||
|
<p>If an exception occurs in the previous example, the CHGVAR command changes
|
||
|
the option on the SIGNOFF command to *LIST and sets on an indicator. This
|
||
|
indicator could be used to condition a constant that displays a message informing
|
||
|
the display station user that an unexpected event has occurred and telling
|
||
|
him what to do.</p>
|
||
|
<p>If the interactive job is running a CL program or procedure, the CL commands
|
||
|
are logged only if the log level is 3 or 4 and one of the following is true:
|
||
|
</p>
|
||
|
<ul><li>You specified LOG(*YES) on the <span class="cmdname">Create Control Language Program
|
||
|
(CRTCLPGM)</span> command, the <span class="cmdname">Create Control Language Module
|
||
|
(CRTCLMOD)</span> command, or the <span class="cmdname">Create Bound CL Program (CRTBNDCL)</span> command.</li>
|
||
|
<li>You specified LOG(*JOB) on the <span class="cmdname">Create Control Language Program
|
||
|
(CRTCLPGM)</span> command, the <span class="cmdname">Create Control Language Module
|
||
|
(CRTCLMOD)</span> command, or the <span class="cmdname">Create Bound CL Program (CRTBNDCL)</span> command,
|
||
|
and (*YES) is the current LOGCLPGM job attribute. <p>You can set and change
|
||
|
the LOGCLPGM job attribute by using the LOGCLPGM parameter on the SBMJOB,
|
||
|
CRTJOBD, CRTJOBD, and CHGJOBD commands.</p>
|
||
|
</li>
|
||
|
</ul>
|
||
|
</div>
|
||
|
<div>
|
||
|
<div class="familylinks">
|
||
|
<div class="parentlink"><strong>Parent topic:</strong> <a href="jblog.htm" title="Each job has an associated job log.">Job log</a></div>
|
||
|
</div>
|
||
|
</div>
|
||
|
</body>
|
||
|
</html>
|