运用类CL_SALV_TABLE实现alv

以前一直运用container的方式来显示alv,现在介绍一种不太常用的方法来显示alv,希望可以提供一种新的思路。但是一直没有找到怎样运用此方法在Toolbar上增加一个按钮，或者响应某些事件。

 

  REPORT  ZPRO_DAVID_ALV_CL.

*----------------------------------------------------------------------*
*       CLASS lcl_report DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS LCL_REPORT DEFINITION.
 PUBLIC SECTION.
*----------------------------------------------------------------------*
* Final Output Table
*----------------------------------------------------------------------*
    TYPES: BEGIN OF TY_MARA,
            MATNR TYPE MATNR,
            ERSDA TYPE ERSDA,
            MATKL TYPE MATKL,
            MTART TYPE MTART,
            LVORM TYPE LVORM,
           END OF TY_MARA.
   DATA: O_ALV TYPE REF TO CL_SALV_TABLE,              " ALV Reference
          T_MARA TYPE STANDARD TABLE OF TY_MARA.
*----------------------------------------------------------------------*
* Methods to Fetch Data and Generate Output
*----------------------------------------------------------------------*
    METHODS: GET_DATA,                                  "Data Selection
             GENERATE_OUTPUT.                           "Generating Output  PRIVATE SECTION.
*----------------------------------------------------------------------*
* Methods to Set PF-Status, Header and Footer
*----------------------------------------------------------------------*
    METHODS: SET_PF_STATUS
                  CHANGING
                      CO_ALV TYPE REF TO CL_SALV_TABLE, " Default Pf Status

                SET_TOP_OF_PAGE
                  CHANGING
                      CO_ALV TYPE REF TO CL_SALV_TABLE, " Set Top of page
               SET_END_OF_PAGE
                  CHANGING
                      CO_ALV TYPE REF TO CL_SALV_TABLE. " Set End of page
    ENDCLASS.
"lcl_report DEFINITION*----------------------------------------------------------------------*
*       CLASS lcl_report IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS LCL_REPORT IMPLEMENTATION.
*----------------------------------------------------------------------*
* Data selection
*----------------------------------------------------------------------*
  METHOD GET_DATA.
    SELECT MATNR ERSDA MATKL MTART LVORM INTO TABLE T_MARA
           FROM MARA UP TO 20 ROWS.
  ENDMETHOD.
"get_data*----------------------------------------------------------------------*
* Generating Output
*----------------------------------------------------------------------*
  METHOD GENERATE_OUTPUT.
*Exception Class
    DATA: LC_MSG TYPE REF TO CX_SALV_MSG.
*----------------------------------------------------------------------*
* We are calling the static Factory method which will give back
* the ALV object reference.
*----------------------------------------------------------------------*
    TRY.
        CALL METHOD CL_SALV_TABLE=>FACTORY
          IMPORTING
            R_SALV_TABLE = O_ALV
          CHANGING
            T_TABLE      = T_MARA.
      CATCH CX_SALV_MSG INTO LC_MSG .
    ENDTRY.
************************************************************************
* In this area we will call the methods which will set the
* different properties to the ALV
************************************************************************
* Calling Set PF status method
    CALL METHOD SET_PF_STATUS
      CHANGING
        CO_ALV = O_ALV.       "set_end_of_page* Calling the top of page method
    CALL METHOD SET_TOP_OF_PAGE
      CHANGING
        CO_ALV = O_ALV.
* Calling the End of page method
    CALL METHOD SET_END_OF_PAGE
      CHANGING
        CO_ALV = O_ALV.
************************************************************************
* Displaying the ALV
* Here we will call the DISPLAY method to get the output on the screen
************************************************************************
    O_ALV->DISPLAY( ).
  ENDMETHOD.                    "generate_output************************************************************************
*    In this area we will implement the methods which are defined in
*    the class definition
************************************************************************
* Setting Default PF-Status
  METHOD SET_PF_STATUS.
    DATA: LO_FUNCTIONS TYPE REF TO CL_SALV_FUNCTIONS_LIST.
* Default functions
    LO_FUNCTIONS = CO_ALV->GET_FUNCTIONS( ).
    LO_FUNCTIONS->SET_DEFAULT( ABAP_TRUE ).
  ENDMETHOD.                    "set_pf_status
* Setting Top_of_page
  METHOD SET_TOP_OF_PAGE.
    DATA: LO_HEADER TYPE REF TO CL_SALV_FORM_LAYOUT_GRID,
          LO_H_LABEL TYPE REF TO CL_SALV_FORM_LABEL,
          LO_H_FLOW  TYPE REF TO CL_SALV_FORM_LAYOUT_FLOW.
