ALV with OOPS in REPORT Program

DATA: IT_MARA TYPE TABLE OF MARA.
DATA: dref TYPE REF TO cl_salv_table.

START-OF-SELECTION.

  SELECT * FROM MARA INTO TABLE IT_MARA UP TO 100 ROWS.

  CHECK sy-subrc = 0.

  TRY.
      CALL METHOD cl_salv_table=>factory
        IMPORTING
          r_salv_table = dref
        CHANGING
          t_table      = IT_MARA.

    CATCH cx_salv_msg .
      MESSAGE i000(z_zzz_ca_messages)
      WITH 'Error in ALV processing'(001).
      LEAVE LIST-PROCESSING.
  ENDTRY.
  IF dref IS BOUND.
    CALL METHOD dref->display( ).
  ENDIF.