>lcUniqueTableName=sys(2015) && could not remeber this sys >select FreeTable >copy structure to (m.lcUniqueTableName) >select (m.lcUniqueTableName) >append from FreeTable >append from DBCTable >lcGroupBy="" >lnFields=fcount() >for i=1 to m.lnFields > lcGroupBy=m.lcGroupBy+field(m.i)+iif(m.i=m.lnFields,'',',') >endif > >select *, count(*) as cntDups from (m.lcUniqueTableName) ; > group by &lcGroupBy ; > having cntDups>=2 ; > into cursor curDups > >select *, count(*) as cntUnique from (m.lcUniqueTableName) ; > group by &lcGroupBy ; > having cntUnique=1 ; > into cursor curUnique > >use in select(m.lcUniqueTableName) >delete file (m.lcUniqueTableName+"*") >>