简单的OO ALV显示ALV及下载

REPORT OO_ALV.
CLASS OO_ALV DEFINITION.
  PUBLIC SECTION.
    METHODS:GET_DATA IMPORTING AMOUNT TYPE I,"取数
      DISPLAY_ALV,"显示ALV
      DOWNLOAD_ALV."下载ALV
  PRIVATE SECTION.
    DATA:IT_SPFLI TYPE STANDARD TABLE OF SPFLI.
    DATA:LO_SALV TYPE REF TO  CL_SALV_TABLE.
    DATA:O_COLUMNS   TYPE REF TO CL_SALV_COLUMNS_TABLE.
    DATA: LO_CONVERTER TYPE REF TO ZCL_EXCEL_CONVERTER.
ENDCLASS.
 
CLASS OO_ALV IMPLEMENTATION.
  METHOD GET_DATA.
    SELECT * FROM SPFLI INTO CORRESPONDING FIELDS OF TABLE IT_SPFLI UP TO AMOUNT ROWS .
  ENDMETHOD.
  METHOD DISPLAY_ALV.
    TRY.
        CL_SALV_TABLE=>FACTORY(
          EXPORTING
            LIST_DISPLAY = ABAP_FALSE
          IMPORTING
            R_SALV_TABLE = LO_SALV
          CHANGING
            T_TABLE      = IT_SPFLI ).
      CATCH CX_SALV_MSG .
    ENDTRY.
    O_COLUMNS = LO_SALV->GET_COLUMNS( ).
    O_COLUMNS->SET_OPTIMIZE( ABAP_TRUE ). "自动优化列宽
    "调用显示alv
    LO_SALV->DISPLAY( ).
  ENDMETHOD.
  METHOD DOWNLOAD_ALV.
    "创建zcl_excel_converter类
    CREATE OBJECT LO_CONVERTER.
    TRY .
        LO_CONVERTER->CONVERT(
          EXPORTING
            IO_ALV        = LO_SALV
            IT_TABLE      = IT_SPFLI
            I_ROW_INT     =
            I_COLUMN_INT  =
            ).
      CATCH ZCX_EXCEL.
    ENDTRY.
    "调用write_file方法导出excel
    LO_CONVERTER->WRITE_FILE( I_PATH = 'D:/test1.xlsx' ).
  ENDMETHOD.
ENDCLASS.
 
START-OF-SELECTION.
  DATA(OUTPUT) = NEW OO_ALV( ).
  OUTPUT->GET_DATA(  ).
  OUTPUT->DISPLAY_ALV( ).
  OUTPUT->DOWNLOAD_ALV( ).