<ABAP> SALV 02. Normal Display

http://allsapabap.blogspot.kr/2008/12/salv-table-3-adding-custom-pf-status-in.html 
 

  *&---------------------------------------------------------------------*
*& Report  ZCONRAD_TMP10
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  ZCONRAD_TMP10.


*&---------------------------------------------------------------------*
*& This code snippet will show how to use the CL_SALV_HIERSEQ_TABLE to
*&generate the simplest Hierarchical (Sequential) ALV
*&---------------------------------------------------------------------*
CLASS lcl_report DEFINITION.
  PUBLIC SECTION.
*   Final Header output table
    TYPES: BEGIN OF ty_vbak,
            vbeln TYPE vbak-vbeln,
            erdat TYPE erdat,
            auart TYPE auart,
            kunnr TYPE kunnr,
            expand   TYPE char01,    "Column for Expand / Collapse
           END   OF ty_vbak.


*   Standard internal tables
    DATA: t_vbak TYPE STANDARD TABLE OF ty_vbak.


*   Hierarchical ALV reference
    DATA: o_alv TYPE REF TO cl_salv_table.

    METHODS:
*  data selection
      get_data,
*generating output
      generate_output.
**$*$*.....CODE_ADD_1 - Begin..................................1..*$*$
***    In this section we will define the private methods which can
*      be implemented to set the properties of the ALV and can be
*      called in the GENERATE_OUTPUT method
**$*$*.....CODE_ADD_1 - End....................................1..*$*$*
*
ENDCLASS.                    "lcl_report DEFINITION
*
START-OF-SELECTION.
  DATA: lo_report TYPE REF TO lcl_report.
*
  CREATE OBJECT lo_report.
*
  lo_report->get_data( ).
*
  lo_report->generate_output( ).
*
*
*----------------------------------------------------------------------*
*       CLASS lcl_report IMPLEMENTATION
*----------------------------------------------------------------------*
CLASS lcl_report IMPLEMENTATION.
*
  METHOD get_data.
*   data selection - Header
    SELECT vbeln erdat auart kunnr
     INTO  TABLE t_vbak
       FROM  vbak
        UP TO 20 ROWS.

  ENDMETHOD.                    "get_data
*
*.......................................................................
  METHOD generate_output.
* New ALV instance
*   We are calling the static Factory method which will give back
*   the ALV object reference.
*
* exception class

    DATA: lx_msg  TYPE REF TO cx_salv_msg.

*   call factory method to generate the output
    TRY.
        CALL METHOD cl_salv_table=>factory(
          IMPORTING
            r_salv_table            = o_alv
          CHANGING
            t_table                 = t_vbak ).


      CATCH cx_salv_msg INTO lx_msg.
     .
    ENDTRY.
*
*$*$*.....CODE_ADD_2 - Begin..................................2..*$*$*
*
*    In this area we will call the methods which will set the
*      different properties to the ALV
*
*$*$*.....CODE_ADD_2 - End....................................2..*$*$*
*
* Displaying the ALV
*   Here we will call the DISPLAY method to get the output on the screen
    o_alv->display( ).
*
  ENDMETHOD.                    "generate_output
*
*$*$*.....CODE_ADD_3 - Begin..................................3..*$*$*
*
*    In this area we will implement the methods which are defined in
*      the class definition
*
*$*$*.....CODE_ADD_3 - End....................................3..*$*$*
*
ENDCLASS.                    "lcl_report IMPLEMENTATION