SQLCA 中 SQLCODE 在 COBOL-DB2 程式中的用途和使用方法
SQLCA 的 SQLCODE 欄位用於獲取 DB2 傳送到 COBOL 程式的最近執行的 SQL 查詢的返回程式碼。以下是 SQLCODE 欄位可以採取的返回程式碼範圍及其意義。
SQLCODE = 0 → 查詢執行成功,沒有任何問題。
SQLCODE > 0 → 在執行查詢時發出警告。
SQLCODE < 0 → 在執行查詢時發生錯誤。
以下是一個顯示 SQLCODE 用法的示例段落。
A010-CHECK-ORDER. EXEC SQL SELECT ORDER_DATE INTO :ORDER-DATE, FROM ORDERS WHERE ORDER_ID = :ORDER-ID END-EXEC EVALUATE SQLCODE WHEN 0 DISPLAY ‘ROW FETCHED SUCCESSFULLY’ WHEN 100 DISPLAY ‘DATA NOT FOUND’ WHEN OTHER DISPLAY ‘ERROR WHILE FETCHING THE ROW’ SQLCODE END-EVALUATE
廣告