COBOL-DB2 程序中 SQLCA 中 SQLCODE 的用途和用途是什么
SQLCA的SQLCODE字段用于获取最后一次执行的SQL查询从DB2到COBOL程序的返回码。以下是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