Hi Friends,

Kindly check this code, the records are getting duplicated.

IF !DIRECTORY( 'C:\DELME')
   MD C:\DELME
ENDIF
CREATE TABLE C:\DELME\X1 (F01 C(5))
FOR lnCnt = 1 TO 10000
   INSERT INTO X1 (F01) VALUES (SPACE(5))
ENDFOR
REPLACE ALL F01 WITH TRANSFORM( RECNO())
USE IN X1
 
lcCS = [Driver=Microsoft Visual Foxpro Driver;SourceDB=C:\DELME\;SourceType=DBF;Exclusive=No;BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Yes;]
lnH = SQLSTRINGCONNECT( lcCS)
 
LOCAL lcSQL
lcSQL = [ SELECT F01 FROM C:\X1]
?SQLE( lnH , lcSQL, '_cT1')
?SQLDISCONNECT( lnH)
 
SELECT '1', CNT(*),F01 FROM _CT1 GROUP BY 3 ORDER BY 1 DESC HAVING CNT(F01)>1 INTO CURSOR _cT1X
BROW

After you try this code couple of time you would realize _cT1 is having duplicated records, Any ideas why this is happening.
This only happens when using ODBC

Thanks