FoxPro/Visual FoxPro - Ayuda como crear un buscador de registros

Hola amigos soy nuevo en ocupar visual fox, y necesito ayuda para hacer un buscador de registros de una tabla, mi tabla es de medicamentos y lo que quiero que busque, es por la clave no por el nombre es la primera vez que hago esto y agradecería su ayuda de como crearla.

Adrian: Voy a suponer que tu tabla de medicamentos tiene los siguientes campos... (1ra Imagen)


codigo E(4)
nombre C(60)
....

1ra forma

con el MODIFY STRUC en la tabla abierta en form EXCLU, segunda pestaña crear un orden en base a la variable codigo
((2da Imagen)



* thisform.text1.value es el cuadro donde digitaras el valor a buscar, de este cuadro el Procedimiento LostFocus (o sea una vez que
* digitas el codigo debes digitar enter)

sele almacen
set order to orden && Orden es cualquier nombre que tiene tu indice
seek thisform.text1.value

* tambien puedes usar
sele almacen
go top
locate for codigo=thisform.text1.value
if found()
&& encontro
else
&& no encontro
endif


saludos.