FoxPro/Visual FoxPro - busqueda en un grid

Saludo al foro,

Este es mi problema:

tengo un grid con codigo,nombre,cantidad,precio es decir para una factura.

yo quiero que cuando me busque por el codigo y no lo encuentre poder regresar al codigo y no que salte al nombre como lo esta haciendo.

en resumen, no se como enviar el focus a una columna cuando lo desee.

en espera de ustedes:

mil gracias.

trabaja el puntero con el tab Index de las columnas del Grid1

estamos en la Text1 de la columna1 del Grid1 en su evento Valid

buscamo el código=variable
If si encuentra
instrucciones verdaderas

else
* Cuadro de dialógo
* puntero retorna a Text1 de la columna1 del Grid1

Thisform.Grid1.Column1.Text1.TabIndex=1
Thisform.Grid1.Column2.Text2.TabIndex=2
etc .
Return=.t.
Endif
Thisform.Grid1.Column1.Text1.Refresh

Miren lo que tengo:

Esto me busca bien pero aun no logro dominar el focus, quiero que si no tiene existo regrese a la columna 1 (text1).

SELECT articulos
LOCATE FOR articulos.codigo=detalles.codart
IF FOUND()
replace detalles.descrip with articulos.descrip
replace detalles.venta WITH articulos.venta
thisform.grid1.Refresh

ELSE

thisform.grid1.column1.text1.TabIndex =1
thisform.grid1.column1.text1.refresh
return=.t.
endif

proba poniendo

thisform.grid1.column1.text1.setfocus

o

thisform.grid1.column1.text1.gotfocus

Modifica esto:
*---
SELECT articulos
LOCATE FOR articulos.codigo=detalles.codart
IF FOUND()
*--- Sentencias por encontrar
ELSE
*--- Sentencias por no encontrar
RETURN .F. && Esto hace que el focus no se desplace
endif