The following sellect will pull all records that have duplicate ANI's and belong to the vendor '12182' into cursor DupRecs

SET DELETE ON
SELECT Phon0701.ani, Phon0701.billdate, Phon0701.duedate,;
    Phon0701.totlocchrg, Phon0701.entrydate, Phon0701.entryby;
 FROM phon0701;
 WHERE Phon0701.vendor = '12182';
   AND Phon0701.ani IN ( ;
     SELECT ani ;
        FROM phon0701 ;
        WHERE vendor = '12182';
        GROUP BY 1 HAVING COUNT(*) > 1 ) ;
 ORDER BY Phon0701.ani;
 InTo cursor DupRecs

>Hi:
> I have a table and that table contains duplicate records. I want to copy all the duplicate records to a temp. file.
>
>SELECT Phon0701.ani, Phon0701.billdate, Phon0701.duedate,;
> Phon0701.totlocchrg, Phon0701.entrydate, Phon0701.entryby;
> FROM phon0701;
> WHERE Phon0701.vendor = '12182' and deleted() = .F.;
> ORDER BY Phon0701.ani;
> InTo cursor CmnthlyRpt
>
>How can I copy dup. rec. to a temp file? I try using set order to anii, but this did not work.
>Thanks