Multiple ALV display in one screen using SALV(Factory method)...

Question

Hello Experts,
I tried using the old 'REUSE_ALV_BLOCK_LIST_APPEND' but it does not suit my
requirement. So will it be possible to display multiple ALV display(block) using
SALV?

Answer 1

check the sample code..
REPORT  zsalv_demo_multiple.
DATA: salv1 TYPE REF TO cl_salv_table,
      salv2 TYPE REF TO cl_salv_table,
      salv3 TYPE REF TO cl_salv_table.
DATA: g_custom TYPE REF TO cl_gui_custom_container,
o_splitter    TYPE REF TO cl_gui_splitter_container,
o_grid1 TYPE REF TO cl_gui_container,
o_grid2  TYPE REF TO cl_gui_container,
o_grid3  TYPE REF TO cl_gui_container.
DATA: it_flight TYPE STANDARD TABLE OF sflight,
      it_carr  TYPE TABLE OF scarr,
      it_book TYPE TABLE OF sbook.
START-OF-SELECTION.
  SELECT * FROM sflight
  INTO TABLE it_flight
  UP TO 20 ROWS.
  SELECT * FROM scarr
  INTO TABLE it_carr
  UP TO 20 ROWS.
  SELECT * FROM sbook
  INTO TABLE it_book
  UP TO 20 ROWS.
  CALL SCREEN 100.
*&      Module  STATUS_0100  OUTPUT
*       text
MODULE status_0100 OUTPUT.
  SET PF-STATUS 'ABC'.
  CREATE OBJECT g_custom
  EXPORTING container_name = 'CONT'.
  CREATE OBJECT o_splitter
  EXPORTING parent  = g_custom
  rows    = 3
  columns = 1.
  CALL METHOD o_splitter->get_container
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = o_grid1.
  CALL METHOD o_splitter->get_container
    EXPORTING
      row       = 2
      column    = 1
    RECEIVING
      container = o_grid2.
  CALL METHOD o_splitter->get_container
    EXPORTING
      row       = 3
      column    = 1
    RECEIVING
      container = o_grid3.
  cl_salv_table=>factory(
    EXPORTING
      r_container    = o_grid1
    IMPORTING
      r_salv_table   = salv1
    CHANGING
      t_table        = it_flight
  cl_salv_table=>factory(
    EXPORTING
      r_container    = o_grid2
    IMPORTING
      r_salv_table   = salv2
    CHANGING
      t_table        = it_carr
  cl_salv_table=>factory(
    EXPORTING
      r_container    = o_grid3
    IMPORTING
      r_salv_table   = salv3
    CHANGING
      t_table        = it_book
  CALL METHOD salv1->display.
  CALL METHOD salv2->display.
  CALL METHOD salv3->display.
ENDMODULE.                 " STATUS_0100  OUTPUT
*&      Module  USER_COMMAND_0100  INPUT
*       text
MODULE user_command_0100 INPUT.
  CASE sy-ucomm.
    WHEN 'BACK'.
      LEAVE TO SCREEN 0.
  ENDCASE.
ENDMODULE.                 " USER_COMMAND_0100  INPUT
Flow Logic..
PROCESS BEFORE OUTPUT.
MODULE STATUS_0100.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_0100.
in the Screen i placed a custom control and named it as CONT