prettyprinter.abap

REPORT z_test_pretty_printer.

CLASS builder DEFINITION.
  PUBLIC SECTION.
    METHODS:
      foo IMPORTING par_a         TYPE i
                    par_b         TYPE abap_bool
          RETURNING VALUE(result) TYPE REF TO builder,
      bar IMPORTING par_a         TYPE string
                    par_b         TYPE char1
          RETURNING VALUE(result) TYPE REF TO builder,
      build RETURNING VALUE(result) TYPE REF TO object.
  PROTECTED SECTION.
  PRIVATE SECTION.
ENDCLASS.

CLASS builder IMPLEMENTATION.
  METHOD bar.
  ENDMETHOD.

  METHOD build.
  ENDMETHOD.

  METHOD foo.
  ENDMETHOD.
ENDCLASS.

CLASS test DEFINITION.
  PUBLIC SECTION.
    METHODS:
      run.
  PROTECTED SECTION.
  PRIVATE SECTION.
ENDCLASS.

CLASS test IMPLEMENTATION.
  METHOD run.

    " With new -> doesn't work
    DATA(building) = NEW builder(
          )->foo(
              par_a = 10
            par_b     = 'C'
                )->bar(
                  par_a = `Test`
                     par_b = abap_true
      )->build( ).

    " Without new -> doesn't work?
    DATA(builder) = NEW builder( ).
    DATA(another_one) = builder->foo(
              par_a = 10
            par_b     = 'C'
          )->bar(
            par_a = `Test`
               par_b = abap_true
          )->build( ).

    " Without assignment it tries its best?

    " Before
*    builder->foo(
*      par_a = 10
*      par_b = 'C'
*    )->bar(
*      par_a =    `Test`
*      par_b   = abap_true ).

    " After
    builder->foo(
      par_a = 10
      par_b = 'C'
              )->bar(
                par_a =    `Test`
                par_b   = abap_true ).

  ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.
  NEW test( )->run( ).