如何使用 COBOL 段落验证 DB2 列数据中的 NULL 值？
为了实现这一点，我们将在ORDERS表的INVOICE_ID上的SELECT查询之后使用NULL指示符。如果NULL指标的值为-1，那么我们可以得出结论，INVOIVE_ID具有空值。
下面是一个COBOL段落-
A010-CHECK-ORDER.
EXEC SQL
SELECT INVOICE_ID INTO :INVOICE_ID_DATA :INVOICE_ID_N
FROM ORDERS
WHERE ORDER_ID = ‘678542112’
END-EXEC
IF INVOICE-ID-N = -1
MOVE SPACES TO INVOICE-ID-DATA
END-IFINVOICE-ID-N在这里是一个空指示符，它由DCLGEN实用程序自动生成。