>>-------acu_library=--.-TRUE-.---------><
+-FALSE+
Aculibs provides certain functionality for ACUCOBOL-GT compatibility. It provides C$RERR, the library routine for obtaining extended error information from file operations, and a number of external variables (F-ERRNO, F-INT-ERRNO, F-INT2-ERRNO, F-ERRMSG) containing other error information.
External variables can provide additional information in troubleshooting situations. For example, if a database returns an error that does not map to one of the standard COBOL errors (record locked, duplicate key, etc.), the external variables F-ERRNO, F-INT-ERRNO, F-INT2-ERRNO and F-ERRMSG will contain extra information. Typically, F-ERRNO will be E_INTERNAL (which has a value of 15). F-INT-ERRNO and F-INT2-ERRNO will be the error values returned by the database, and F-ERRMSG will point to a text message returned by the database.
Add the following external declarations to working-storage:
01 F-INT-ERRNO BINARY-LONG SIGNED EXTERNAL. 01 F-INT2-ERRNO BINARY-LONG SIGNED EXTERNAL. 01 F-ERRMSG POINTER EXTERNAL. 77 F-ERRNO BINARY-SHORT SIGNED EXTERNAL.