Rexx - 更新操作

任何数据库上的 UPDATE 操作是指更新数据库中已有的一个或多个记录。以下过程将更新所有 SEX 为 'M' 的记录。

以下示例中，我们将所有男性的 AGE 增加一年。

示例

/* Main program */ 
Call RxFuncAdd 'SQLLoadFuncs', 'rexxsql', 'SQLLoadFuncs' 
Call SQLLoadFuncs 

if SQLConnect(c1,'testuser','test123','testdb') == 0 then say 'Connect Succedded' 
if SQLCommand(u1,"use testdb") == 0 then say 'Changed database to testdb' 
   sqlstr = "UPDATE EMPLOYEE SET AGE = AGE + 1 WHERE SEX = 'M'" 

say SQLCommand(c2,sqlstr)