Botón ayuda no funciona... VFP

Hola como estas? Realizo una búsqueda ingresando datos en un textbox, y presionando un botón llamado buscar... Este es el código que utilizo.

* - selección de la tabla.
tel = thisform.Text3.value
SELECT teléfono FROM cliente WHERE tel=thisform.Text3.value
SELECT cliente

* - comprueba el ingreso de los datos
IF EMPTY(thisform.Text3.Value) then
MESSAGEBOX("No ingreso el Teléfono!")
thisform.Text3.SetFocus
RETURN
ENDIF

* - búsqueda del cliente
Locate For tel=ALLTRIM(thisform.Text3.Value)
IF Found() Then
if cliente.teléfono==tel then
thisform.Text4.value=cliente.apellido
thisform.Text5.Value=cliente.nombre
thisform.Text6.Value=cliente.dirección
thisform.Text7.Value=cliente.teléfono
thisform.Combo1.SetFocus
thisform.text8.Value=cliente.id_cliente
ELSE
MESSAGEBOX("El Cliente no existe!!!")
thisform.Text4.SetFocus
thisform.Text4.value=""
thisform.Text5.value=""
thisform.Text6.value=""
thisform.Text7.value=thisform.Text3.Value
thisform.text8.Value=""
thisform.Refresh
return
ENDIF
ENDIF

bien al presionar el botón deseo que los datos se muestren en otros textbox, pero no se muestran, en cambio se habré un form que me muestra el teléfono, podrías ayudarme a solucionar el problema.