Technical data

COMMIT
Makes visible any changes you made to the database
Maintains READY modes for each target realm
6. If a database exception condition occurs during the execution of a COMMIT
statement, the DBCS places a database exception condition code in the special
register DB-CONDITION. This code identifies the condition.
Additional References
Section 2.2 on reserved words (database special registers)
HP COBOL Reference Manual, Chapter 6, section on scope of statements
Section 4.8.1, on database On Error condition
USE statement (Format 3)
Section 5.2.4, on subschema description (DB)
Example
COMMIT ON ERROR PERFORM 200-DISPLAY-ERROR-ON-COMMIT
END-COMMIT.
4–22 Procedure Division