The Resend all Messages command resends all messages that exist in
the current programs message queue to the previous programs message
queue. This bubbles up all messages. See the RSNLSTMSG command for
resending the last message received.
A typical command would be:
RSNALLMSG
All messages that exist in the current program would be resent to the
previous program. The messages are removed from the current programs
message queue.
If no messages exist to be resent, TAA9883 is sent as an escape
message.
RSNALLMSG may only be used in a CL program.
Handling of Escape messages
---------------------------
If an *EXCP message is found, it is turned into an *ESCAPE message.
Therefore:
** If you monitor for an escape message and want to continue
processing, remove the escape message. If you do not, a later
use of RSNALLMSG will cause the escape message to be resent
which will end the program before the other messages are
resent. If you want to record the fact that an escape message
was monitored for, use your own message sent to the job log
such as with SNDJLGMSG.
** If you monitor for an escape message (and/or the previous
diagnostic message) and want to end the program based on a
message ID, just use RSNALLMSG.
Command parameters *CMD
------------------
ACTION The action to take if the message cannot be resent.
Some types that may appear in a program message
queue may not be resent. The default is *ESCAPE to
send an escape message. *IGNORE may also be
specified to ignore the message.
Restrictions
------------
The command may only be used in a CL program.
Prerequisites
-------------
The following TAA Tools must be on your system:
RTVMSGTYPD Retrieve message type description
SNDESCMSG Send escape message
Implementation
--------------
None, the tool is ready to use.
Objects used by the tool
------------------------
Object Type Attribute Src member Src file
------ ---- --------- ---------- ----------
RSNALLMSG *CMD TAAMSHP QATTCMD
TAAMSHPC *PGM CLP TAAMSHPC QATTCL
|