Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Code to delete duplicate records
Message
De
01/07/1998 14:11:06
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00113312
Message ID:
00113494
Vues:
27
>vfp 3.0 and win 95
>
>I would like some suggestions for writing some
>code to delete duplicate records that are created
>on append and insert.
>
>I am working with clipper dbf files and have tried
>literally everyway possible to prevent it from happening.
>
>Any thoughts?
>
>Thanks and have a good day!
>
>Becky

Yet another method (assuming you're not using table buffering)...

For this method to work, have index on jobnumber and SET DELETED ON.

USE table
USE table AGAIN IN 0 ORDER jobnumber table2
SET RELATION TO jobnumber INTO table2
SET SKIP TO table2

With above relation set you can:

DELETE FOR RECNO() > RECNO('table2')
this will keep the first entry

DELETE FOR RECNO() < RECNO('table2')
this will keep the last entry

BROWSE FOR RECNO('table2') # RECNO()
to browse all duplicates so that you can see what's duplicated.
Later...
/< /-/
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform