how to run multiple SQL statements in a clientdataset or fdquery?

Question

I'm using the statement below:

procedure TdtmdlImportacao.DeleteParticipante;
begin
  fdqryDelete.Active := False;
  fdqryDelete.SQL.Clear;
  fdqryDelete.SQL.Add('DELETE FROM PARTICIPANTE');
  fdqryDelete.ExecSQL;
end;

procedure TdtmdlImportacao.DeleteProduto;
begin
  fdqryDelete.Active := False;
  fdqryDelete.SQL.Clear;
  fdqryDelete.SQL.Add('DELETE FROM PRODUTO');
  fdqryDelete.ExecSQL;
end;

I would like to make a delete all.

What database are you using? Whether this is possible or not depends in part on the DBMS. — Ken White, Nov 25 '14 at 15:55
I'm using firebird but I believe that I will need to postgres too. — Pablo Aquino, Nov 25 '14 at 17:28
Is there any deeper intention for using one query for all? Looking for a **golden ring** query? Do you know, you can execute a statement direct with `TFDConnection.ExecSQL`? — Sir Rufo, Nov 25 '14 at 18:51
I'm not able to separate a statement from the other and run it all at once ... — Pablo Aquino, Nov 27 '14 at 14:53

score 1 · Accepted Answer · answered Dec 12 '14 at 17:33

1

Did you try:

begin
  fdqryDelete.Active := False;
  fdqryDelete.SQL.Clear;
  fdqryDelete.SQL.Add('DELETE FROM PARTICIPANTE;');
  fdqryDelete.SQL.Add('DELETE FROM PRODUTO;');
  fdqryDelete.ExecSQL;
end;

with ";" at the end of each row inside ' '?

answered Dec 12 '14 at 17:33

Gem

516
1
8
19

how to run multiple SQL statements in a clientdataset or fdquery?

1 Answers1