duplicidade de registro

Delphi

01/02/2009

Ola, caros colegas

Minha difilculdade é a seguinte sou novo ainda no delphi trabalho com D7 Ibx e FireBird 2.0, e importei alguns dados de um banco de dados DBF para minha surpresa e varios registro com codigos repetidos montei esta pesquiza que vou por como minha tentativa pelas buscas na net e nao sei o que fiz de errado;

qryPesq.Close;
qryPesq.SQL.Clear;
qryPesq.SQL.Add(´Select coddev,count(*) from Db_03 having count(*) > 1 ´);
qrypesq.SQL.Add(´group by coddev´);
qryPesq.Open;
if qryPesq.RecordCount <> 0 then
begin
MessageDlg(´Registro já Cadastrado!!!´,mtWarning,[mbOK],0);
end;


se alguem puder me dar uma ajuda serei muito grato.

Obrigado desde ja .


Pattarelli

Pattarelli

Curtidas 0

Respostas

.lg.

.lg.

01/02/2009

já tento ordenar a busca!?
SELECT CODDEV, COUNT(*)
  FROM DB_03
HAVING COUNT(*) > 1
 GROUP BY CODDEV
 ORDER BY CODDEV

Estou arriscando um palpite.
:roll:


GOSTEI 0
Pattarelli

Pattarelli

01/02/2009

Valew sua dica me ajudou, resolveu problema .......

Obrigado mesmo


Deus o abençoe.....


GOSTEI 0
POSTAR