*&---------------------------------------------------------------------*
*& Report  ZJL_ALV2
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zjl_alv2.

DATA: gr_grid TYPE REF TO cl_gui_alv_grid,
      gr_container TYPE REF TO cl_gui_custom_container,
      gt_table TYPE TABLE OF zjl_table.

IF gr_container IS INITIAL.
  CREATE OBJECT gr_container
    EXPORTING
      container_name = 'CONT'.
  CREATE OBJECT gr_grid
    EXPORTING
      i_parent = gr_container.
ENDIF.

SELECT * FROM zjl_table INTO TABLE gt_table.

CALL METHOD gr_grid->set_table_for_first_display
  EXPORTING
*      i_buffer_active               =
*      i_bypassing_buffer            =
*      i_consistency_check           =
    i_structure_name              = 'zjl_table'
*      is_variant                    =
*      i_save                        =
*      i_default                     = 'X'
*      is_layout                     =
*      is_print                      =
*      it_special_groups             =
*      it_toolbar_excluding          =
*      it_hyperlink                  =
*      it_alv_graphics               =
*      it_except_qinfo               =
*      ir_salv_adapter               =
  CHANGING
    it_outtab                     = gt_table
*      it_fieldcatalog               =
*      it_sort                       =
*      it_filter                     =
*    EXCEPTIONS
*      invalid_parameter_combination = 1
*      program_error                 = 2
*      too_many_lines                = 3
*      others                        = 4
        .
IF sy-subrc <> 0.
*   MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*              WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.