Rexx - 删除操作

当您想从数据库中删除某些记录时，需要执行 DELETE 操作。以下程序显示了删除 EMPLOYEE 中 AGE 大于 20 的所有记录的过程。

例子

/* 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 = "DELETE FROM EMPLOYEE WHERE AGE > 20"