Mich freut es gerade total (um wieder zum eigentlichen Thema zurückzukommen ), dass ich beruflich nur mit SAP zu tun habe, und daher hauptsächlich in ABAP programmiere.
Ist (zumindest für mich) wesentlich übersichtlicher und lesbarer. Und ich denke, dass dieser Code von allen Programmierern gelesen und verstanden werden kann, ohne dass man ABAP kennen muss.
Code:
*--------------------------------------------------------*
* ABAP-Coding (sinnloses Beispiel) bla bla bla ...
*--------------------------------------------------------*
* Lokale Strukturen und Variablen definieren:
DATA: ls_structure TYPE LINE OF gt_array,
lv_line TPYE i.
* Schleife über globales Array:
LOOP AT gt_array INTO ls_structure.
IF sy-tabix <= 3. "Nur die ersten 3 Array-Zeilen prüfen
CASE ls_structure-vorgang.
WHEN 'NEXT'.
lv_line = lv_line + 1.
IF lv_line > lv_limit.
lv_line = lv_limit.
ENDIF.
WHEN 'PREV'.
lv_line = lv_line - 1.
IF lv_line < 0.
lv_line = 0.
ENDIF.
WHEN OTHERS.
PERFORM error_message.
ENDCASE.
ELSE.
EXIT. "ab dem 3.Eintrag Schleife verlassen
ENDIF.
ENDLOOP.
* Endergebnis ausgeben:
WRITE: lv_line.