Ja, in dem Du where CURRENT OF zu Deinem Delete Statement hinzufügst.

Code:
 Exec SQL Delete From Tabelle Where Current Of Tabelle1;
Du solltest übrigens NIE auf SQLCODE = 0 abfragen, sondern immer SQLCODE < *Zeros für Fehler und SQLCODE = 100 für nicht gefunden. Manchmal wird eine Warnung (warum auch immer ) ausgegeben SQLCODE > 0, der Datensatz bzw. die Daten kommen trotzdem korrekt an.