Fórum Piradox !!! #143843

Olá pessoal , gostaria de saber se vcs já passaram por esta situação com esse maravilhoso banco de dados.
Eu tenho uma rotina de manutenção de dados onde ela excluirá os registros das tabelas de acordo com seus respectivos relacionamentos numa determinada data para traz Ex : <=10/01/2000.Antes de eu excluir
eu passo um pack Table nas tabelas para diminuir o tráfego daqueles registros ´sombras´ e depois eu começo a excluir os registros, chega uma determinada hora que acontece o seguinte erro : Invalid Parameter
na instrução Sql , eu conferir o comando dado para o TQuery e esta correto , abaixo segue o comando !!


Try
Dm.StartTransaction;
While Query1.eof = false do
begin
Sql:=´Delete from tabela where codigo=´;
Sql:=Sql+IntToStr(Query1.FieldByName(´Codigo´).AsInteger);
Query2.Close;
Query2.Sql.Clear;
Query2.Sql.Add(Sql);
Query2.ExecSql;
Query1.Next;
end;
Dm.Commit;
Apllication.messagebox(´Operação efetuada com
Sucesso !!´,´Atenção´,0+32);
Except On E: Exception
begin
ShowMessage(E.Message);
Dm.Rollback;
end;

end;