>Hi All,
>
>My view is table buffered. and I have to check duplicates in it. I wana to check duplicates on cCode + dDate. In one of my other form where i am checking duplicate on only one field I was using
>
>Copy all to array for field... and then
>for i = 1 to alen(array)
>scan the array
>endfor
>
>but here i wana to check duplicates on two fields. code + date. can anyone give me idea please?
>
>Thanks in advance
>Mark

local lcTemp, lnDupes
external array arrDupes
lcTemp = sys(2015)+'.dbf'
copy fields code, date to (lcTemp)
select code, date from (lcTemp) ;
 having cnt(*) > 1 group by 1,2 ;
 into array arrDupes
lnDupes = _Tally
use in (lcTemp)
erase (lcTemp)

Cetin