Display two or more ALVs on one screen using Splitter Control

 

Output:-
Code:-

DATA: CUSTOM_CONTAINER TYPE REF TO CL_GUI_CUSTOM_CONTAINER,       SPLITTER TYPE REF TO CL_GUI_SPLITTER_CONTAINER,       GRAPHIC_PARENT1 TYPE REF TO CL_GUI_CONTAINER,       GRAPHIC_PARENT2 TYPE REF TO CL_GUI_CONTAINER. DATA REF_GRID TYPE REF TO CL_GUI_ALV_GRID. DATA REF_GRID1 TYPE REF TO CL_GUI_ALV_GRID. **   create container in which to place splitter **   (place it in the custom control named CONTAINER **   defined using screenpainter in dynpro 100) CREATE OBJECT CUSTOM_CONTAINER EXPORTING  CONTAINER_NAME = 'CONTAINER'. "use uppercase letters! * **   create splitter container in which to place graphics CREATE OBJECT SPLITTER  EXPORTING    PARENT  = CUSTOM_CONTAINER     ROWS    = 2    COLUMNS = 1    ALIGN   = 15. " (splitter fills the hole custom container) **   get part of splitter container for 1st table CALL METHOD SPLITTER->GET_CONTAINER   EXPORTING     ROW       = 1     COLUMN    = 1   RECEIVING     CONTAINER = GRAPHIC_PARENT1. **   get part of splitter container for 2nd table CALL METHOD SPLITTER->GET_CONTAINER   EXPORTING     ROW       = 2     COLUMN    = 1   RECEIVING     CONTAINER = GRAPHIC_PARENT2. CREATE OBJECT  REF_GRID EXPORTING I_PARENT = GRAPHIC_PARENT1. **  Display first ALV PERFORM SET_DISPLAY. CREATE OBJECT  REF_GRID1 EXPORTING I_PARENT = GRAPHIC_PARENT2. **  Display second ALV PERFORM SET_DISPLAY1. *&--------------------------------------------------------------------* *&      Form  set_display *&--------------------------------------------------------------------* *       text  Display first ALV *---------------------------------------------------------------------* FORM SET_DISPLAY.   CALL METHOD REF_GRID->SET_TABLE_FOR_FIRST_DISPLAY     EXPORTING       IS_VARIANT      = ST_VAR       I_SAVE          = SAVE       IS_LAYOUT       = LOYO     CHANGING       IT_OUTTAB       = ITAB_FINAL[]       IT_FIELDCATALOG = FCAT. ENDFORM.                    "set_display *&--------------------------------------------------------------------* *&      Form  set_display1 *&--------------------------------------------------------------------* *       text Display second ALV *---------------------------------------------------------------------* FORM SET_DISPLAY1.   CALL METHOD REF_GRID1->SET_TABLE_FOR_FIRST_DISPLAY     EXPORTING       IS_VARIANT      = ST_VAR       I_SAVE          = SAVE       IS_LAYOUT       = LOYO1     CHANGING       IT_OUTTAB       = ITAB_FINAL1[]       IT_FIELDCATALOG = FCAT1. ENDFORM.                    "set_display1