FoxPro/Visual FoxPro - buscador

Hola amigos tengo este codigo que no esta funcionando correctamente envia mi propio mensaje que no existe en la tabla, y cuando abro la tabla si esta me pueden ayudar gracias
sefeme, es un indice que he creado en la tabla con sede.codigo,programacion.fecha,medico.codigo

selec programacion
buscando=alltrim(thisform.combo1.value)+dtoc(thisform.text1.value)+alltrim(thisform.combo2.value)
set order to sefeme
seek buscando
if found()then
thisform.text8.setfocus
else
=messagebox("El Medico no esta registrado en la programación",32,"Mensaje del Sistema")
thisform.combo2.value=""
***thisform.refresh
endif

Como tenes armado el indice ?, el armado del indice tiene que ser equivalente al string que estas buscando

YO LO HAGO ASI;

PUBLIC CCODIGO_O_TU_VARIABLE

**ALLTRIM POR SI ES CARACTER**
CCODIGO_O_TU_VARIABLE = ALLTR(THISFORM.TXT_O_COMBO.VALUE)

SELEC TU_TABLA
SET ORDER CAMPO_TABLA
LOCATE FOR ALLTR(CCODIGO_O_TU_VARIABLE )==ALLTR(CAMPO_TABLA)
IF FOUND() THEN
thisform.text8.setfocus
else
=messagebox("El Medico no esta registrado en la programación",32,"Mensaje del Sistema")
thisform.combo2.value=""
***thisform.refresh
endif

**O VERIFICA BIEN LOS INDICES COMO DECIA SERGIO

SALUDES
ESPERO TE AYUDE....

HELDER MARTINEZ

Gracias Helder estuvo muy bien amigo

de nada Sebastian, cualquier problema postealo a la comunidad amigo...

SALUDES
DESDE HONDURAS, YORO YORO