ABAP - Frage zu SET CURSOR

[hyperion]

Hallo,

ich will, dass der Cursor automatisch am Ende des Ausgabefeldes erscheint.

Mein Programm ist ein Taschenrechner, wo oben ein DynproAusgabefeld ist, ind welches der alte Inhalt und der neue Inhalt ausgegeben wird. Die Eingabe erfolgt durch Buttons. Also der User drückt auf "1" und im Ausgabefeld erscheint 1. Drückt er anschließend 2, soll 12 ausgegeben werden usw.

Nun mein Dynproausgabefeld ist 17 sichtbar breit, aber 60 definiert breit. Nun will ich, dass wenn der Anwender 18 Zeichen eingibt die letzten 17 und nicht die ersten 17 Zeichen angezeigt werden. Ich dachte mir, dass ich das mit SET CURSOR lösen kann, aber bisher funktioniert es nicht. Mein aktueller Ansatz ist:

...


case ok_code.


  ...


  when others.


    ...

    x = x + 1.

    CONCATENATE anzeige ok_code INTO anzeige.

    ...


    SET CURSOR FIELD 'ANZEIGE' LINE 4 OFFSET x.

    ...


endcase.

...

Das Dynproausgabefeld 'ANZEIGE' befindet sich in Zeile 4.

mfg hyperion

[MAJOR_TOM]

Versuche doch mal folgendes: Im ScreenPainter Doppelklick auf das betreffende Feld machen. Dann erscheint ein Popup. Im TabReiter "Program" (ganz unten) gibt es ein Ankreuzfeld "Right-Justified". Einfach ankreuzen und die Sache sollte laufen.

Gruß,

Tom.

[hyperion]

Hmm, das hätte aber den ungewollten Nebeneffekt, dass die erste eingegebene Zahl auch rechts erscheint. Mir wäre es lieber, wenn es wie bei meinem Casio-Taschenrechner links beginnt.

mfg hyperion