Buenos días Roberto!
Pruebo esto tal cual y lo analizas, Espero te sirva.
*crea cursor con datos
CREATE CURSOR todos (id i,dato i, duplicado c(10))
FOR a=1 TO 10
INSERT INTO todos(id, dato) Values(a,a)
INSERT INTO todos(id, dato) Values(a+10,a)
ENDFOR
Browse&&muestra todos los registro
*marca duplicados en tabla original
UPDATE todos SET duplicado="Duplicado" WHERE id IN (SELECT Max(id) FROM todos GROUP BY dato)
MESSAGEBOX("Registros duplicados: "+ALLTRIM(STR(_tally)),48,"Informe")
SELECT todos
BROWSE
Suerte
zarlu
Chetumal, Quintana Roo, México