Discussion :

[defluc]

Bonjour,

J'ai une table sans index qui est le résultat d'une requête.
Chaque enregistrement contient un article, ses caractéristiques et les noms et adresses de son propriétaires.

Je voudrais éliminer les doublons sur ces 2 derniers champs pour ne pas envoyer autant de courrier que chaque propriétaire n'a d'article.

J'arrive à isoler les propriétaires en doublons

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Insert into "NoDouble"  (Nom, AdresseProprio)
SELECT Nom, AdresseProprio
FROM "Liste par défaut" 
GROUP BY Nom, AdresseProprio
HAVING (count(*)>1);

, mais pas à supprimer les doublons de la table initiale.

Pour m'aider, j'ai tenté de comprendre la source donnée sur

http://blog.developpez.com/index.php...&pb=1#comments

mais l'écriture me semble bizarre : Espace dans un nom de table

your_table c0

et le contenu des deux tables n'est pas précisé.

Quelqu'un peut-il me donner une explication ?

[makowski]

repronons depuis le début et oublions les rdb$key qui ne sont peut être pas utiles dans ce cas
il vaudrait mieux dès la requête ne pas faire de doublons
c'est surement possible en réécrivant un peu la requête
c'est quoi cette requête initiale ?

[defluc]

La table est remplie par l'instruction suivante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
SqlStr := 'Insert into "'+Liste +'" ('+
          'NOM, ADRESSEPROPRIO, CODEPOSTAL, LOCALITE, '+
          'ADRESSEBIEN, DIVISION, SECT, RADICAL, EXPOSLET, EXPOSDIGIT, INDICE, '+
          'NATURE, CONTENANCE, IMPOSABIL, FINCONSTRUCT, DROITPROPRIO) '+
          'SELECT DISTINCT '+
          'NOM, ADRESSEPROPRIO, CODEPOSTAL, LOCALITE, '+
          'ADRESSEBIEN, DIV, SECT, RADICAL, EXPOSLET, EXPOSDIGIT, INDICE, '+
          'NATURE, CONTENANCE, IMPOSABIL, FINCONSTRUCT, DROITPROPRIO ';
SqlStr := SqlStr +  'From "SelectTable" ';

Les données apparaissent dans un DbGrid.
Un bouton devrait permettre à l'utilisateur d'éliminer les doublons sur le nom et l'adresse.

[makowski]

danc ce cas pourquoi ne pas faire simplement un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT DISTINCT NOM, ADRESSEPROPRIO

??
pourquoi se compliquer la vie ? et pourquoi faire des inserts ?

[defluc]

Pour des raisons opérationnelles, la table Liste (Variable) contient des doublons.
Mon problème est que je veux éliminer les doublons sur le nom et l'adresse en gardant les autres champs associés au premier enregistrement qui ne sera pas éliminé pour cause de doublon.

[makowski]

et bien tu fais un SELECT DISTINCT NOM, ADRESSEPROPRIO sur ta table Liste générée
je ne vois pas où est le problème