如何在 COBOL-DB2 程序中使用 DB2 表中的特定列存储 NULL 值?
我们将利用 NULL 指示符来存储任何 DB2 表中某一列的 NULL 值。首先,我们应该将 -1 值移动到 COBOL-DB2 程序中的 NULL 指示符内。之后,我们执行 UPDATE 或 INSERT 查询来存储 NULL 值。
例如,如果我们必须更新 ORDER 表中 ORDER_ID 为 3345612 的 ORDER_DESCRIPTION 列中的 NULL 值。
A020-UPDATE-ORDERS. MOVE -1 TO ORDER-DESCRIPTION-N MOVE SPACES TO ORDER-DESCRIPTION-DATA EXEC SQL UPDATE ORDERS SET ORDER_DESCRIPTION = :ORDER-DESCRIPTION-DATA :ORDER-DESCRIPTION-N WHERE ORDER_ID = ‘3345612’ END-SQL.
ORDER-DESCRIPTION-N 在此处是 NULL 指示符。在此处需要着重指出的一点是,该段中的第二行,即以橙色高亮的该行是可选项。一旦我们在 NULL 指示符中移动了 -1,那么无论我们在数据字段中给出什么值,均只会在 DB2 表中存储 NULL 值。
广告