REDEFINE GET oGet22 VAR vdesproduto ID 122 OF oFld:adialogs[ 2 ] PICTURE "@!" UPDATE
oGet22:bKeydown := { || BrwProdutoAtualizar() }
Static Func BrwProdutoAtualizar()
SQLAbrir("produtos",2,,9999999999,,,"conproorc")
Locate for conproorc->descricao >= oGet22:cText ///// O PROBLEMA É QUE O oGet22:cText NÃO RETORNA ATUALIZADO COM A ÚLTIMA TECLA QUE ACIONOU A FUNÇÃO... SEMPRE RETORNA FALTANDO O ÚLTIMO CARACTER.
if conproorc->(Eof())
conproorc->(dbskip(-1))
Endif
oBrw2:Refresh()
Return nil