在程序中实现所有 SQL 语句的通用错误处理逻辑
一个 COBOL-DB2 程序可以包含多个 DB2 SQL 语句。为了在一个 COBOL-DB2 程序中实现所有 SQL 语句的通用错误处理,我们将使用 WHENEVER 语句。
WHENEVER 语句可以基于 SQLCA 的 SQLCODE 字段中返回值将控制权发送至错误处理部分或例程。例如,我们可以在 COBOL-DB2 程序中声明 WHENEVER 语句,如下所示−
EXEC SQL WHENEVER SQLERROR GOTO ERROR-ROUTINE END-EXEC
在以上示例中,仅当 SQLCODE 的值小于零时,才会设置 SQLERROR 参数,这表明在执行查询时发生错误。在这种情况下,控制权将转让到程序的 ERRORROUTINE 段落中。
广告