login as:
~/abapcraft.dev — code, crafted in SAP
florin@abapcraft:~/abap/posts/exercism-abap/src/zcl_reverse_string.clas.abap $ cat zcl_reverse_string.clas.abap
exercism-abap / src / zcl_reverse_string.clas.abap
ABAP 31 lines
CLASS zcl_reverse_string DEFINITION PUBLIC.
  PUBLIC SECTION.
    METHODS reverse_string
      IMPORTING
        input         TYPE string
      RETURNING
        VALUE(result) TYPE string.
ENDCLASS.

CLASS zcl_reverse_string IMPLEMENTATION.

  METHOD reverse_string.

    DATA(input_length) = strlen( input ).

    DO input_length TIMES.

      DATA(offset) = input_length - sy-index.
      DATA(letters_iterator) = input+offset(1).
      result = |{ result }{ letters_iterator }|.

    ENDDO.

    "Or
    "result = reverse( input ).

  ENDMETHOD.

ENDCLASS.