FoxPro/Visual FoxPro - +++Busque caracter a caracter...

Necesito si alguien me pudiese enviar la rutina que permite la busqueda "CARACTER A CARACTER" para Foxpro 2.6 de DOS. Es decir que permita ir posicionanandose en el listado de nombres a medida que se pulsa una letra.
Desde muchisimas gracias.

Juan Manuel Bernardi
Freyre - Cba. - Argentina

Hola
Primero la vista de datos es en browse
Clear
use datos
mletra="A"
on key label f4 do busca
brow noappe noedit nodele
on key
close al
retur
FUNCTION BUSCA
para mletra
mletra=allt(mletra)
locate for left(nombre)=left(mletra)
retur .t.

Al ejecutar buscara en el momento de presionar f4 al primero que tenga la letra ingresada.

Espero que te sirva
Adios