User exit 5 is called by the Adabas nucleus when an event occurs with the Adabas Review hub.
An event is defined as
a connection made with the Adabas Review hub during Adabas session open;
a connection broken with the Adabas Review hub during Adabas session close; or
a non-zero return code received from the send operation for a command log record.
The exit is invoked with AMODE=31 and should return control in the same state.
The exit is required to process logging errors. It determines how the failure is handled. The record that was not logged and the response code received from the Adabas Review hub logging request are provided to assist in making the determination.
This document covers the following topics:
On entry, the register 1 points to the following parameter list:
| Parameter | Usage | ||||||||
|---|---|---|---|---|---|---|---|---|---|
| 0(R1) |
|
||||||||
| 1(R1) |
|
||||||||
| 2(R1) | Response code for logging errors. This response code is the same as the Adabas response code found in the Adabas Messages and Codes. | ||||||||
| 4(R1) | Fullword where the exit must provide a wait time (in seconds) for the logging failures that are to be retried after waiting. | ||||||||
| 8(R1) | Address of the command log record that the Adabas nucleus was attempting to send to the Adabas Review hub. | ||||||||
| R13 | save area of calling Adabas nucleus routine |
| R14 | return address in Adabas nucleus |
| R15 | entry point address for exit |
For logging errors, the exit is required to set a value in the `operation' field. If the wait value (W) is chosen, the exit is also required to provide a non-zero time value.
Register 15 should be set to zero. All other registers should be returned intact.
