FoxPro/Visual FoxPro - Borrar Registros Duplicados

Hola a todos
Necesito la ayuda de alguno de ustedes.
Tengo una tabla de clientes con sus caracteristicas.
Mi indice es el numero de Cuenta (num_cta) pero muchos de los usuarios que utilizan mi base de datos, han agregado varios clientes cuya informacion esta repetida (el nombre, direccion, referencias, etc). Pero el numero de cuentas es distinto.
Cree un codigo para intentar localizarlos pero ya me trabé,

*Utilizo la tabla Clientes indexada por nombre del cliente
SELECT 1
USE CLIENTES INDEX CLI_NOMB SHARED

SELECT 1
DO WHILE .NOT. EOF()
*Guardo los primeros valores
NOMB1=NOMB_CLI
DIR1=DOMICILIO
*SEEK CLIENTES->NOMB_CLI
DO WHILE.NOT. EOF()
*Guardo los segundos valores
NOMB2=NOMB_CLI
DIR2=DOMICILIO
*Si son iguales
IF NOMB1=NOMB2 .OR. DIR1=DIR2 THEN
*Borrar el registro o marcarlo
ENDIF
SKIP
ENDDO
SKIP
ENDDO
CLOSE ALL

Podria alguien ayudarme o si tiene una sugerencia mejor es bien recibida?

T aconsejo utilizar un segundo parametro que defina con mas exactitud a la persona o cliente, por ej. DNI o CUIT, etc.

Espero t sirva

Cree un codigo para intentar localizarlos pero ya me trabé

donde te trabaste ??

los campos, nombre,. domicilio, ciudad, referencias, aun tratandose del mismo cliente, son ambiguas es decir, pueden repetirse sin identifacor por codigo si es el mismo o se trata de otro
Ej, JUAN PEREZ LOPEZ
JUAN P. LOPEZ
JUAN PEREZ L.
JUAN P. LOPES

etc..
lo que debes poner es un dato unico, como RFC/CURP etc.. que defina que se trata de una sola persona

de otra forma va a ser un poco dificil... a menos que el borrado lo hagas de forma manual, es decir tu escogas quien se elimina y quien no

Ya pude jiji.
Solamente le puse un del. Asi quedo:

*Utilizo la tabla Clientes indexada por nombre del cliente
USE CLIENTES INDEX CLI_NOMB SHARED
GO TOP
DO WHILE NOT EOF()
_CUENTA=NUM_CTA
_NOM=NOMB_CLI
_PRIMERO=.T.
DO WHILE NOMB_CLI=_NOM AND NOT EOF()
IF _PRIMERO
SKIP
_PRIMERO=.F.
LOOP
ENDIF
DELETE
SKIP
ENDDO
ENDDO
CLOSE ALL

De cualquier forma es muy buena idea la de agregar el RFC. Aunque en realidad no tengo tantos clientes para que sean homonimos. Pero lo hare pensando en crecer la tabla

GRACIAS...

lo bueno es que lo solucionaste

Suerte

gracias por el ejemplo, les cuento que me sirvió de mucho

Muchas gracias, me sirvió tu ejemplo

&&att: [email protected]