RXS_Catch()
This subprocedure can be used to catch an error thrown by RXS_Throw() or via other methods. The error information is retrieved into a RXS_CatchThrowErrorDS_t data structure.
Typical usage involves this subprocedure being called inside the ON-ERROR section of a MONITOR group.
Subprocedure Prototype
|
Example Code
*--------------------------------------------------------------
* This example demonstrates calling RXS_Catch() and assigning the return
* value to a RXS_CatchThrowErrorDS_t datastructure.
*--------------------------------------------------------------
H DFTACTGRP(*NO) BNDDIR('RXSBND') ACTGRP(*CALLER)
/copy QRPGLECPY,RXSCB
D gErrorDS DS Likeds(RXS_CatchThrowErrorDS_t)
D Inz(*Likeds)
/free
RXS_ResetDS( gErrorDS : RXS_DS_TYPE_CATCHTHROWERROR );
gErrorDS = RXS_Catch();
*INLR = *ON;
/end-free
Data Structures
|
|
|
The message ID that was received. |
|
The message file used to store the message ID. |
|
The message data to be merged with the text of the message ID. |
|
|
|
The type of message that was sent. Valid Values:
|
|
The full message text that combines the value of the message ID's text and the merged message data. |
|
Not used. Used by RXS_Throw() only. Valid Values:
Default Value: |