ibm-information-center/dist/eclipse/plugins/i5OS.ic.rbam6_5.4.0.1/pdump.htm

134 lines
8.2 KiB
HTML
Raw Permalink Normal View History

2024-04-02 14:02:31 +00:00
<?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="Obtain a procedure dump" />
<meta name="abstract" content="You can obtain a CL procedure dump during procedure processing." />
<meta name="description" content="You can obtain a CL procedure dump during procedure processing." />
<meta name="DC.subject" content="obtaining, program dump, program, dump, CL procedure, obtaining dump" />
<meta name="keywords" content="obtaining, program dump, program, dump, CL procedure, obtaining dump" />
<meta name="DC.Relation" scheme="URI" content="crpro.htm" />
<meta name="DC.Relation" scheme="URI" content="../rzajq/controldefaultreply.htm" />
<meta name="DC.Relation" scheme="URI" content="../cl/dmpclpgm.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="pdump" />
<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>Obtain a procedure dump</title>
</head>
<body id="pdump"><a name="pdump"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Obtain a procedure dump</h1>
<div><p>You can obtain a CL procedure dump during procedure processing. </p>
<div class="section"> <p>The CL procedure dump consists of a listing of all messages on
the procedure's message queue and the values of all variables used in the
procedure. This information may be useful in determining the cause of a problem
affecting procedure processing.</p>
<p>To obtain a CL procedure dump, do one
of the following: </p>
<ul><li>Run the <span class="cmdname">Dump CL Program (DMPCLPGM)</span> command. This command
can only be used in a CL procedure and does not end the CL procedure.</li>
<li>Enter D in response to inquiry message CPA0701 or CPA0702. The system
sends this message whenever it receives an unmonitored escape message from
a CL procedure. If the program is running in an interactive job, the system
sends the message to the job's external message queue. If the program is running
as a batch job, the system sends the message to the system operator message
queue, QSYSOPR.</li>
<li>Specify INQMSGRPY(*SYSRPYL) for the job. The IBM-supplied system reply
list specifies a reply of D for message CPA0702 or CPA0701. The system will
print a dump if it receives one of the inquiry messages.</li>
<li>Change the default reply for message CPA0701 or CPA0702 from C (cancel
program) to D (dump procedure). This prints a procedure dump whenever a function
check occurs in a CL procedure. To change the default, enter the following
command: <pre>CHGMSGD MSGID(CPA0702) MSGF(QCPFMSG) DFT(D)</pre>
<div class="note"><span class="notetitle">Note:</span> The security officer, or another user with update authority
to the QCPFMSG file, must enter the CHGMSGD command.</div>
</li>
</ul>
<p>Changing the message default causes a dump to be printed under any
of the following conditions: </p>
<ul><li>The system operator message queue is in default mode and the message is
sent from a batch job.</li>
<li>The display station user presses the Enter key without typing a response,
causing the message default to be used.</li>
<li>INQMSGRPY(*DFT) is specified for the job.</li>
</ul>
<div class="fignone"><pre> <span><strong>1</strong></span>
5722SS1 V5R3M0 040201 Control Language MYLIB/DUMPER SYSNAME 05/06/00 11:05:03<span><strong>2</strong></span> Page 1
Job name . . . . . . . . : DSP04<span><strong>3</strong></span> User name . . . . . . : SMITH <span><strong>3</strong></span> Job number . . . . . . : 01329 <span><strong>3</strong></span>
Program name . . . . . . : DUMP<span><strong>4</strong></span> Library . . . . . . . : MYLIB<span><strong>4</strong></span> Statement . . . . . . . : 1200 <span><strong>5</strong></span>
Module name . . . . . . : DUMP Procedure name . . . : DUMP
Messages
Message <span><strong>6</strong></span> Message From To
Time ID Sev Type Text Program Inst Program Inst
110503 CPC2102 00 COMP Library LARRY created. QLICRLIB *N DUMP *N
110503 CPF2110 40 ESC Library MOE not found. QLICLLIB *N DUMP *N
Variables <span><strong>7</strong></span>
Variable Type Length Value Value in Hexadecimal
*...+....1....+....2....+ * . . . + . . . . 1 . . . . + . . . . 2 . . . . +
&amp;ABC *CHAR 10 'ONE ' D6D5C540404040404040
&amp;XYZ *CHAR 10 'TWO ' E3E6D640404040404040
* * * * * E N D O F D U M P * * * * *</pre>
</div>
<dl><dt class="dlterm"><span>1</span></dt>
<dd>The program number, release, modification level and date of i5/OS™.</dd>
<dt class="dlterm"><span>2</span></dt>
<dd>The date and time the dump was printed.</dd>
<dt class="dlterm"><span>3</span></dt>
<dd>The fully qualified name of the job in which the procedure was running.</dd>
<dt class="dlterm"><span>4</span></dt>
<dd>The name and library of the program.</dd>
<dt class="dlterm"><span>5</span></dt>
<dd>The number of the statement running when the dump was taken. If the command
is a nested command, the statement number is that of the outer command.</dd>
<dt class="dlterm"><span>6</span></dt>
<dd>Each message on the call message queue, including the time the message
was sent, message ID, severity, type, text, sending program and instruction
number, and receiving program and instruction number.</dd>
<dt class="dlterm"><span>7</span></dt>
<dd>All variables declared in the procedure, including variable name, type,
length, value, and hexadecimal value. <p>If a decimal variable contains decimal
data that is not valid, the character and hexadecimal values are printed as
*CHAR variables.</p>
<p>If the value for the variable cannot be located, *NOT
ADDRESSABLE is printed. This can occur if the CL procedure is used in a command
processing program for a command that has a parameter with either TYPE(*NULL)
or PASSVAL(*NULL) specified, or if RTNVAL(*YES) was specified for the parameter
and a return variable is not coded on the command.</p>
<p>If a variable is
declared as TYPE(*LGL), it is shown on the dump as *CHAR with a length of
1.</p>
</dd>
</dl>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="crpro.htm" title="A CL source procedure must be compiled into a module and bound into a program before it can be run.">Compile CL procedures</a></div>
</div>
<div class="relinfo"><strong>Related information</strong><br />
<div><a href="../rzajq/controldefaultreply.htm">Controlling the default reply to the query governor inquiry message</a></div>
<div><a href="../cl/dmpclpgm.htm">Dump CL Program (DMPCLPGM) command</a></div>
</div>
</div>
</body>
</html>