ALV split container

DATA: container1 TYPE REF TO cl_gui_container,
container2 TYPE REF TO cl_gui_container,
main1 TYPE REF TO cl_gui_custom_container,
splitter1 TYPE REF TO cl_gui_splitter_container,
grid1 TYPE REF TO cl_gui_alv_grid,
grid2 TYPE REF TO cl_gui_alv_grid,
ls_layo TYPE lvc_s_layo,
count TYPE i VALUE 0,
g_okcode LIKE sy-ucomm,
r1,r2.

DATA: alv_fcat TYPE lvc_t_fcat WITH HEADER LINE.

* First Main Container
CREATE OBJECT main1
EXPORTING container_name = 'MAIN_CONTAINER'.

* First Splitter Container
CREATE OBJECT splitter1
EXPORTING parent = main1
rows = 2
columns = 1.

* Place Container1 in First row First column
CALL METHOD splitter1->get_container
EXPORTING
row = 1
column = 1
RECEIVING
container = container1.

* Place Container2 in Second row First column
CALL METHOD splitter1->get_container
EXPORTING
row = 2
column = 1
RECEIVING
container = container2.


* Create grids
CREATE OBJECT grid1
EXPORTING i_parent = container1.

CREATE OBJECT grid2
EXPORTING i_parent = container2.