Fórum Falha na exclusão de linha via Delphi e Zeos #459265

Boa tarde, amigos!

Criei uma rotina para limpar dados de uma tabela. Porém, apesar de não apresentar falha, não está deletando as linhas na tabela. quando executo o mesmo comando diretamente no banco de dados, funciona perfeitamente.
A rotina é:

with DM_OS do
begin
ZTTemp.First;
while not (ZTTemp.Eof) do
begin
if (ZTTemp.FieldByName('cnpj').AsString = FGerarLote.MaskEditCNPJ.Text) and (ZTTemp.FieldByName('estado').AsBoolean = False) then
begin
PesquisaOS.Active := false;
PesquisaOS.SQL.Clear;
PesquisaOS.SQL.Add('DELETE FROM ONLY temp WHERE chassi = ''' + ZTTemp.FieldByName('chassi').AsString + '''');
PesquisaOS.Active := true;
ZTTemp.ApplyUpdates;
end;
ZTTemp.Next;
end;
end;

Já verifiquei, através de mensagens na tela, que está entrando na rotina, está selecionando corretamente a linhas a serem deletadas, e o comando SQL está correto. Mais uma vez, informo que não há qualquer mensagem de erro nem travamento do sistema.

Alguma alma caridosa poderia me ajudar?