在DB2和RPG中設置NULL值

Question

我有一個包含更新db2表的例程的rpg程序。

我已經宣佈的計劃

myvar 

If <condition> 
    %nullind(myvar) = *on 

它抱怨該字段不能夠爲空的局部變量。

我使用這個變量的SQL更新語句

UPDATE TABLE 
SET X=:myvar 

我怎麼可以設置X爲空？

Answer 1

內部定義的字段不爲空，但您可以使用外部描述的數據結構來導入表定義併爲數據庫字段啓用空值。

H ALWNULL(*USRCTL) 

D TABLE   E DS     EXTNAME(TABLE) QUALIFIED 

/FREE 
    if <condition>; 
     %nullind(table.x) = *on; 
    endif; 

    exec sql update table 
     set x = :table.x 
     where <condition>; 
/END-FREE