Error codes associated with transaction management are stored in a special register called TRANSACTION-STATUS. These codes tell you the status of the last transaction and are documented in Appendix J.4. Transaction management errors fall into two categories:
1. For errors that occur during a START TRANSACTION, COMMIT, ROLLBACK, or call to C$RECOVER (see section 5.1.10, "Recovery"), use TRANSACTION-STATUS to determine the type of error that occurred.
2. After the execution of any file operation during a transaction, the file's FILE-STATUS variable will contain 9E if an error occurred in the transaction system. The exact nature of the error will be shown by the contents of TRANSACTION-STATUS.
The TRANSACTION-STATUS variable has the same format as a file's status variable. It is automatically created by the compiler, and is implicitly shared by all programs of a run unit. TRANSACTION-STATUS is a reserved word.
You can specify procedures for transaction error handling with the USE statement and the reserved word TRANSACTION. The syntax is:
USE AFTER STANDARD {EXCEPTION} PROCEDURE ON TRANSACTION
{ERROR }
If TRANSACTION is specified, the procedure executes when an error occurs during a START TRANSACTION, COMMIT, ROLLBACK, or call to C$RECOVER. See section 5.1.10, "Recovery."