在程式中實現所有 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 段落中。

更新於: 14-Sep-2020

190 次瀏覽

開啟你的職業生涯

完成課程以獲得認證

開始
廣告