FoxPro/Visual FoxPro - ¿como evito registros duplicados VFP9.0?

Hola a todos, Quiero saber algo. he intendado crear una rutina para evitar que mi formulario agrege registros duplicados a mi tabla.
al momento de guardar dichos datos, siempre me sale solo una parte de la condicion , como que si siempre encontrara el registro que ingreso aunque no este . ¡ESTOY DESESPERADO Y NO SE QUE HACER! HELP!
Gracias de antemano


aqui dejo la rutina de busqueda por si alguien sabe que hago mal o si la puedo mejorar

busqueda= thisform.textbox1.value
SET ORDER TO registo_tabla
SEEK busqueda
IF FOUND()
MESSAGEBOX("NUMERO DE CHEQUE YA INGRESADO EN LA BASE DE DATOS", 48, "ERROR")
ELSE
replace campo with textbox.value . . ..

endif

Alejandro o Novato, como tienes definido el indice?
Podrias postear como lo tienes definido?

pues lo tengo como candidato, creo que a eso te refieres ¿verdad?

L

Para evitar registros duplicados, yo hago lo siguiente

Ejemplo solo para el campo num o clave o id de la tabla:

Antes de cualquier cosa escribo en el init del form:

select mi_tabla
set order num
go bott

&&para eso tengo un cuadro de texto al que llamaré "t1" (thisform.t1.value)

thisform.t1.value=mi_tabla.num+1
thisform.refresh


***En caso de trabajar en red, al momento de guardar vuelvo a hacer la misma sentencia:
Boton guardar:

select mi_tabla
set order to num
go bott
thisform.t1.value=mi_tabla.num+1

select mi_tabla
seek thisform.t1.value
if found()
Wait window "El numero ya existe intente de nuevo"
else
append blank
replace num with thisform.t1.value
wait window "Datos guardados con éxito"

thisform.t1.value=0
thisform.refresh
endif

Facil y simple,

saludos!

Yo uso esto..oajla te sirva.

SET ORDER IN ciudad TO cod_ciu
GOTO TOP IN ciudad
SEEK STR(m_codciu, 3, 0) IN ciudad ORDER cod_ciu
IF FOUND('CIUDAD')
ejecutas tis comandos
else
...
endif

saludos

no me sirve, como tienes definida la llave cod_ciu en la tabla?
ALLT(cod_ciu) O solo cod_ciu?