FoxPro/Visual FoxPro - eliminar duplicados

 
Vista:
sin imagen de perfil

eliminar duplicados

Publicado por Panambi (12 intervenciones) el 12/10/2009 21:21:12
amigos apelo de nuevo a vuestra ayuda.
Quisiera eliminar unos registros que tengo duplicados, mi problemas es que soy nueva en
el en FOx y quisiera me ayuden con las sentencias.
COMO EJEMPLO TENGO LOS CAMPOS
CEDULA NOMBRE
12345 PEPITO GIMENEZ
12345 GIMENEZ, PEPITO
12345 GIMENES, PEPITO

45678 LOPEZ, PABLO
45678 PABLO LOPEZ
....
....
Y ASI CONTINUA, QUIERO DEJAR SOLO UNO DE CADA UNO, SON MILES DE REGISTROS.
Cualquier ayuda sera bienvenida, desde ya gracias!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Mauricio
Val: 471
Plata
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

eliminar duplicados

Publicado por Mauricio (1541 intervenciones) el 12/10/2009 22:03:08
Deseas eliminarlos por Codigo? Porque por nombre son diferentes
1
2
3
4
5
6
7
8
9
10
*---
USE duplicados IN 0 ORDER codigo	&& ordenar por codigo
SELE duplicados
public vcod
vcod = duplicados.codigo	&& Asignamos el primer registro
SCAN
	SKIP 1   && saltamos el primero para no eliminarlo
	DELETE FOR vcod = codigo	&& Eliminar los siguientes iguales
	vcod = duplicados.codigo	&& asignar de nuevo
ENDSCAN
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 29
Ha aumentado su posición en 3 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:eliminar duplicados

Publicado por Javier (271 intervenciones) el 13/10/2009 15:55:55
Hola, abre la tabla en forma exclusiva y modifica la estructura de la tabla, agrega un campo, por ej., repe N( 1 ).
Luego indexa la tabla así: INDEX ON CEDULA TO INDICEXX UNIQUE
De esta manera en el índice UNIQUE solo se te va a agregar un solo registro por cada valor de cédula.
A continuación: REPLACE ALL REPE WITH 1
Luego cierra el índice: SET INDEX TO
Por último borra los registros con repe=0 : DELETE FOR REPE = 0
y hacete un PACK.

Luego, puedes eliminar el campo REPE.

Espero que te sirva.
Saludos (Jujuy-Argentina).
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

RE:eliminar duplicados

Publicado por MIR (1 intervención) el 06/09/2013 22:36:05
MUCHAS GRACIAS ..!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:eliminar duplicados

Publicado por felix ortiz (1 intervención) el 10/07/2017 17:51:19
Muchas gracias, me sirvio bastante tu respuesta.

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:eliminar duplicados

Publicado por JAIME (1 intervención) el 27/07/2017 20:48:04
La mejor...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar