The Error Handler is a generated Visual Adelia program named MDWERR.
By default, the MDWERR program supplied by HARDIS contains the same features as that included in v8.2. However, HARDIS also supplies a MDWERR_custom.dll program (to be renamed as MDWERR.dll) using the features presented below.
This MDWERR_custom.dll program offers a new dialog box initialized using the values defined in the MwError.ini file.
The new options of MwError.ini can be fixed using the following macros:
EXIT_ON_ERROR = 1 |
Used to interrupt the program. |
REGISTER_ERROR = 1 |
Used to register an event in the Windows events log (Application section; ApplicationName=AdeliwsAPP or value contained in the macro REGISTER_APP_NAME). |
REGISTER_APP_NAME = NomApp |
Application name used to register an event. |
DISCONNECT_ON_ERROR = 1 |
Used to forcibly disconnect the logical server. |
Check boxes
Saving an event
2 possible cases:
If this box is checked and the user closes the box using the OK button, an event is created in the Windows log, and the application continues to run.
If this box is checked and the user closes the box using the Finish button, an event is created in the Windows log, and the application terminates.
Disconnect
If this box is checked and the user closes the box using the OK button, the logical server is disconnected and the application continues to run.
Whether this box is checked or not, when the user closes the box using the Finish button, the application terminates and the related logical server is disconnected.
Note: All the strings of this message box are to be found in the RTStrings.ini file.
In addition, a user who wants to write his own error handling program can write a VADELIA program with the name IBM MDWERR. This program must then replace the default program.
This program must define the following parameters:
NUM_BIN_4 |
MwErrNb |
Middleware error number. |
BOOL |
IOMgt |
Input/output management. |
ALPHA(15) |
PgmName |
Program name. |
ALPHA(30) |
LogServ |
Name of the logical server. |
NUM_BIN_4 |
ServNb |
Service number. |
Note: You can call the error handling program by default from the new program by renaming the DLL of the former and by calling this program using the CALL instruction.
Example:
The Dll of the default program MDWERR has been renamed DEFMDWERR.
ALPHA(15) DEFAULTPGM
DEFAULTPGM = 'DEFMDWERR'
CALL &DEFAULTPGM MwErrNb IOMgt PgmName LogServ ServNb
Additional VaToolBx functions necessary to write an error handling program: