Prompt(cursor de texto) no final do campo em UPDATE

Caso resolvido

Eugenio, fiz o que você sugeriu na resposta anterior e deu tudo certo, o problema era que eu estava colocando o "READKEY" antes da instrução, e com o "KEYCODE" que você sugeriu na última resposta também dá certo, o problema era só a posição do meu "READKEY" mesmo, coloquei depois da instrução como você sugeriu no seu código e deu certo. lol

Muito obrigado pela ajuda.

Segue o código. Obs: A parte que está comentada é o outro método, que também dá certo.

Código:

DEF VAR a AS CHAR.
DEF VAR b AS CHAR.
DEF VAR i AS INT.

FORM a FORMAT "x(25)"
     b FORMAT "x(25)"
     WITH FRAME tela.

ASSIGN b = "123132"
       b:DISABLE-AUTO-ZAP = YES.

REPEAT WITH FRAME tela:
    UPDATE a
           b EDITING:
    IF FRAME-FIELD = "b"
    THEN DO:
           /*
           DO i = 1 TO LENGTH( B ):
               APPLY KEYCODE("Cursor-right").
           END.
         END.
         */
           ASSIGN b.
           ASSIGN b:CURSOR-OFFSET = LENGTH( b ) + 1.
         END.
    READKEY.
    APPLY LASTKEY.
    END.
END.