ALV Grid Split 로직

Posted: 2013-12-12/Under: ABAP/By: thinkmaniac

Docking Container를 이용하여 화면을 분할해 개별 ALV List를 출력하는 로직.

[#M_더보기|접기|

DATA: go_docking_con       TYPE REF TO cl_gui_docking_container.
DATA: go_splitter          TYPE REF TO cl_gui_splitter_container,
DATA: go_cont              TYPE REF TO cl_gui_container,
     go_cont2             TYPE REF TO cl_gui_container,
     go_cont3             TYPE REF TO cl_gui_container,
     go_cont4             TYPE REF TO cl_gui_container,

     go_grid              TYPE REF TO lcl_def_grid,
     go_grid2             TYPE REF TO lcl_def_grid,
     go_grid3             TYPE REF TO lcl_def_grid,
     go_grid4             TYPE REF TO lcl_def_grid.

* Docking Container.
CREATE OBJECT go_docking_con
    EXPORTING
      side      = go_docking_con->dock_at_left
      extension = 2000.

* 화면 분할.
CREATE OBJECT go_splitter
    EXPORTING
      parent = go_docking_con
      rows    = 2
      columns = 2.

* 1행 1열.
CALL METHOD go_splitter->get_container
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = go_cont.

* 1행 2열.
CALL METHOD go_splitter->get_container
    EXPORTING
      row       = 1
      column    = 2
    RECEIVING
      container = go_cont2.

* 2행 1열.
CALL METHOD go_splitter->get_container
    EXPORTING
      row       = 2
      column    = 1
    RECEIVING
      container = go_cont3.
* 2행 2열.
CALL METHOD go_splitter->get_container
    EXPORTING
      row       = 2
      column    = 2
    RECEIVING
      container = go_cont4.

* split 화면 너비

CALL METHOD G_SPLITTER->SET_COLUMN_WIDTH

EXPORTING

ID = 1

WIDTH = 15.

CREATE OBJECT go_grid
EXPORTING
i_parent = go_cont.

CREATE OBJECT go_grid2
EXPORTING
i_parent = go_cont2.

CREATE OBJECT go_grid3
EXPORTING
i_parent = go_cont3.

CREATE OBJECT go_grid4
EXPORTING
i_parent = go_cont4.

_M#]