Clipper/FiveWin - Necesito ayuda

Amigos:

Necesito una rutina que me sirva para buscar datos, en una tabla cuyos campos son:

campo1=codigo, campo2=descripcion

001 auto
002 bote
003 camion
004 camioneta
005 tren

Quiero que al ingresar la descripción, vaya saltando directamente al registro que cumpla la condición.

Ejemplo, si la descripción buscada fuera: "Camión".

Al digitar "C", el puntero debiera saltar directamente al registro 3.

pero, necesito seguir ingresando "amioneta", para que salte al registro 4.

Lo que sucede es que dentro de una aplicación, tengo que llamar a esta rutina como una ayuda y es para procesarla en DbaseIV.

Quizas sea muy arcaico, pero es lo que necesito, gracias.

atte Karin

[email protected]

Hola como estas.

Lo que vos necesitas se llama BUSQUEDA INCREMENTAL,
tengo una rutina que hace ese tipo de busqueda, ahora dejame que yo la encuentre y te la mando, esto es para cualquiera que necesite esta rutina se la envio sin problema, OJO, despues del lunes

Saludos /José O. Farinon
Curuzú Cuatiá Ctes.

Este es un ejemplo sencillo de como se podria hacer.
(Ignora los puntos)

cls
use base1.dbf
index on descri to base1.ind
set index to base1.ind
m_llave = ' '
do while .t.
...inkey(0)
...if lastkey() = 27
......cls
......quit
...endif
...if lastkey() >= 33 .and. lastkey() <= 126 // DE ! A ~
......m_llave = trim(m_llave)+chr(lastkey()) //CONCATENA ULTIMA TECLA
...endif
...if lastkey() = 8 //BACKSPACE PARA BORRAR ULTIMA TECLA
......m_llave = left(m_llave,len(m_llave)-1)
......if empty(m_llave)
.........cls
.........loop
......endif
...endif
...seek m_llave %

...if .not.found()
......m_llave = left(m_llave,len(m_llave)-1)
......loop
...endif
...cls
...@05,10 say m_llave
...@10,10 say descri
enddo

Jose.

Esta muy interesante tu planteamiento en cuanto a la rutina que necesitas para buscar datos en clipper, yo tambien estoy interesado en conocerla, por favor en lo que la tengas te agradezco mandarmela por correo. Gracias.