Grand total (of all columns) in ALV grid

Question

Hi Experts,
I have developed one custom ALV report in GRID format. Now Report output is displaying like below.
COL1 |   COL2  |    COL3  |  COL4 |
TYPE1  |   10   |           44  |          05 |
TYPE2  |    01  |           20  |          35 |
TYPE3  |   05   |          10   |         20  |
=============================
   sum  |     16  |          74   |  50  |
But I need Grand Total for COL2 and COL3 and COL4 (i.e 16 + 74 + 50 )
This grand total line should be at the end of the internal table -- 140 .
The report output should be like below.....
COL1 |   COL2  |    COL3  |  COL4 |
TYPE1  |   10   |           44  |          05 |
TYPE2  |    01  |           20  |          35 |
TYPE3  |   05   |          10   |         20  |
=============================
   sum  |     16  |          74   |  50  |           ====> this sum will displayed when user select sum button on the Grid toolbar.
=============================
Grand Total   140 |
Suppose when I press sum button on the COL2. it should not change grand total. I mean Grand total should be like footer always.
Please advise
Thanks in advance.
Raghu

Answer 1

Hi
For your requirment ,you have to fill the field catalog for each field for which
you have to create the the grand total and check the option DO_SUM.
If you neeed the sub total ,in the sort table you can check the option- fs_sort-subtot = 'X'.
Just try the belo code .
It will solve your problem.
REPORT ztest.
* INTERNAL TABLE DECLARATION.
DATA:
t_sflight TYPE TABLE OF sflight,
fs_sflight TYPE sflight.
*OBJECTS FOR CONTAINER AND GRID.
DATA:
r_container1 TYPE REF TO cl_gui_custom_container,
r_grid1 TYPE REF TO cl_gui_alv_grid.
*FIELD CATALOG
DATA:
t_fcat TYPE lvc_t_fcat,
fs_fcat TYPE lvc_s_fcat.
fs_fcat-fieldname = 'SEATSMAX'.
fs_fcat-do_sum = 'X'.
APPEND fs_fcat TO t_fcat.
CLEAR fs_fcat.
fs_fcat-fieldname = 'PRICE'.
fs_fcat-do_sum = 'X'.
APPEND fs_fcat TO t_fcat.
CLEAR fs_fcat.
* SORT TABLE
DATA:
t_sort TYPE lvc_t_sort,
fs_sort TYPE lvc_s_sort.
* LAYOUT TABLE
DATA:
fs_layo TYPE lvc_s_layo.
*FS_LAYO-SGL_CLK_HD = 'X'.
fs_layo-zebra = 'X'.
fs_sort-spos ='1'.
fs_sort-fieldname = 'CARRID'.
fs_sort-down = 'X'.
fs_sort-group = '*'.
*fs_sort-subtot = 'X'.
APPEND fs_sort TO t_sort.
SELECT * FROM sflight INTO TABLE t_sflight.
CALL SCREEN 100.
*&      Module  STATUS_0100  OUTPUT
*       text
MODULE status_0100 OUTPUT.
  SET PF-STATUS 'SCREEN1'.
  SET TITLEBAR 'TITLE1'.
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
**&      Module  HANDLER  OUTPUT
**       text
MODULE  header  OUTPUT.
  CREATE OBJECT r_container1
    EXPORTING
      container_name = 'CONTAINER'.
  CREATE OBJECT r_grid1
    EXPORTING
      i_parent = r_container1.
  CALL METHOD r_grid1->set_table_for_first_display
    EXPORTING
      is_layout        = fs_layo
      i_structure_name = 'SFLIGHT'
    CHANGING
      it_fieldcatalog  = t_fcat
      it_outtab        = t_sflight
      it_sort          = t_sort.
ENDMODULE.                    "Header OUTPUT
Regards
Hareesh.