Skip to Content
author's profile photo Alhanouf Alolayt
0
Alhanouf Alolayt

Title for multiple container

Posted on Oct 21, 2019 at 05:48 AM 107 Views

I have a splitter container that generates 4 alv report

i need to add title above each alv report like attached file down (green layout)

down is my code and pic of output of my report 

MODULE status_9000 OUTPUT.

 
  SET PF-STATUS 'COLLECTION_SYSTEM'.
  SET TITLEBAR 'COLLECTION_SYSTEM'.


  CREATE OBJECT container
    EXPORTING
      container_name = 'CONTAINER'."Pass name of container created in Screen no 9000


*splitting the main container into 1 row & 2 coloum
  CREATE OBJECT splitter_1
    EXPORTING
      parent  = container
      rows    = 1
      columns = 2.


*getting the reference for the splited container (row 1 & col 1 container)
  CALL METHOD splitter_1->get_container
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = container_1.


*splitting the 1nd coloum container in to 2 rows & 1 coloum*
  CREATE OBJECT splitter_3
    EXPORTING
      parent  = container_1
      rows    = 2
      columns = 1.


*getting the reference for the splited container (row 1 & col 2 container)
  CALL METHOD splitter_3->get_container
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = container_1.

*getting the reference for the splited container (row 1 & col 2 container)
  CALL METHOD splitter_3->get_container
    EXPORTING
      row       = 2
      column    = 1
    RECEIVING
      container = container_4.




*getting the reference for the splited container (row 1 & col 2 container)
  CALL METHOD splitter_1->get_container
    EXPORTING
      row       = 1
      column    = 2
    RECEIVING
      container = container_2.


*splitting the 2nd coloum container in to 2 rows & 1 coloum*
  CREATE ObJECT splitter_2
    EXPORTING
      parent  = container_2
      rows    = 2
      columns = 1.


*getting the reference for the splited container2 (row 1 & col 2 container)*
  CALL METHOD splitter_2->get_container
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = container_2.

*getting the reference for the splited container2 (row 2 & col 1 container)
  CALL METHOD splitter_2->get_container
    EXPORTING
      row       = 2
      column    = 1
    RECEIVING
      container = container_3.



*POPULATING THE FIELD CATALOG.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'KUNNR'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'KUNNR'.
  wa_fcat-col_pos = 1.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'PLAN_DATE'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'PLAN_DATE'.
  wa_fcat-col_pos = 2.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'ACTUAL_DATE'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'ACTUAL_DATE'.
  wa_fcat-col_pos = 3.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'WEEK'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'WEEK'.
  wa_fcat-col_pos = 4.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'CODE'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'CODE'.
  wa_fcat-col_pos = 5.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'ZCOMMENT'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'ZCOMMENT'.
  wa_fcat-col_pos = 6.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.
  wa_fcat-fieldname = 'HOMEWORK'.
  wa_fcat-ref_table = 'ZSD_CBALANCE'.
  wa_fcat-ref_field = 'HOMEWORK'.
  wa_fcat-col_pos = 7.
  APPEND wa_fcat TO t_fcat.
  CLEAR wa_fcat.


*populating first internal table to the container
  CREATE OBJECT container
    EXPORTING
      container_name = g_container.
  CREATE OBJECT grid1
    EXPORTING
      i_parent = container_1.
  CALL METHOD grid1->set_table_for_first_display
*    EXPORTING
*       it_fieldcatalog = 'ZSD_CBALANCE'
    CHANGING
       it_fieldcatalog = t_fcat
      it_outtab        = it_zsd_cbalance .

*populating second internal table
  CREATE OBJECT container
    EXPORTING
      container_name = g_container.
  CREATE OBJECT grid2
    EXPORTING
      i_parent = container_2.
  CALL METHOD grid2->set_table_for_first_display
*    EXPORTING
*      i_structure_name = 'ZSD_CBALANCE'
    CHANGING
       it_fieldcatalog = t_fcat
      it_outtab        = it_zsd_cbalance .
*populating third internal table
  CREATE OBJECT container
    EXPORTING
      container_name = g_container.
  CREATE OBJECT grid3
    EXPORTING
      i_parent = container_3.
  CALL METHOD grid3->set_table_for_first_display
*    EXPORTING
*      i_structure_name = 'ZSD_CBALANCE'
    CHANGING
      it_fieldcatalog = t_fcat
      it_outtab        = it_zsd_cbalance .
*populating fourth internal table
  CREATE OBJECT grid4
    EXPORTING
      i_parent = container_4.
  CALL METHOD grid4->set_table_for_first_display
*    EXPORTING
*      i_structure_name = 'ZSD_CBALANCE'
    CHANGING
      it_fieldcatalog = t_fcat
      it_outtab        = it_zsd_cbalance .
endmoudle.
capture.png (73.7 kB)
capture2.png (71.4 kB)
Add a comment
10|10000 characters needed characters exceeded

Assigned Tags

Related questions

2 Answers

  • author's profile photo Sandra Rossi
    Sandra Rossi
    Posted on Oct 21, 2019 at 07:33 PM
    1

    TL;DR (excerpt of Alhanouf Alolayt answer)

    gr_display = gr_salv_table->get_display_settings( ).
