FoxPro/Visual FoxPro - Busqueda

hola muchachos necesito su ayuda
tengo el siguiente codigo para agregar un registro y el problema es que cuando busco a ver si el campo codigo del registro existe es como si lo escribiera en el indice y lo encuentra siempre, es decir FOUND() siempre el verdadero y no entiendo porque si en ningun momento le digo que escriba los datos en la tabla
gracias espero su respuesta

IF EMPTY (THISFORM.NOMBRE1.VALUE)
WAIT WINDOW ' Debe ingresar un nombre' NOWAIT
THISFORM.NOMBRE1.SETFOCUS
RETURN
ENDIF

MMCODIGO = THISFORM.CODIGO1.VALUE

SELECT TABLA
SET ORDER TO TAG INDICE
SEEK MMCODIGO

IF FOUND()
mmens1 = "EL CODIGO"+space(1)+ MMCODIGO + space(1)+ " YA EXISTE" + chr(13)
mmens2 = "Utilice otro codigo e intente nuevamente"
mopc = messagebox(mmens1+mmens2,0+64, "Atencion")
thisform.refresh
thisform.nombre1.setfocus


ENDIF

set exact off
select tabla
set order to indice
seek valorabuscar
if Eof()
wai wind "No lo encontro"
else
encontrado
endif