>>>I have some dupe records that are causing me problems and I need to delete one of the dupes for each record in several tables. Is there a way to do that without deleting each individual record by hand? Is there a way to do it using the command line?
>>
>>select KeyID, <b>recno() as RecNum</b>, count(*) as CntDups from yourtable group by KeyID ;
>> having CntDups > 1 ;
>> into cursor curDupes
>>index on KeyID tag KeyID
>>select yourtable
>>set relation to KeyID into curDupes
>>delete for found('curDupes') and recno()=curDupes.RecNum
>
>Unfortunately, this code would delete all duplicate records not just one of them.
Oops, what I was thinking :) Ok, how about new version (see changes in bold)
If it's not broken, fix it until it is.
My Blog