gr_display->set_list_header( 'Balance Confirmation Comments' ).

    cf screenshot in Alhanouf Alolayt answer

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Alhanouf Alolayt
    Alhanouf Alolayt
    Posted on Oct 21, 2019 at 06:50 AM
    0 
    

  CREATE OBJECT container

    EXPORTING

      container_name = 'CONTAINER'."Pass name of container created in Screen no 9000





*splitting the main container into 1 row & 2 coloum

  CREATE OBJECT splitter_1

    EXPORTING

      parent  = container

      rows    = 1

      columns = 2.









*getting the reference for the splited container (row 1 & col 1 container)

  CALL METHOD splitter_1->get_container

    EXPORTING

      row       = 1

      column    = 1

    RECEIVING

      container = container_1.







*splitting the 1nd coloum container in to 2 rows & 1 coloum*

  CREATE OBJECT splitter_3

    EXPORTING

      parent  = container_1

      rows    = 2

      columns = 1.



*getting the reference for the splited container (row 1 & col 2 container)

  CALL METHOD splitter_3->get_container

    EXPORTING

      row       = 1

      column    = 1

    RECEIVING

      container = container_1.





*getting the reference for the splited container (row 1 & col 2 container)

  CALL METHOD splitter_3->get_container

    EXPORTING

      row       = 2

      column    = 1

    RECEIVING

      container = container_4.







*getting the reference for the splited container (row 1 & col 2 container)

  CALL METHOD splitter_1->get_container

    EXPORTING

      row       = 1

      column    = 2

    RECEIVING

      container = container_2.







*splitting the 2nd coloum container in to 2 rows & 1 coloum*

  CREATE OBJECT splitter_2

    EXPORTING

      parent  = container_2

      rows    = 2

      columns = 1.



*getting the reference for the splited container2 (row 1 & col 2 container)*

  CALL METHOD splitter_2->get_container

    EXPORTING

      row       = 1

      column    = 1

    RECEIVING

      container = container_2.

*getting the reference for the splited container2 (row 2 & col 1 container)

  CALL METHOD splitter_2->get_container

    EXPORTING

      row       = 2

      column    = 1

    RECEIVING

      container = container_3.







  cl_salv_table=>factory(

EXPORTING

r_container = container_1

IMPORTING

r_salv_table = gr_table

CHANGING

t_table = it_zsd_cbalance

).



  cl_salv_table=>factory(

EXPORTING

r_container = container_2

IMPORTING

r_salv_table = gr_table1

CHANGING

t_table = it_zsd_cbalance

).



  cl_salv_table=>factory(

EXPORTING

r_container = container_4

IMPORTING

r_salv_table = gr_table2

CHANGING

t_table = it_ZSD_GENERAL_COMM

).



  cl_salv_table=>factory(

EXPORTING

r_container = container_3

IMPORTING

r_salv_table = gr_table3

CHANGING

t_table = it_zsd_cbalance

).


  "Titre 1

  gr_function = gr_table->get_functions( ).

  gr_function->set_all( abap_true ).

  gr_columns = gr_table->get_columns( ).

  gr_columns->set_optimize( c_col_x ).

  MOVE 'Balance Confirmation Comments' TO g_title.

  gr_display = gr_table->get_display_settings( ).

  gr_display->set_striped_pattern( if_salv_c_bool_sap=>true ).

  gr_display->set_list_header( g_title ).

  CALL METHOD gr_table->display.

  gr_function = gr_table1->get_functions( ).

  gr_function->set_all( abap_true ).

  gr_columns = gr_table1->get_columns( ).

  gr_columns->set_optimize( c_col_x ).



  "Title 2

  MOVE 'Missing Document Comments' TO g_title.

  gr_display = gr_table1->get_display_settings( ).

  gr_display->set_striped_pattern( if_salv_c_bool_sap=>true ).

  gr_display->set_list_header( g_title ).

  CALL METHOD gr_table1->display.

  gr_function = gr_table2->get_functions( ).

  gr_function->set_all( abap_true ).

  gr_columns = gr_table2->get_columns( ).

  gr_columns->set_optimize( c_col_x ).



  "Titre 3

  MOVE 'General Comments ' TO g_title.

  gr_display = gr_table2->get_display_settings( ).

  gr_display->set_striped_pattern( if_salv_c_bool_sap=>true ).

  gr_display->set_list_header( g_title ).

  CALL METHOD gr_table2->display.

  gr_function = gr_table3->get_functions( ).

  gr_function->set_all( abap_true ).

  gr_columns = gr_table3->get_columns( ).

  gr_columns->set_optimize( c_col_x ).



  "Titre



  MOVE 'Title4' TO g_title.

  gr_display = gr_table3->get_display_settings( ).

  gr_display->set_striped_pattern( if_salv_c_bool_sap=>true ).

  gr_display->set_list_header( g_title ).

  CALL METHOD gr_table3->display.









ENDMODULE.                 " STATUS_9000  OUTPUT
    Add a comment
    10|10000 characters needed characters exceeded

Before answering

You should only submit an answer when you are proposing a solution to the poster's problem. If you want the poster to clarify the question or provide more information, please leave a comment instead, requesting additional details. When answering, please include specifics, such as step-by-step instructions, context for the solution, and links to useful resources. Also, please make sure that you answer complies with our Rules of Engagement.
You must be Logged in to submit an answer.

Up to 10 attachments (including images) can be used with a maximum of 1.0 MB each and 10.5 MB total.