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