Code: Alles auswählen.
DO 30 TIMES VARYING SAV_LGBER FROM T334B-LGBE0 NEXT T334B-LGBE1.
bla bla bla
ENDDO.
Folgende Benutzer bedankten sich beim Autor black_adept für den Beitrag:
Barney
Erstmal vielen Dank... Ich habe nun die Stelle mit DO 30 TIMES VARYING...black_adept hat geschrieben:Do ... Varying soll ersetzt werden durch Assign ... Increment
Alternativ könntest du auch do xxx times. Assign ... component ... Enddo. verwenden
Code: Alles auswählen.
DO 30 TIMES VARYING lf_sav_lgber
FROM ls_t334b-lgbe0 NEXT ls_t334b-lgbe1.
Code: Alles auswählen.
DATA lf_counter TYPE i VALUE '7'. "for structure T334B
FIELD-SYMBOLS: <t334b> TYPE t334b,
<field> TYPE any.
bla bla bla
ASSIGN ls_t334b TO <t334b>.
DO 30 TIMES.
ASSIGN COMPONENT lf_counter OF STRUCTURE <t334b> TO <field>.
MOVE <field> TO lf_sav_lgber.
bla bla bla bla
ENDDO.
Code: Alles auswählen.
REPORT.
DATA:gs_mard TYPE mard,
gs_stock LIKE gs_mard-labst.
DO 3 TIMES VARYING gs_stock FROM gs_mard-labst NEXT gs_mard-umlme.
gs_stock = 12.
ENDDO.
WRITE gs_mard-labst.