* Header object
    CREATE OBJECT LO_HEADER.
*----------------------------------------------------------------------*
* To create a Label or Flow we have to specify the target
* row and column number where we need to set up the output
* text.
*----------------------------------------------------------------------*
* Information in Bold
    LO_H_LABEL = LO_HEADER->CREATE_LABEL( ROW = 1 COLUMN = 1 ).
    LO_H_LABEL->SET_TEXT('Header of the ALV Output in Bold').
* Information in tabular format
    LO_H_FLOW = LO_HEADER->CREATE_FLOW( ROW = 2 COLUMN = 1 ).
    LO_H_FLOW->CREATE_TEXT( TEXT = 'This is text of flow in Header' ).
    LO_H_FLOW = LO_HEADER->CREATE_FLOW( ROW = 3 COLUMN = 1 ).
    LO_H_FLOW->CREATE_TEXT( TEXT = 'Date of List Generation' ).
    LO_H_FLOW = LO_HEADER->CREATE_FLOW( ROW = 3 COLUMN = 2 ).
    LO_H_FLOW->CREATE_TEXT( TEXT = sy-datum ).
* Set the top of list using the header for Online
    CO_ALV->SET_TOP_OF_LIST( LO_HEADER ).
* Set the top of list using the header for Print
    CO_ALV->SET_TOP_OF_LIST_PRINT( LO_HEADER ).  ENDMETHOD.                    "set_top_of_page
* Setting End_Of_page
  METHOD SET_END_OF_PAGE.
    DATA: LO_FOOTER  TYPE REF TO CL_SALV_FORM_LAYOUT_GRID,
          LO_F_LABEL TYPE REF TO CL_SALV_FORM_LABEL,
          LO_F_FLOW  TYPE REF TO CL_SALV_FORM_LAYOUT_FLOW.
* Footer Object
    CREATE OBJECT LO_FOOTER.
* Information in Bold
    LO_F_LABEL = LO_FOOTER->CREATE_LABEL( ROW = 1 COLUMN = 1 ).
    LO_F_LABEL->SET_TEXT('Footer of the ALV in Bold').
* Tabular Information
    LO_F_FLOW = LO_FOOTER->CREATE_FLOW( ROW = 2 COLUMN = 1 ).
    LO_F_FLOW->CREATE_TEXT( TEXT = 'This is text of flow in footer' ).
* Set the end of list using the header for Online
    CO_ALV->SET_END_OF_LIST( LO_FOOTER ).
* Set the End of list using the header for Print
    CO_ALV->SET_END_OF_LIST_PRINT( LO_FOOTER ).
  ENDMETHOD.                    "set_end_of_page
  ENDCLASS.
"lcl_report IMPLEMENTATION*----------------------------------------------------------------------*
START-OF-SELECTION.
*----------------------------------------------------------------------*
  DATA: LO_REPORT TYPE REF TO LCL_REPORT.
  CREATE OBJECT LO_REPORT.
  LO_REPORT->GET_DATA( ).
  LO_REPORT->GENERATE_OUTPUT( ).

 

除此外，还可以和Container结合起来一起用：

 DATA: GR_TABLE   TYPE REF TO CL_SALV_TABLE.
 DATA: GR_REPORT TYPE REF TO LCL_REPORT .
 DATA: CONTAINER1 TYPE REF TO CL_GUI_CUSTOM_CONTAINER.


 CREATE OBJECT CONTAINER1
     EXPORTING
       CONTAINER_NAME = 'CONTMARA'.


  TRY.
       CL_SALV_TABLE=>FACTORY(
         EXPORTING
           R_CONTAINER    = CONTAINER1
           CONTAINER_NAME = 'CONTMARA'
         IMPORTING
           R_SALV_TABLE   = GR_TABLE
         CHANGING
           T_TABLE        = T_MARA ).
     CATCH CX_SALV_MSG.                                 "#EC NO_HANDLER
   ENDTRY.

    create object GR_REPORT.
      GR_REPORT->SET_PF_STATUS( CHANGING CO_ALV =  GR_TABLE ).
      GR_REPORT->SET_TOP_OF_PAGE( CHANGING CO_ALV =  GR_TABLE ).
     GR_REPORT->SET_COLUMNS( CHANGING CO_ALV =  GR_TABLE ).
     GR_TABLE->DISPLAY( ).