FoxPro/Visual FoxPro - boton buscar

buenas amigos mios tengo una confusion yo tengo en mi base de datos dos campo que son los index (peri_impo y nombree) y tengo este codigo para el boton buscar


IF EMPTY(Thisform.pERI_IMPO.value)
MESSAGEBOX("Este campo no puede estar vacío",0+16,"Error")
Thisform.perI_IMPO.SetFocus()

else

select datos_calculo
Locate FOR peri_impo=Thisform.peri_IMPO.value
IF found() then
Thisform.mostrar
else
messagebox("No existe registro, intente de nuevo",0+48,"Buscar")
return 0
endif
ENDIF

pero al buscar busca solo por el campo peri impo y necesito que me busque por el campo peri_impo y por el campo nombree.

es decir que ambos campos deben contener la informacion para que realice la busqueda exacta

si me pueden ayudar
muchas gracias

segun lo que entiendo en tu form tenes dos text (peri_impo y nombree) en donde ingresas un valor en cada uno y que no pueden estar en blanco para luego buscar en el archivo datos_calculo.

IF EMPTY(Thisform.pERI_IMPO.value) or empty(thisform.nombree.value)
MESSAGEBOX("Este campo no puede estar vacío",0+16,"Error")
Thisform.perI_IMPO.SetFocus()

else

select datos_calculo
Locate FOR peri_impo=Thisform.peri_IMPO.value and nombree=Thisform.nombree.value
IF found() then
Thisform.mostrar
else
messagebox("No existe registro, intente de nuevo",0+48,"Buscar")
return 0
endif
ENDIF

te aclaro que el locate busca secuencialmente, osea que no necesita indices, lo cual hace mas lenta la busqueda en archivos grandes

muchas gracias enrique todo corrio perfecto

muchas gracias enrique todo corrio perfecto

muchas gracias enrique todo corrio perfecto

muchas gracias enrique todo corrio perfecto