friedkiwi/ibm-information-center
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
0332907f0f
ibm-information-center/dist/eclipse/plugins/i5OS.ic.rbam6_5.4.0.1/ussrl.htm

351 lines
23 KiB
HTML
Raw Normal View History

Add readme and dist folders
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="Use the system reply list" />
<meta name="abstract" content="The system reply list allows you to specify that the system will automatically issue the reply to specified predefined inquiry messages so the display station user does not need to reply." />
<meta name="description" content="The system reply list allows you to specify that the system will automatically issue the reply to specified predefined inquiry messages so the display station user does not need to reply." />
<meta name="DC.subject" content="system reply list, message, using system reply list, start position for compare date" />
<meta name="keywords" content="system reply list, message, using system reply list, start position for compare date" />
<meta name="DC.Relation" scheme="URI" content="msghandlereplies.htm" />
<meta name="DC.Relation" scheme="URI" content="excdm.htm" />
<meta name="DC.Relation" scheme="URI" content="bhprg.htm" />
<meta name="DC.Relation" scheme="URI" content="../cl/addmsgd.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="ussrl" />
<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>Use the system reply list</title>
</head>
<body id="ussrl"><a name="ussrl"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Use the system reply list</h1>
<div><p>The system reply list allows you to specify that the system will
automatically issue the reply to specified predefined inquiry messages so
the display station user does not need to reply.</p>
<div class="section"> <p> Only inquiry messages can be automatically responded to with
the system reply list.</p>
<p>The system reply list contains message identifiers,
optional compare data that must match the message data in the inquiry message,
a reply value for each message, and a dump attribute that effectively does
DSPJOB OUTPUT(*PRINT). The system reply list applies only to predefined inquiry
messages that are sent by a job that uses the system reply list. You specify
that a job is to use the system reply list for inquiry messages on the INQMSGRPY(*SYSRPYL)
parameter on the following commands: </p>
<ul><li><span class="cmdname">Batch Job (BCHJOB)</span></li>
<li><span class="cmdname">Submit Job (SBMJOB)</span></li>
<li><span class="cmdname">Change Job (CHGJOB)</span></li>
<li><span class="cmdname">Create Job Description (CRTJOBD)</span></li>
<li><span class="cmdname">Change Job Description (CHGJOBD)</span></li>
</ul>
<p>When a predefined inquiry message is sent by a job that uses the system
reply list, the system searches the reply list in ascending sequence number
order for an entry that matches the message identifier and, optionally, the
compare data of the inquiry message. If an entry is found, the reply specified
is issued and the user is not required to enter a reply. If an entry is not
found, the message is sent to the display station user for interactive jobs
or system operator for batch jobs.</p>
<p>The system reply list is shipped
with the system with the following initial entries defined:</p>
<div class="tablenoborder"><table cellpadding="4" cellspacing="0" summary="" width="100%" frame="border" border="1" rules="all"><thead align="left"><tr><th align="left" valign="bottom" width="20%" id="d0e65">Sequence Number</th>
<th align="left" valign="bottom" width="20%" id="d0e67">Message Identifier</th>
<th align="left" valign="bottom" width="20%" id="d0e69">Compare Value</th>
<th align="left" valign="bottom" width="20%" id="d0e71">Reply</th>
<th align="left" valign="bottom" width="20%" id="d0e73">Dump</th>
</tr>
</thead>
<tbody><tr><td align="left" valign="bottom" width="20%" headers="d0e65 ">10</td>
<td align="left" valign="bottom" width="20%" headers="d0e67 ">CPA0700</td>
<td align="left" valign="bottom" width="20%" headers="d0e69 ">*NONE</td>
<td align="left" valign="bottom" width="20%" headers="d0e71 ">D</td>
<td align="left" valign="bottom" width="20%" headers="d0e73 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="20%" headers="d0e65 ">20</td>
<td align="left" valign="bottom" width="20%" headers="d0e67 ">RPG0000</td>
<td align="left" valign="bottom" width="20%" headers="d0e69 ">*NONE</td>
<td align="left" valign="bottom" width="20%" headers="d0e71 ">D</td>
<td align="left" valign="bottom" width="20%" headers="d0e73 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="20%" headers="d0e65 ">30</td>
<td align="left" valign="bottom" width="20%" headers="d0e67 ">CBE0000</td>
<td align="left" valign="bottom" width="20%" headers="d0e69 ">*NONE</td>
<td align="left" valign="bottom" width="20%" headers="d0e71 ">D</td>
<td align="left" valign="bottom" width="20%" headers="d0e73 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="20%" headers="d0e65 ">40</td>
<td align="left" valign="bottom" width="20%" headers="d0e67 ">PLI0000</td>
<td align="left" valign="bottom" width="20%" headers="d0e69 ">*NONE</td>
<td align="left" valign="bottom" width="20%" headers="d0e71 ">D</td>
<td align="left" valign="bottom" width="20%" headers="d0e73 ">*YES</td>
</tr>
</tbody>
</table>
</div>
<p>These entries indicate that a reply of D is to be sent and a job
dump is to be taken if the message CPA0700-CPA0799, RPG0000-RPG9999, CBE0000-CBE9999,
or PLI0000-PLI9999 (which indicate a program failure) is sent by a job using
the system reply list. For the system to use these entries, you must specify
that the jobs are to use the system reply list by setting the inquiry message
reply job attribute to *SYSRPYL.</p>
<p>To add other inquiry messages to the
system reply list, use the <span class="cmdname">Add Reply List Entry (ADDRPYLE)</span> command.
On this command you can specify the sequence number, the message identifier,
optional compare data, compare data CCSID, reply action, and the dump attribute.
The ADDRPYLE command function can be easily accessed by using the <span class="cmdname">Work
with System Reply List Entries (WRKRPYLE)</span> command.</p>
<p>The following
reply actions can be specified for the inquiry messages that are placed on
the system reply list (the parameter value is given in parentheses): </p>
<ul><li>Send the default reply for the inquiry messages (*DFT). In this case,
the default reply for the message is sent. If the message ID does not identify
a default reply value the *N is sent as the reply.The message is not displayed,
and no default handling program is called.</li>
<li>Require the workstation user or system operator to respond to the message
(*RQD). If the message queue to which the message is sent (workstation message
queue for interactive jobs and QSYSOPR for batch jobs) is in break mode, the
message is displayed, and the workstation user must respond to the message.
This option operates as if the system reply list were not being used.</li>
<li>Send the reply specified in the system reply list entry (message reply,
32 characters maximum). In this case, the specified reply is sent as the
response to the message. The message is not displayed, and no default handling
program is called.</li>
</ul>
<p>The following commands add entries to the system reply list for messages
RPG1241, RPG1200, CPA4002, CPA5316, and any other inquiry messages: </p>
<ul><li><samp class="codeph">ADDRPYLE SEQNBR(15) MSGID(RPG1241) RPY(C)</samp></li>
<li><samp class="codeph">ADDRPYLE SEQNBR(18) MSGID(RPG1200) RPY(*DFT) DUMP(*YES)</samp></li>
<li><samp class="codeph">ADDRPYLE SEQNBR(22) MSGID(CPA4002) RPY(*RQD) + CMPDTA('QSYSPRT')</samp></li>
<li><samp class="codeph">ADDRPYLE SEQNBR(25) MSGID(CPA4002) RPY(G)</samp></li>
<li><samp class="codeph">ADDRPYLE SEQNBR(27) MSGID(CPA5316) RPY(I) DUMP(*NO) +
CMPDTA('QSYSPRT' 21)</samp></li>
<li><samp class="codeph">ADDRPYLE SEQNBR(9999) MSGID(*ANY) RPY(*DFT)</samp></li>
</ul>
<p>The system reply list now appears as follows:</p>
<div class="tablenoborder"><table cellpadding="4" cellspacing="0" summary="" width="100%" frame="border" border="1" rules="all"><thead align="left"><tr><th align="left" valign="bottom" width="16.666666666666664%" id="d0e172">Sequence Number</th>
<th align="left" valign="bottom" width="16.666666666666664%" id="d0e174">Message Identifier</th>
<th align="left" valign="bottom" width="16.666666666666664%" id="d0e176">Compare Value (b is a blank)</th>
<th align="left" valign="bottom" width="16.666666666666664%" id="d0e178">Compare Start Position</th>
<th align="left" valign="bottom" width="16.666666666666664%" id="d0e180">Reply</th>
<th align="left" valign="bottom" width="16.666666666666664%" id="d0e182">Dump</th>
</tr>
</thead>
<tbody><tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">10</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">CPA0700</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">D</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">15</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">RPG1241</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">C</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*NO</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">18</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">RPG1200</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">*DFT</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">20</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">RPG0000</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">D</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">22</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">CPA4002</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 "><samp class="codeph">'QSYSPRT'</samp></td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">*RQD</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*NO</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">25</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">CPA4002</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">G</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*NO</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">27</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">CPA5316</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 "><samp class="codeph">'QSYSPRT'</samp></td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">21</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">I</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*NO</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">30</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">CBE0000</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">D</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">40</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">PLI0000</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">D</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*YES</td>
</tr>
<tr><td align="left" valign="bottom" width="16.666666666666664%" headers="d0e172 ">9999</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e174 ">*ANY</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e176 ">&nbsp;</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e178 ">1</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e180 ">*DFT</td>
<td align="left" valign="bottom" width="16.666666666666664%" headers="d0e182 ">*NO</td>
</tr>
</tbody>
</table>
</div>
<p>For a job that uses this system reply list, the following occurs
when the messages that were added to the reply list are sent by the job: </p>
<ul><li>For sequence number 15, whenever an RPG1241 message is sent by a job that
uses the system reply list, a reply of C is sent and the job is not dumped.</li>
<li>For sequence number 18, a generic message identifier is used so whenever
an RPG1200 inquiry message is sent by the job, the default reply is sent.
The default reply can be the default reply specified in the message description
or the system default reply. Before the default reply is sent, the job is
dumped. The previous entry (sequence number 15) that was added overrides
this entry for message RPG1241, so RPG1241 takes the action for sequence number
15, not 18.</li>
<li>For sequence number 22, if the inquiry message CPA4002 is sent with the
compare data of QSYSPRT, the message is sent to the display station user,
and the user must issue the reply. <p>When a compare value is specified without
a start position, the compare value is compared to the message data beginning
in position 1 of the substitution data in the message.</p>
<p>Sequence number
22 tests for a printer device name of QSYSPRT. For an example of testing
one substitution variable with a different start position, see sequence number
27.</p>
</li>
<li>For sequence number 25, if the inquiry message CPA4002 (verify alignment
on printer &amp;1) is sent with the compare not equal to QSYSPRT, a reply
of G is sent. The job is not dumped. Sequence number 22 requires an operator
response to the forms alignment message if the printer device is QSYSPRT.
Sequence number 25 defines that if the forms alignment inquiry message occurs
for any other device, to assume a default response of G=Go.</li>
<li>For sequence number 27, if the inquiry message CPA5316 is sent with the
compare data of <samp class="codeph">TESTEDFILETSTLIBRARYQSYSPRT,</samp> a reply of <samp class="codeph">I</samp> is
sent. <p>When a compare value and a start position are specified, the compare
value is compared with the message data of the inquiry message beginning with
the start position. In this case, position 21 is the beginning of the third
substitution variable. For message CPA5316, the first four substitution variables
are as follows: </p>
<div class="tablenoborder"><table cellpadding="4" cellspacing="0" summary="" width="90%" frame="void" border="0" rules="none"><tbody><tr><td align="right" valign="top" width="24.403669724770644%">&amp;1</td>
<td align="right" valign="top" width="30.458715596330276%">ODP file name</td>
<td align="right" valign="top" width="24.954128440366972%">*CHAR</td>
<td align="right" valign="top" width="20.18348623853211%">10</td>
</tr>
<tr><td align="right" valign="top" width="24.403669724770644%">&amp;2</td>
<td align="right" valign="top" width="30.458715596330276%">ODP library name</td>
<td align="right" valign="top" width="24.954128440366972%">*CHAR</td>
<td align="right" valign="top" width="20.18348623853211%">10</td>
</tr>
<tr><td align="right" valign="top" width="24.403669724770644%">&amp;3</td>
<td align="right" valign="top" width="30.458715596330276%">ODP device name</td>
<td align="right" valign="top" width="24.954128440366972%">*CHAR</td>
<td align="right" valign="top" width="20.18348623853211%">10</td>
</tr>
<tr><td align="right" valign="top" width="24.403669724770644%">&amp;4</td>
<td align="right" valign="top" width="30.458715596330276%">Line number for first line</td>
<td align="right" valign="top" width="24.954128440366972%">*BIN</td>
<td align="right" valign="top" width="20.18348623853211%">2</td>
</tr>
</tbody>
</table>
</div>
<p>Therefore, sequence number 27 tests for an ODP device name of QSYSPRT
before sending a reply.</p>
</li>
<li>For sequence number <samp class="codeph">9999,</samp> the message identifier of *ANY
applies to any predefined inquiry message that is not matched by an entry
with a lower sequence number, and the default reply for these inquiry messages
is sent. If this entry were not included in the system reply list, the display
station user would have to respond to all predefined inquiry messages that
were not included in the system reply list.</li>
</ul>
<p>When the compare value contains *CCHAR data, the message data that
is from the sending function is converted to the CCSID of the message data
that is stored in the system reply list before the compare is made. The system
converts only data that is of type *CCHAR.</p>
<div class="cautiontitle">CAUTION:</div><div class="caution">The following
restrictions apply when using *CCHAR data as compare data: <ul><li>You cannot mix *CCHAR data with other data when adding this type of reply
list entry.</li>
<li>You cannot include the length of the *CCHAR data in the compare data.</li>
</ul>
<p>If you mix *CCHAR data or include the length of the *CCHAR data, unpredictable
results may occur.</p>
</div>
<p>An entry remains on the system reply list
until you use the <span class="cmdname">Remove Reply List Entry (RMVRPYLE)</span> command
to remove it. You can use the <span class="cmdname">Change Reply List Entry (CHGRPYLE)</span> command
to change the attributes of a reply list entry, and you can use the <span class="cmdname">Work
with System Reply List Entry (WRKRPYLE)</span> command to display the reply
entries currently in the reply list.</p>
<p>The job log receives a completion
message indicating a successful change when the system reply list is updated
using (ADDRPYLE), (CHGRPYLE), or (RMVRPYLE). The history log QHST also receives
a completion message to record the change.</p>
<p><img src="./delta.gif" alt="Start of change" />If messages are
added to the system reply list, it is helpful to have a CL program created
to add the entries. For example, if the reply list is damaged and gets cleared
after an IPL, the CL program can be called to re-add the entries, rather than
having users re-add entries manually.<img src="./deltaend.gif" alt="End of change" /></p>
<p><img src="./delta.gif" alt="Start of change" />If a program has not
been created to update system reply list entries another alternative to reestablish
the system reply list after they have been lost is to restore them from a
backup. This assumes a save of the system has been done and all the necessary
entries were added to the system reply list before the save.<img src="./deltaend.gif" alt="End of change" /></p>
<p><img src="./delta.gif" alt="Start of change" />A
slip install of the base operating system needs to be done with the following
steps:<img src="./deltaend.gif" alt="End of change" /></p>
</div>
<img src="./delta.gif" alt="Start of change" /><ol><li><span>With the key in MANUAL mode, do an IPL.</span></li>
<li><span>On the DST IPL/install screen, select option 2 to install.</span></li>
<li><span>On the Install Operating System screen (ie. the time/date screen),
select option 2 to change install options.</span></li>
<li><span>On the Specify Install Options screen, select option 1 to restore
program and language options from media.</span></li>
<li><span>On the Specify Restore Options screen, select option 1 to restore
for MESSAGE REPLY LIST. It is about the 3rd item on the screen. Note this
screen usually defaults to a value of 2 or 3 to indicate not to restore the
item.</span></li>
<li><span>Continue the install and the command entry display should be shown.</span></li>
<li><span>Now take the key out of manual mode.</span></li>
</ol>
<img src="./deltaend.gif" alt="End of change" /></div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="msghandlereplies.htm" title="This topic covers using a sender copy message to obtain a reply, finding the job that sent a reply, using the system reply list, and using reply handling exit programs.">Handle replies to inquiry messages</a></div>
</div>
<div class="reltasks"><strong>Related tasks</strong><br />
<div><a href="excdm.htm" title="This topic shows one way of monitoring the QSYSOPR message queue.">Place a message queue in break mode automatically</a></div>
<div><a href="bhprg.htm" title="A break-handling program is one that is automatically called when a message arrives at a message queue that is in *BREAK mode.">Use break-handling programs</a></div>
</div>
<div class="relinfo"><strong>Related information</strong><br />
<div><a href="../cl/addmsgd.htm">Add Message (ADDMSG) command</a></div>
</div>
</div>
</body>
</html>
Reference in New Issue Copy Permalink