Búsqueda

Hola experto buen día necesito hacer una búsqueda con el código de usuario y el campo condición, solo debe mostrar los que tengan en condición "OK" si embargo muestra el primer registro que es "NO" por lo tanto salta al mensaje del Wait, como puedo hacer para que haga una búsqueda en toda la tabla gracias
SELEC prestamos
  SET order to soc_cod
  LOCATE for soc_cod=alltrim(thisform.text1.value) 
  IF found()then
   IF pre_prestamo="OK"
  thisform.text2.value=prestamos.pre_nom
  thisform.text3.value=prestamos.pre_monto
else
WAIT "El Socio tiene sus cuotas canceladas ..." window nowait
endif
endif