transpiler
transpiler copied to clipboard
LOOP TABLE conditions, executed multiple times
same with LOOP,
CLASS lcl_bar DEFINITION.
PUBLIC SECTION.
DATA counter TYPE i.
METHODS bar RETURNING VALUE(str) TYPE string.
METHODS run.
ENDCLASS.
CLASS lcl_bar IMPLEMENTATION.
METHOD bar.
counter = counter + 1.
ENDMETHOD.
METHOD run.
DATA tab TYPE string_table.
APPEND |foo| TO tab.
APPEND |bar| TO tab.
APPEND |moo| TO tab.
LOOP AT tab TRANSPORTING NO FIELDS WHERE table_line = bar( ).
ENDLOOP.
WRITE / counter.
ENDMETHOD.
ENDCLASS.
FORM run.
DATA bar TYPE REF TO lcl_bar.
CREATE OBJECT bar.
bar->run( ).
ENDFORM.
START-OF-SELECTION.
PERFORM run.