Dica Auto Preenchimento Fill in

Gostaria de alguma dica de como efetuar o auto preenchimento de um campo fill in, ou seja conforme o usuário vai digitando o sistema vai auto preenchendo com o código obedecendo a ordem alfabética...
Não sei se o comando matches seria a melhor escolha.
obrigado

Se não entendi errado, uma a solução seria mais ou menos assim:

Código:

DEF TEMP-TABLE tt
    FIELDS nome             AS CHAR FORMAT "X(40)".

CREATE tt.
ASSIGN tt.nome  = "maria jose da silva".

CREATE tt.
ASSIGN tt.nome  = "marcia cristina da silva".

CREATE tt.
ASSIGN tt.nome  = "mario santos".


FORM
    tt.nome     LABEL "Nome"   
    WITH SIDE-LABELS FRAME f-pesquisa TITLE "Pesquisa".


ON 'VALUE-CHANGED':U OF tt.nome
DO:
    IF INPUT tt.nome = "" THEN NEXT.
    FIND FIRST tt NO-LOCK
        WHERE tt.nome  BEGINS INPUT tt.nome NO-ERROR.

    IF AVAIL tt THEN
        ASSIGN tt.nome:SCREEN-VALUE = tt.nome.

END.

PROMPT-FOR
    tt.nome
    WITH FRAME f-pesquisa

Quase isso, estava pensando mais em algo como o Excel faz, conforme o usuário vai digitando ele vai trazendo o nome que mais atende o critério...
ex.: digito m, traz marcia ....
digito ma, = marcia ....
digito mar = marcia ...
digito mari = maria ....
digito mario = mario ...