Rexx - Operación de eliminación

La operación DELETE es necesaria cuando desea eliminar algunos registros de su base de datos. El siguiente programa muestra el procedimiento para borrar todos los registros de EMPLEADO donde la EDAD es mayor de 20.

Ejemplo

/* 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"