如何使用COBOL-DB2程序将NULL值存储在DB2表的特定列中？

我们将使用NULL指示符，以便将NULL值存储在DB2表的任何列中。首先，我们应该在COBOL-DB2程序的NULL指示符中移动值-1。之后，我们执行UPDATE或INSERT查询来存储NULL值。

例如，如果我们必须在ORDER_ID为3345612的ORDER表的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值。