Total for columns in ALV OO

Hi,
I have 20 fields in my OO ALV report which is working in background also.
I need to get the subtotal for some of the numeric fields. I am using a single container for both background and online reports. I am using the class CL_GUI_ALV_GRID.
Can someone please tell me how to get the total in the report which will work in background as well.
Thanks in advance experts.

Hi,
Use the method GET_SUBTOTALS
of this class to get the subtotals by applying this method for
the columns for which you need to calculate the subtotal.

Similar Messages

Grands totals for % Columns coming incorrect in pivot view .

Hello ,
I have the below scenario . Iam trying to get the calculated grand total for % column . I tired several ways ...like report aggregates enabled in instanceconfig,tried creating cal colum using physical columns as well as logical columns in RPD , changing the aggregation rule. The row wise values (%) are coming correct but iam unable to get correct % grand total (36.8%) instead iam just getting the sum of the % total ( 83.3%) . I have tried the above options in my previous reports and those conditions work perfectly right but for this report they are not able to . kindly please let me know if anybody has a solution for this issue .
Department ...USD CAD Variance (USD/CAD)*100
XYZ 10 20 50%
ABC 25 75 33.3%
Total 35 95 36.8% ( 35/95)
Thanks
Karthik

Just to cross check
Do you have following tag in your instanceconfig file ? if its not there then you may encounter grand total incorrect calculations.
<ReportAggregateEnabled>true</ReportAggregateEnabled>

OAF :I need to show totals for columns that breaks on one of the column in Advance Table

I am using advance table (AT),
I have a requirement to calculate totals for few columns in the AT, based on the account number ( totals should break on the account # , as shown below )
Please help.
Account
Desc
Paid Amt
AP Credit
acc1
desc1
200
100
acc1
desc1
300
100
acc1
desc1
400
100
Total 900
Total 300
acc2
desc2
150
50
acc2
desc2
250
50
acc2
desc2
100
150
Total 500
Total 200
Message was edited by: 85de445e-a75a-4f2f-b086-8cb6abb09c5d
CAN ANY ONE PLEASE PROVIDE ANY INPUTS.. , AS ITS URGENT ! Thanks in advance.

Any updates on this please !!! ?
Please suggest if this can be achieved by any other region type or any specific type to be used ??

Totalling the columns in ALV Grid

Hello All,
I have a output with amount and currencies. The problem i am facing is, the amount is in USD and in GBP and it is giving me single value. It is not splitting the USD amount from the GBP amount.
Also, I am doing a subtotal based on material. This is the most important requirement.
Can anybody help me out in this.
Thanks,
Salil
I am giving the below piece of code if you want to refer it.
DATA: gr_alv        TYPE REF TO cl_salv_table,
        lr_display    TYPE REF TO cl_salv_display_settings,
        lr_columns    TYPE REF TO cl_salv_columns_table,
        lr_column     TYPE REF TO cl_salv_column_table,
        lr_functions TYPE REF TO cl_salv_functions_list,
        lr_sorts      TYPE REF TO cl_salv_sorts,
        lr_print      TYPE REF TO cl_salv_print,
        lr_column_f   TYPE REF TO cl_salv_columns,
        gr_error      TYPE REF TO cx_salv_not_found ,
        lr_layout     TYPE REF TO cl_salv_layout.
DATA: key     TYPE salv_s_layout_key,
        gr_msg TYPE string.
IF NOT lt_output[] IS INITIAL.
    TRY.
* Create ALV instance - use CALL METHOD since this is a static method
        CALL METHOD cl_salv_table=>factory
          IMPORTING
            r_salv_table = gr_alv
          CHANGING
            t_table      = lt_output.
        lr_display = gr_alv->get_display_settings( ).
        lr_display->set_list_header( text-ttl ).
* Get functions object and then set all the functions to be allowed
        lr_functions = gr_alv->get_functions( ).
        lr_functions->set_all( ).
        DATA: lv_field TYPE lvc_fname.
* Get column settings object and then optimize the column widths to the
* data
        lr_columns = gr_alv->get_columns( ).
        lr_columns->set_optimize( ).
*--- set column header for custom field Difference in Qty
        TRY.
            lr_column ?= lr_columns->get_column( 'BUCHM2' ).
            lr_column->set_output_length('12').
            lr_column->set_long_text( 'Diff Qty' ).
            lr_column->set_short_text( 'Diff Qty' ).
            lr_column->set_medium_text( 'Diff Qty' ).
          CATCH cx_salv_not_found INTO gr_error.
            gr_msg = gr_error->get_text( ).
            MESSAGE gr_msg TYPE 'I'.
        ENDTRY.
*--- set column header for custom field Difference in Qty Abs
        TRY.
            lr_column ?= lr_columns->get_column( 'BUCHM3' ).
            lr_column->set_output_length('13').
            lr_column->set_long_text( 'Diff Qty(Abs)' ).
            lr_column->set_medium_text( 'Diff Qty(Abs)' ).
*            lr_column->set_short_text( 'Diff Qty(Abs)' ).
          CATCH cx_salv_not_found INTO gr_error.
            gr_msg = gr_error->get_text( ).
            MESSAGE gr_msg TYPE 'I'.
        ENDTRY.
*--- set column header for custom field Difference in Value
        TRY.
            lr_column ?= lr_columns->get_column( 'VALUE' ).
            lr_column->set_output_length('15').
            lr_column->set_long_text( 'Value Diff' ).
            lr_column->set_medium_text( 'Value Diff' ).
            lr_column->set_short_text( 'Value Diff' ).
          CATCH cx_salv_not_found INTO gr_error.
            gr_msg = gr_error->get_text( ).
            MESSAGE gr_msg TYPE 'I'.
        ENDTRY.
*--- set column header for custom field Difference in Value Abs
        TRY.
            lr_column ?= lr_columns->get_column( 'VALUE_ABS' ).
            lr_column->set_output_length('15').
            lr_column->set_long_text( 'Value Diff(Abs)' ).
            lr_column->set_medium_text( 'Value Diff(Abs)' ).
          CATCH cx_salv_not_found INTO gr_error.
            gr_msg = gr_error->get_text( ).
            MESSAGE gr_msg TYPE 'I'.
        ENDTRY.
*--- set column header for custom field Status
        TRY.
            lr_column ?= lr_columns->get_column( 'STATUS' ).
            lr_column->set_output_length('15').
            lr_column->set_long_text( 'PI Item Status' ).
            lr_column->set_medium_text( 'PI Item Status' ).
          CATCH cx_salv_not_found INTO gr_error.
            gr_msg = gr_error->get_text( ).
            MESSAGE gr_msg TYPE 'I'.
        ENDTRY.
*--- set column header for custom field Status
        TRY.
            lr_column ?= lr_columns->get_column( 'TOTAL' ).
            lr_column->set_output_length('15').
            lr_column->set_long_text( 'Total Value Diff' ).
            lr_column->set_medium_text( 'Total Value Diff' ).
          CATCH cx_salv_not_found INTO gr_error.
            gr_msg = gr_error->get_text( ).
            MESSAGE gr_msg TYPE 'I'.
        ENDTRY.
* Optimize the column widths for printing.
        lr_print = gr_alv->get_print( ).
        lr_print->set_print_parameters_enabled( value = 'X' ).
        lr_print->set_column_optimization( value = 'X' ).
*--- This code is to get the layout,save the layout and display the
*    layout
        lr_layout = gr_alv->get_layout( ).
        lr_layout->set_default( cl_salv_layout=>true ). " allow default
        key-report = sy-repid.
        lr_layout->set_key( key ).
       lr_layout->set_save_restriction( cl_salv_layout=>restrict_none ).
        DATA: init_layout TYPE slis_vari.
        init_layout = p_layout.
        lr_layout->set_initial_layout( init_layout ).
*--- display report
        gr_alv->display( ).
      CATCH cx_salv_msg.
        WRITE: 'Error displaying grid! - cx_salv_msg'.
      CATCH cx_salv_not_found.
        WRITE: 'Error displaying grid! - cx_salv_not_found'.
      CATCH cx_salv_data_error.
        WRITE: 'Error displaying grid! - cx_salv_data_error'.
      CATCH cx_salv_existing.
        WRITE: 'Error displaying grid! - cx_salv_existing'.
    ENDTRY.
ELSE.
    MESSAGE s004.
ENDIF.

Can you use something like function module CONVERT_CURRENCY_BY_RATE to convert one set of currencies so all amounts are in the same currency before you display them in the ALV?
- April King

Summarize total for Row items in pivot table

Hi,
I have a certain number of row items and few fact columns. 2 of the row items are level based measures that will summarize on other conditions so I cannot have them in the Fact section. But for these 2 row items (in the Rows section) I want them to summarize the values (a total sum under) as for the Fact columns, but it seems impossible to do this in a pivot table.
I tried everything. This is a very irritating limitation to Pivot tables. Anyone have a good solution to this? (I have to use Pivot table because I have numbers showing for each month, table view will not work for this)

Hi Alf,
Just for everyone else checking this post out, here is the image you posted.
!http://i45.tinypic.com/15x50r6.jpg!
Now I see what you are talking about. Based on that screen-shot and your post, it looks like three of your measures (Arsbudsjett, Lok. budsjett, Akk.regnskap) are placed in the "Rows" section of the pivot table because you don't want them pivoted on the month. You just want them displayed as a single column and you want to pivot the other measure by month.
However, it appears that OBIEE does not summarize items in the "Rows" section and only provides sub-totals for columns in the "Measures" section.
I have two follow up questions
1) What technique are you using to breakup the column "KOSTRA art"? There seems to be some kind of grouping at the value "Lenn og sosiale utgifter". What is special about that value on how is that grouping or break in the data created?
2) One of those three measures, Akk.regnskap, does have a sub-total but the other two, Arsbudsjett, Lok. budsjett, do not. What is different about Akk.regnskap that causes it to have a sub-totals?
Thanks for the follow up questions.
-Joe

Sub-total and Total for a column having checkboxes in WD ABAP ALV

Hello Experts,
I have used ALV in We bdynpro ABAP to display my output. There are 2 columns that are checkboxes in Output. I want a sub-total and total for those two columns. I know tht total and sub-total functionality is available only for numeric fields .
Is there any other indirect way by which i can achieve the same ?

Hi Ragini,
Please refer this thread: [alv total and subtotal|How to display graphs;.
I hope it helps.
Regards
Arjun

Total for an editable column (ALV)

Hi experts!
I developed an WD ALV and I need to display totals for a column.
The problem is, this column is editable, the user could to put some values in some rows of the table and when he press ENTER Key, all values entered should be added and displayed in Total.
How can to do this?
Thx in advance.
Danilo

Hi Dear ,
When u press the Enter key after the calculation for that column , u have to refresh or reload the all the contents of the ALV to context for that ALV where it is binded.
Check the below code :
data:
lr_comp_alv    type ref to if_wd_component_usage,
lr_comp_if_alv type ref to iwci_salv_wd_table,
lr_config      type ref to cl_salv_wd_config_table.
data: lr_column_settings type ref to if_salv_wd_column_settings,
        lr_column          type ref to cl_salv_wd_column,
        lr_column_header   type ref to cl_salv_wd_column_header.
data : lt_column type salv_wd_t_column_ref,
         ls_column type salv_wd_s_column_ref.
data: lr_field_amnt type ref to cl_salv_wd_field.
data: lv_aggr_rule   type ref to cl_salv_wd_aggr_rule.
data: lr_sort_rule   type ref to cl_salv_wd_sort_rule.
data fs_flight      like line of ls_sflight.
*... ALV Component Usage
lr_comp_alv = wd_this->wd_cpuse_alv_test( ).
if lr_comp_alv->has_active_component( ) is initial.
    lr_comp_alv->create_component( ).
endif.
lr_comp_if_alv = wd_this->wd_cpifc_alv_test( ).
*... Configure ALV
lr_config = lr_comp_if_alv->get_model( ).
call method lr_config->if_salv_wd_table_settings~set_selection_mode
    exporting
      value = cl_wd_table=>e_selection_mode-multi_no_lead.
lt_column = lr_column_settings->get_columns( ).
loop at lt_column into ls_column.
    case ls_column-id.
      when 'PRICE'. " this is the column id where u want the total
* aggregate field
        call method lr_config->if_salv_wd_field_settings~get_field
          exporting
            fieldname = 'PRICE' " this is the column name
          receiving
            value     = lr_field_amnt.
* create aggregate rule as total (if u need subtotal also...)
        call method lr_field_amnt->if_salv_wd_aggr~create_aggr_rule
          exporting
            aggregation_type = if_salv_wd_c_aggregation=>aggrtype_total
          receiving
            value            = lv_aggr_rule.
    endcase.
endloop.
endmethod.
Regards
Aisurya puhan
Edited by: Aisurya Puhan on Jun 29, 2011 8:06 PM

Calculating Totals for a column in ALV Grid Display

Hi All,
I frustrated with the problem of simple calculating total for a column. I wrote the following code:
LW_CATALOG-TABNAME   = P_GV_STRUCT.
LW_CATALOG-FIELDNAME = 'ZSUMMS'.
LW_CATALOG-DO_SUM    = GC_X.
APPEND LW_CATALOG TO G_FIELDCAT_TAB.
CLEAR LW_CATALOG.
It is not working. Could you please suggest the solution?
It would be great help to me.
Advanced Thanks,
Phani Kumar

Phani,
Did u try playing around with any of these layout fields ?
no_sumchoice(1),       " no choice for summing up
no_totalline(1),       " no total line
no_subchoice(1),       " no choice for subtotals
no_subtotals(1),       " no subtotals possible
no_unit_splitting " no sep. tot.lines by inh.units
totals_before_items,   " diplay totals before the items
totals_only(1),        " show only totals
totals_text(60) ,      " text for 1st col. in total line
subtotals_text(60) ,    " text for 1st col. in subtotals
b. Addtionally... not a solution.. but u know...
just try the same code iwth reuse_alv_list_display and see if the total gets displayed properly ?

Totals for the internal table field in alv

Hi Gurus,
I have an issue in displaying the totals in alv.
I have an internal table with the three fields like below.
scrap_code_001 like afru-xmnga, " Scrap Reason Qty.
scrap_code_002 like afru-xmnga, " Scrap Reason Qty.
scrap_code_003 like afru-xmnga, " Scrap Reason Qty.
In the output table which i am passing to the fieldcatlog is having the three above fields with values 10,3,4 respectively.
I am looping at the internal table
loop at gt_grund.
gv_tabix = sy-tabix.
i_fieldcat-no_zero = gc_x.
i_fieldcat-do_sum = gc_x.
perform assign_alv_qty_format.
if gt_grund-grund is initial.
gt_grund = 'NONE'.
gv_text = gt_grund.
else.
gv_text = gt_grund-grdtx.
endif.
gv_tabixn = gv_tabix.
gv_scrap_code+11(03) = gv_tabixn.
gv_fieldname = gv_scrap_code.
translate gv_fieldname to upper case.
perform bild_fieldcat using
gv_fieldname 'GT_REPORT' 'AFRU' gv_text 'QUAN' '12' ' ' .
endif.
endloop.
But in the output I am getting the totals but it displays totals for all the three columns as 17,17,17 (summing 10,3,4).
How do I display total as 10,3,4 for each column separately.
I appreciate you help and award points for the answer

Hi,
Please check if value fields i_fieldcat-ref_fieldname and i_fieldcat-ref_tabname regard to numc or curr type.
EX: i_fieldcat-ref_fieldname = 'WRBTR'
I_fieldcat-ref_tabname = 'BSEG'.
Regards,
Fernando

Alv subtotals and grand total for a field

Hi friends,
I Have an internal table ITAB1
in that i have a senario as below.
In my GRID display iam getting values in the layou as follows
BUKRS = 1000
LIFNR      MATNR     STCST
100          abc            500,00
100          pqr             400,00
100          xyz            200,00
                    sub total
200         pto              700,00
200         vbr              900,00
                    sub total
BUKRS = 2000
LIFNR      MATNR     STCST
150          abc            500,00
150          pqr             400,00
150          xyz            200,00
                    sub total
260         pto              700,00
260         vbr              900,00
                    sub total
          GRAND TOTAL =
Now my requirement is at the end of every vendor i need sub total for STCST field.
and at the end of every company code i need GRAND TOTAL for STCST field.
Its alv grid display.
how can i do that.
Regards,
Priyanka.

Check this sample code may it will help u:
*& Report Z_ALV_SUBTOTAL
REPORT z_alv_subtotal.
*& Table declaration
TABLES: ekko.
*& Type pool declaration
TYPE-POOLS: slis. " Type pool for ALV
*& Selection screen
SELECT-OPTIONS: s_ebeln FOR ekko-ebeln.
*& Type declaration
* Type declaration for internal table to store EKPO data
TYPES: BEGIN OF x_data,
       ebeln TYPE char30, " Document no.
       ebelp TYPE ebelp,   " Item no
       matnr TYPE matnr,   " Material no
       matnr1 TYPE matnr,   " Material no
       werks TYPE werks_d, " Plant
       werks1 TYPE werks_d, " Plant
       ntgew TYPE entge,   " Net weight
       gewe   TYPE egewe,   " Unit of weight
       END OF x_data.
*& Internal table declaration
DATA:
* Internal table to store EKPO data
i_ekpo TYPE STANDARD TABLE OF x_data INITIAL SIZE 0,
* Internal table for storing field catalog information
i_fieldcat TYPE slis_t_fieldcat_alv,
* Internal table for Top of Page info. in ALV Display
i_alv_top_of_page TYPE slis_t_listheader,
* Internal table for ALV Display events
i_events TYPE slis_t_event,
* Internal table for storing ALV sort information
i_sort TYPE slis_t_sortinfo_alv,
i_event TYPE slis_t_event.
*& Work area declaration
DATA:
wa_ekko TYPE x_data,
wa_layout     TYPE slis_layout_alv,
wa_events         TYPE slis_alv_event,
wa_sort TYPE slis_sortinfo_alv.
*& Constant declaration
CONSTANTS:
   c_header   TYPE char1
              VALUE 'H',                    "Header in ALV
   c_item     TYPE char1
              VALUE 'S'.
*& Start-of-selection event
START-OF-SELECTION.
* Select data from ekpo
SELECT ebeln " Doc no
         ebelp " Item
         matnr " Material*
         matnr " Material*
         werks " Plant*
         werks " Plant*
         ntgew " Quantity
         gewei " Unit
         FROM ekpo
         INTO TABLE i_ekpo
         WHERE ebeln IN s_ebeln
         AND ntgew NE '0.00'.
IF sy-subrc = 0.
    SORT i_ekpo BY ebeln ebelp matnr .
ENDIF.
* To build the Page header
PERFORM sub_build_header.
* To prepare field catalog
PERFORM sub_field_catalog.
* Perform to populate the layout structure
PERFORM sub_populate_layout.
* Perform to populate the sort table.
PERFORM sub_populate_sort.
* Perform to populate ALV event
PERFORM sub_get_event.
END-OF-SELECTION.
* Perform to display ALV report
PERFORM sub_alv_report_display.
*&      Form sub_build_header
*       To build the header
*       No Parameter
FORM sub_build_header .
* Local data declaration
DATA: l_system     TYPE char10 ,          "System id
        l_r_line     TYPE slis_listheader, "Hold list header
        l_date       TYPE char10,           "Date
        l_time       TYPE char10,           "Time
        l_success_records TYPE i,           "No of success records
        l_title(300) TYPE c.                " Title
* Title Display
l_r_line-typ = c_header.               " header
l_title = 'Test report'(001).
l_r_line-info = l_title.
APPEND l_r_line TO i_alv_top_of_page.
CLEAR l_r_line.
* Run date Display
CLEAR l_date.
l_r_line-typ = c_item.                " Item
WRITE: sy-datum TO l_date MM/DD/YYYY.
l_r_line-key = 'Run Date :'(002).
l_r_line-info = l_date.
APPEND l_r_line TO i_alv_top_of_page.
CLEAR: l_r_line,
         l_date.
ENDFORM.                    " sub_build_header
*&      Form sub_field_catalog
*       Build Field Catalog
*       No Parameter
FORM sub_field_catalog .
* Build Field Catalog
PERFORM sub_fill_alv_field_catalog USING:
     '01' '01' 'EBELN' 'I_EKPO' 'L'
     'Doc No'(003) ' ' ' ' ' ' ' ',
     '01' '02' 'EBELP' 'I_EKPO' 'L'
     'Item No'(004) 'X' 'X' ' ' ' ',
     '01' '03' 'MATNR' 'I_EKPO' 'L'
     'Material No'(005) 'X' 'X' ' ' ' ',
     '01' '03' 'MATNR1' 'I_EKPO' 'L'
     'Material No'(005) ' ' ' ' ' ' ' ',
     '01' '04' 'WERKS' 'I_EKPO' 'L'
     'Plant'(006) 'X' 'X' ' ' ' ',
     '01' '04' 'WERKS1' 'I_EKPO' 'L'
     'Plant'(006) ' ' ' ' ' ' ' ',
     '01' '05' 'NTGEW' 'I_EKPO' 'R'
     'Net Weight'(007) ' ' ' ' 'GEWE' 'I_EKPO'.
ENDFORM.                    " sub_field_catalog
*&     Form sub_fill_alv_field_catalog
*&     For building Field Catalog
*&     p_rowpos   Row position
*&     p_colpos   Col position
*&     p_fldnam   Fldname
*&     p_tabnam   Tabname
*&     p_justif   Justification
*&     p_seltext Seltext
*&     p_out      no out
*&     p_tech     Technical field
*&     p_qfield   Quantity field
*&     p_qtab     Quantity table
FORM sub_fill_alv_field_catalog USING p_rowpos    TYPE sycurow
                                        p_colpos    TYPE sycucol
                                        p_fldnam    TYPE fieldname
                                        p_tabnam    TYPE tabname
                                        p_justif    TYPE char1
                                        p_seltext   TYPE dd03p-scrtext_l
                                        p_out       TYPE char1
                                        p_tech      TYPE char1
                                        p_qfield    TYPE slis_fieldname
                                        p_qtab      TYPE slis_tabname.
* Local declaration for field catalog
DATA: wa_lfl_fcat    TYPE slis_fieldcat_alv.
wa_lfl_fcat-row_pos        = p_rowpos.     "Row
wa_lfl_fcat-col_pos        = p_colpos.     "Column
wa_lfl_fcat-fieldname      = p_fldnam.     "Field Name
wa_lfl_fcat-tabname        = p_tabnam.     "Internal Table Name
wa_lfl_fcat-just           = p_justif.     "Screen Justified
wa_lfl_fcat-seltext_l      = p_seltext.    "Field Text
wa_lfl_fcat-no_out         = p_out.        "No output
wa_lfl_fcat-tech           = p_tech.       "Technical field
wa_lfl_fcat-qfieldname     = p_qfield.     "Quantity unit
wa_lfl_fcat-qtabname       = p_qtab .      "Quantity table
IF p_fldnam = 'NTGEW'.
    wa_lfl_fcat-do_sum = 'X'.
ENDIF.
APPEND wa_lfl_fcat TO i_fieldcat.
CLEAR wa_lfl_fcat.
ENDFORM.                    " sub_fill_alv_field_catalog
*&      Form sub_populate_layout
*       Populate ALV layout
*       No Parameter
FORM sub_populate_layout .
CLEAR wa_layout.
wa_layout-colwidth_optimize = 'X'." Optimization of Col width
ENDFORM.                    " sub_populate_layout
*&      Form sub_populate_sort
*       Populate ALV sort table
*       No Parameter
FORM sub_populate_sort .
* Sort on material
wa_sort-spos = '01' .
wa_sort-fieldname = 'MATNR'.
wa_sort-tabname = 'I_EKPO'.
wa_sort-up = 'X'.
wa_sort-subtot = 'X'.
APPEND wa_sort TO i_sort .
CLEAR wa_sort.
* Sort on plant
wa_sort-spos = '02'.
wa_sort-fieldname = 'WERKS'.
wa_sort-tabname = 'I_EKPO'.
wa_sort-up = 'X'.
wa_sort-subtot = 'X'.
APPEND wa_sort TO i_sort .
CLEAR wa_sort.
ENDFORM.                    " sub_populate_sort
*&      Form sub_get_event
*       Get ALV grid event and pass the form name to subtotal_text
*       event
*       No Parameter
FORM sub_get_event .
CONSTANTS : c_formname_subtotal_text TYPE slis_formname VALUE
'SUBTOTAL_TEXT'.
DATA: l_s_event TYPE slis_alv_event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 4
    IMPORTING
      et_events       = i_event
    EXCEPTIONS
      list_type_wrong = 0
      OTHERS          = 0.
* Subtotal
READ TABLE i_event INTO l_s_event
                    WITH KEY name = slis_ev_subtotal_text.
IF sy-subrc = 0.
    MOVE c_formname_subtotal_text TO l_s_event-form.
    MODIFY i_event FROM l_s_event INDEX sy-tabix.
ENDIF.
ENDFORM.                    " sub_get_event
*&      Form sub_alv_report_display
*       For ALV Report Display
*       No Parameter
FORM sub_alv_report_display .
DATA: l_repid TYPE syrepid .
l_repid = sy-repid .
* This function module for displaying the ALV report
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program       = l_repid
      i_callback_top_of_page   = 'SUB_ALV_TOP_OF_PAGE'
      is_layout                = wa_layout
      it_fieldcat              = i_fieldcat
      it_sort = i_sort
      it_events                = i_event
      i_default                = 'X'
      i_save                   = 'A'
    TABLES
      t_outtab                 = i_ekpo
    EXCEPTIONS
      program_error            = 1
      OTHERS                   = 2.
IF sy-subrc <> 0.
*    MESSAGE i000 WITH 'Error in ALV report display'(055).
ENDIF.
ENDFORM.                    " sub_alv_report_display
*       FORM sub_alv_top_of_page
*       Call ALV top of page
*       No parameter
FORM sub_alv_top_of_page.                                   "#EC CALLED
* To write header for the ALV
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = i_alv_top_of_page.
ENDFORM.                    "alv_top_of_page
*&      Form subtotal_text
*       Build subtotal text
*       P_total Total
*       p_subtot_text Subtotal text info
FORM subtotal_text CHANGING
               p_total TYPE any
               p_subtot_text TYPE slis_subtot_text.
* Material level sub total
IF p_subtot_text-criteria = 'MATNR'.
    p_subtot_text-display_text_for_subtotal
    = 'Material level total'(009).
ENDIF.
* Plant level sub total
IF p_subtot_text-criteria = 'WERKS'.
    p_subtot_text-display_text_for_subtotal = 'Plant level total'(010).
ENDIF.
ENDFORM.                    "subtotal_text
Edited by: Joyjit Ghosh on Aug 21, 2008 5:25 PM

Changing totals value in hierarchical alv for a particular level/row

Hi,
I am displaying a hierarchical ALV having 4 levels.
Using field catalog, totals for all dynamic columns are found out.
I have a requirement not to display totals value for first and second levels.
And if possible, to display another value.
Tried using CL_GUI_ALV_TREE->change_node.
But it not updating.
Please suggest a solution.
Thanks,
Nisha Vengal.

Hi Ten Mariga,
I wonder why the second select Query is needed at all instead you can use
---> Not Needed
FORM DATA_RETRIEVAL1.
SELECT * FROM zcontact INTO TABLE it_zcontact WHERE id EQ wa_zcontact-id.
ENDFORM.
----> Instead you can do
READ TABLE it_zcontact INTO wa_zcontact INDEX p_seltab-tabindex.
Append wa_zcontact to Second_table.
And you can use the Second_table to display the second ALV. The second Select Query will affect the performance too.
Cheers,
Krishnakumar B.

I need the grand total for particular coulumn for ALV grid report(OOPs).

Hello,
I have used the following code,
But i m not getting the grand total by default.No error but not getting the desired result.
Could you please help me in this regard.
FORM display_simple_alv.
DATA : lr_msg TYPE   REF   TO cx_salv_msg.
DATA : lv_header   TYPE   REF   TO cl_salv_form_layout_grid,
         lv_h_label TYPE   REF   TO cl_salv_form_label,
         lv_h_flow   TYPE   REF   TO cl_salv_form_layout_flow.
DATA: gr_sorts TYPE REF TO cl_salv_sorts.
DATA: gr_agg TYPE REF TO cl_salv_aggregations.
TRY .
      cl_salv_table=>factory( IMPORTING r_salv_table = gr_salv_table
                               CHANGING t_table = gt_invdetails4 ).
    CATCH cx_salv_msg INTO lr_msg.
ENDTRY .
Display Basic Toolbar
gr_functions = gr_salv_table->get_functions( ).
gr_functions->set_all( abap_true ).
TRY .
      gr_columns = gr_salv_table->get_columns( ).
      gr_columns->set_optimize( ).
    CATCH cx_salv_not_found.
ENDTRY .
TRY .
      gr_column ?= gr_columns->get_column( 'KUNNR' ).
      gr_column->set_long_text( text-009 ).
      gr_column->set_medium_text( text-009 ).
      gr_column->set_short_text( text-009 ).
      gr_column ?= gr_columns->get_column( 'NAME1' ).
      gr_column->set_long_text( text-010 ).
      gr_column->set_medium_text( text-010 ).
      gr_column->set_short_text( text-011 ).
      gr_column ?= gr_columns->get_column( 'AMOUNT' ).
      gr_column->set_long_text( text-012 ).
      gr_column->set_medium_text( text-012 ).
      gr_column->set_short_text( text-012 ).
      gr_column ?= gr_columns->get_column( 'TAX' ).
      gr_column->set_long_text( text-013 ).
      gr_column->set_medium_text( text-013 ).
      gr_column->set_short_text( text-013 ).
      gr_column ?= gr_columns->get_column( 'IVA' ).
      gr_column->set_long_text( text-014 ).
      gr_column->set_medium_text( text-014 ).
      gr_column->set_short_text( text-015 ).
      gr_column ?= gr_columns->get_column( 'TOTAL_AMOUNT' ).
      gr_column->set_long_text( text-016 ).
      gr_column->set_medium_text( text-016 ).
      gr_column->set_short_text( text-017 ).
      gr_column ?= gr_columns->get_column( 'CURRENCY' ).
      gr_column->set_long_text( text-018 ).
      gr_column->set_medium_text( text-018 ).
      gr_column->set_short_text( text-018 ).
      gr_column ?= gr_columns->get_column( 'ZINTERNAL_REFNO' ).
      gr_column->set_long_text( text-019 ).
      gr_column->set_medium_text( text-019 ).
      gr_column->set_short_text( text-019 ).
      gr_column ?= gr_columns->get_column( 'MATERIAL_AMOUNT' ).
      gr_column->set_long_text( text-020 ).
      gr_column->set_medium_text( text-020 ).
      gr_column->set_short_text( text-021 ).
      gr_column ?= gr_columns->get_column( 'LABOUR_VALUE' ).
      gr_column->set_long_text( text-022 ).
      gr_column->set_medium_text( text-022 ).
      gr_column->set_short_text( text-023 ).
      gr_column ?= gr_columns->get_column( 'FAILURE_COST' ).
      gr_column->set_long_text( text-024 ).
      gr_column->set_medium_text( text-024 ).
      gr_column->set_short_text( text-021 ).
      gr_sorts = gr_salv_table->get_sorts( ).
      gr_sorts->add_sort( columnname = 'AMOUNT' subtotal = abap_true ). "for subtotal
      gr_agg = gr_salv_table->get_aggregations( ).
      gr_agg->add_aggregation( 'AMOUNT' ).
    CATCH cx_salv_not_found cx_salv_data_error cx_salv_existing.
ENDTRY .
Set top of page
CREATE OBJECT lv_header.
lv_h_label = lv_header->create_label( row = 1 column = 1 ).
lv_h_label->set_text( text-001 ).
lv_h_label = lv_header->create_label( row = 1 column = 5 ).
lv_h_label->set_text( text-002 ).
lv_h_label = lv_header->create_label( row = 1 column = 14 ).
lv_h_label->set_text( text-003 ).
lv_h_flow = lv_header->create_flow( row = 3 column = 04 ).
lv_h_flow->create_text( text = text-004 ).
lv_h_flow = lv_header->create_flow( row = 3 column = 05 ).
lv_h_flow->create_text( text = text-005 ).
lv_h_flow = lv_header->create_flow( row = 3 column = 06 ).
lv_h_flow->create_text( text = name ).
set the top of list using the header for Online.
gr_salv_table->set_top_of_list( lv_header ).
ALV Display
gr_salv_table->display( ).
ENDFORM .                     " DISPLAY_SIMPLE_ALV

Hi Sridevi,
To get the grand total, you need to pass the SORT itab to the function module. You need to populate the internal table with the fields on which you want the total or subtotal. If you donu2019t pass this table, you wonu2019t get it.
For ex:
   ls_sort_wa-spos = 1.
ls_sort_wa-fieldname = gs_plant-werks.
ls_sort_wa-up = 'X'.
ls_sort_wa-subtot = 'X'.
APPEND ls_sort_wa TO gt_sort.
So the above code, gives the sub total plant wise.
and if you want the sum(grand total) you can set the DO_SUM to u2018Xu2019 for that particular field in the field catalog.
So with this approach, you can get the sub total and grand total for a particular field.
If you donu2019t want the subtotal, just set DO_SUM, you will get the total.
Thanks,
Srini.

Add another column under sub total column in alv

hi guys,
is there any way i can add a new column under sub total column in alv function and have my own calculation for it

Hi Radha,
I doubt if that can be changed....because the event that i was referring to in my previous post works with ALV List display...But in any case you can try that.....
There is an event in SLIS....(As i told you, i dont remember the name and currently i dont have access to SAP system, so i am not able to verify and let you know that event name).....
Other thatn TOP and END of PAGE events, there is an event for sub-total text......i think it would start with "SUBTOTAL"...
you need to use that event in your events table and pass it to ALV Grid display.
Then create a sub-routine with that name (As you do for TOP-OF-PAGE event)....and in this event you can change the values in runtime (PROVIDED, this event gets triggered for ALV GRID).....
If this does not work, i think calculating sub-totals while you build the internal table would be a better option....(If you have time constraint....else you can do some more research on the same)........
Best Regards,
Ram.

Webdynpro ABAP - ALV how can i display Total of Column

Hi friends,
Webdynpro ABAP - ALV how can i display Total of Columns.
Please tell me any metod is there or any solution.
Thanks,
Kumar.

Hi
You can take help of following code snippet to create totals for a particular column
Data: lr_function_settings TYPE REF TO CL_SALV_WD_CONFIG_TABLE.
DATA: lr_column_settings TYPE REF TO if_salv_wd_column_settings,
        lr_column          TYPE REF TO cl_salv_wd_column,
        lt_column type salv_wd_t_column_ref,
        ls_column type salv_wd_s_column_ref.
Data: lr_field_amnt type REF TO CL_SALV_WD_FIELD.
* get reference of ALV component
lr_salv_wd_table = wd_this->wd_cpifc_OVERVIEW_EARNED_ALV( ).
wd_this->alv_config_table = lr_salv_wd_table->get_model( ).
* get function settings
lr_function_settings ?= wd_this->alv_config_table.
* display columns in correct order
lr_column_settings ?= wd_this->alv_config_table.
lt_column = lr_column_settings->get_columns( ).
loop at lt_column into ls_column.
CASE ls_column-id.
when 'AMOUNT'
* aggregate field
        CALL METHOD LR_FUNCTION_SETTINGS->IF_SALV_WD_FIELD_SETTINGS~GET_FIELD
          EXPORTING
            FIELDNAME = 'AMOUNT'
          RECEIVING
            VALUE     = lr_field_amnt.
* create aggregate rule as total
        CALL METHOD LR_FIELD_AMNT->IF_SALV_WD_AGGR~CREATE_AGGR_RULE
          EXPORTING
            AGGREGATION_TYPE = IF_SALV_WD_C_AGGREGATION=>AGGRTYPE_TOTAL
          RECEIVING
            VALUE            = lv_aggr_rule.
endcase.
Regards
Manas DUa

Total for a Numeric field in ALV Grid display

Hi all,
I am not getting the Total for a Numeric field in ALV Grid output. What might be the problem.
Regards,
Balavardhan.K

Check this code for subtotals and totals..
REPORT ZYFI_REPT007
       NO STANDARD PAGE HEADING
       LINE-SIZE 300
       LINE-COUNT 50
       MESSAGE-ID ZYFI.
TABLES : COOI, " Commitments Management: Line Items
         LFA1,                         " Vendor master (general section)
         VBEP,
         RKPLN.
      TABLE TYPES AND INTERNAL TABLES                                *
DATA : BEGIN OF TYP_COOI ,
       OBJNR LIKE COOI-OBJNR,
       SAKTO LIKE COOI-SAKTO,
       MEGBTR LIKE COOI-MEGBTR,
       MEINH LIKE COOI-MEINH,
       WKGBTR LIKE COOI-WKGBTR,
       REFBN LIKE COOI-REFBN,
       RFPOS LIKE COOI-RFPOS,
       SGTXT LIKE COOI-SGTXT,
       BUDAT LIKE COOI-BUDAT,
       LIFNR LIKE COOI-LIFNR,
       END OF TYP_COOI.
DATA : BEGIN OF TYP_LFA1 ,
        LIFNR LIKE LFA1-LIFNR,
        NAME1 LIKE LFA1-NAME1,
       END OF TYP_LFA1.
DATA : BEGIN OF IT_OUTTAB OCCURS 0,
         OBJNR LIKE COOI-OBJNR,
         SAKTO LIKE COOI-SAKTO,
         MEGBTR LIKE COOI-MEGBTR,
         MEINH LIKE COOI-MEINH,
         WKGBTR LIKE COOI-WKGBTR,
         REFBN LIKE COOI-REFBN,
         RFPOS LIKE COOI-RFPOS,
         SGTXT LIKE COOI-SGTXT,
         BUDAT LIKE COOI-BUDAT,
         LIFNR LIKE COOI-LIFNR,
         NAME1 LIKE LFA1-NAME1,
       END OF IT_OUTTAB.
DATA : IT_COOI LIKE TYP_COOI OCCURS 0 WITH HEADER LINE,
       IT_LFA1 LIKE TYP_LFA1 OCCURS 0 WITH HEADER LINE.
*-- ALV Declarations
TYPE-POOLS SLIS.
DATA: IT_EVENTS            TYPE SLIS_T_EVENT,
      GS_EVENT             TYPE SLIS_ALV_EVENT,
      wa_fldcat            type slis_fieldcat_alv.
DATA: S_LAYOUT TYPE SLIS_LAYOUT_ALV,
      GT_PRINT TYPE SLIS_PRINT_ALV.
DATA: IT_FLDCAT       TYPE SLIS_T_FIELDCAT_ALV.
DATA: IT_SORT             TYPE SLIS_T_SORTINFO_ALV.
DATA: V_REPID LIKE SY-REPID.
                    SELECTION SCREEN                                 *
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_KOKRS FOR COOI-KOKRS NO-EXTENSION NO INTERVALS,
                                       " Controlling Area
                 S_BUKRS FOR COOI-BUKRS NO-EXTENSION NO INTERVALS,
                                       " Company code
                 S_GJAHR FOR COOI-GJAHR NO-EXTENSION NO INTERVALS,
                                       " Fiscal Year
                 S_OBJNR FOR RKPLN-AUFNR MATCHCODE OBJECT ORDE,
                                                        " Internal order
                 S_SAKTO FOR COOI-SAKTO MATCHCODE OBJECT KART,
                                                          " Cost Element
                 S_BUDAT FOR COOI-BUDAT, " Debit Date
                 S_LIFNR FOR COOI-LIFNR. " Vendor
SELECTION-SCREEN END OF BLOCK B1.
       S T A R T   O F   S E L E C T I O N                           *
START-OF-SELECTION.
*-- Read data
PERFORM GET_DATA.
       E N D   O F   S E L E C T I O N                               *
END-OF-SELECTION.
*-- Process the data and prepare the output data
PERFORM CALCULATE_FINAL_INFO.
*--Display Report output
PERFORM DISPLAY_REPORT.
      FORM CALCULATE_FINAL_INFO                                     *
    Process the data and prepare final internal table               *
FORM CALCULATE_FINAL_INFO.
DATA : L_OBJNR LIKE COOI-OBJNR.
SORT IT_LFA1 BY LIFNR.
DELETE ADJACENT DUPLICATES FROM IT_LFA1 COMPARING LIFNR.
LOOP AT IT_COOI.
    L_OBJNR = IT_COOI-OBJNR+2(20).
    SHIFT L_OBJNR LEFT DELETING LEADING '0'.
    IF L_OBJNR IN S_OBJNR.
      READ TABLE IT_LFA1 WITH KEY LIFNR = IT_COOI-LIFNR.
      IF SY-SUBRC EQ 0.
        IT_OUTTAB-NAME1 = IT_LFA1-NAME1.
      ENDIF.
      MOVE-CORRESPONDING IT_COOI TO IT_OUTTAB.
      CLEAR IT_OUTTAB-OBJNR.
      IT_OUTTAB-OBJNR = L_OBJNR.
      APPEND IT_OUTTAB.
      CLEAR IT_OUTTAB.
      CLEAR IT_LFA1.
      CLEAR L_OBJNR.
    ENDIF.
ENDLOOP.
ENDFORM.
*&      Form GET_DATA
     Fetch the Data from the table COOI and LFA1
FORM GET_DATA.
SELECT OBJNR
        SAKTO
        MEGBTR
        MEINH
        WKGBTR
        REFBN
        RFPOS
        SGTXT
        BUDAT
        LIFNR
        FROM COOI
        INTO TABLE IT_COOI
        WHERE   BUDAT IN S_BUDAT
        AND LIFNR IN S_LIFNR
        AND KOKRS IN S_KOKRS
        AND BUKRS IN S_BUKRS
        AND GJAHR IN S_GJAHR
        AND SAKTO IN S_SAKTO.
IF SY-SUBRC EQ 0 .
Get the Vendor name from LFA1
    SELECT LIFNR
           NAME1
           FROM LFA1
           INTO TABLE IT_LFA1
           FOR ALL ENTRIES IN IT_COOI
           WHERE LIFNR EQ IT_COOI-LIFNR.
ELSE.
    MESSAGE I999 WITH TEXT-013.
ENDIF.
ENDFORM.                               " GET_DATA
*&      Form DISPLAY_REPORT
       Display the output
FORM DISPLAY_REPORT.
PERFORM BUILD_CATALOG.
PERFORM FRM_PREPARE_EVENT_LIST TABLES IT_EVENTS.
IF NOT IT_OUTTAB[] IS INITIAL.
    CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
         EXPORTING
              I_CALLBACK_PROGRAM      = V_REPID
              I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
              IT_FIELDCAT             = IT_FLDCAT
              IT_SORT                 = IT_SORT
              IT_EVENTS               = IT_EVENTS
         TABLES
              T_OUTTAB                = IT_OUTTAB
         EXCEPTIONS
              PROGRAM_ERROR           = 1
              OTHERS                  = 2.
ELSE.
    MESSAGE I999 WITH TEXT-013.
ENDIF.
ENDFORM.                               " DISPLAY_REPORT
*&      Form BUILD_CATALOG
      Build the Field catalog for the ALV Report
FORM BUILD_CATALOG.
DATA: V_INDEX LIKE SY-TABIX.
V_REPID = SY-REPID.
DATA: LS_SORT TYPE SLIS_SORTINFO_ALV.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
       EXPORTING
            I_PROGRAM_NAME         = V_REPID
            I_INTERNAL_TABNAME     = 'IT_OUTTAB'
            I_INCLNAME             = V_REPID
       CHANGING
            CT_FIELDCAT            = IT_FLDCAT
       EXCEPTIONS
            INCONSISTENT_INTERFACE = 1
            PROGRAM_ERROR          = 2
            OTHERS                 = 3.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
READ TABLE IT_FLDCAT WITH KEY FIELDNAME = 'WKGBTR'
                         TABNAME = 'IT_OUTTAB' INTO WA_FLDCAT.
IF SY-SUBRC EQ 0.
    WA_FLDCAT-DO_SUM = 'X'.
    MODIFY IT_FLDCAT FROM WA_FLDCAT INDEX SY-TABIX.
ENDIF.
READ TABLE IT_FLDCAT WITH KEY FIELDNAME = 'OBJNR'
                            TABNAME = 'IT_OUTTAB' INTO WA_FLDCAT.
IF SY-SUBRC EQ 0.
     WA_FLDCAT-SELTEXT_L = 'Order'.
     WA_FLDCAT-COL_POS = 1.
     WA_FLDCAT-DDICTXT = 'L'.
    MODIFY IT_FLDCAT FROM WA_FLDCAT INDEX SY-TABIX.
ENDIF.
LS_SORT-FIELDNAME = 'OBJNR'.
LS_SORT-SPOS      = 1.
LS_SORT-UP        = 'X'.
LS_SORT-SUBTOT    = 'X'.
APPEND LS_SORT TO IT_SORT.
ENDFORM.                               " BUILD_CATALOG
*&      Form FRM_PREPARE_EVENT_LIST
      Build the Events
FORM FRM_PREPARE_EVENT_LIST TABLES IT_EVENTS TYPE SLIS_T_EVENT.
CLEAR GS_EVENT.
GS_EVENT-NAME = SLIS_EV_TOP_OF_PAGE.
GS_EVENT-FORM = 'TOP_OF_PAGE_REPORT'.
APPEND GS_EVENT TO IT_EVENTS.
ENDFORM.                               " FRM_PREPARE_EVENT_LIST
     TOP OF PAGE
FORM TOP_OF_PAGE_REPORT.
CALL FUNCTION 'Z_YREPORT_HEADER'
       EXPORTING
            DL_TITLE = SY-TITLE
            DL_REPID = SY-CPROG
            DL_LINSZ = SY-LINSZ
       EXCEPTIONS
            OTHERS   = 1.
ENDFORM.                               " FRM_TOP_OF_PAGE_REPORT
*&      Form USER_COMMAND
Drill Down Functionality to Call the Transaction ME23
FORM USER_COMMAND USING    P_UCOMM    LIKE SY-UCOMM
                           P_SELFIELD TYPE SLIS_SELFIELD.
DATA : L_INDEX LIKE SY-INDEX,
         L_REFBN LIKE COOI-REFBN.
L_INDEX = P_SELFIELD-TABINDEX.       " holds the selected table index
CLEAR L_REFBN.
CASE P_UCOMM.
*-- On Double Click
    WHEN '&IC1'.
      CLEAR L_REFBN.
*-- Read the Current Line
      READ TABLE IT_OUTTAB INDEX L_INDEX.
      IF SY-SUBRC EQ 0.
        L_REFBN = IT_OUTTAB-REFBN.
        IF NOT L_REFBN IS INITIAL.
*-- Set the BES Paramater Id to the Current line Purchase Order Number
          SET PARAMETER ID 'BES' FIELD L_REFBN.
*-- Call the Transaction Purchase Order Display with the above PO Number
          CALL TRANSACTION 'ME23' AND SKIP FIRST SCREEN.
        ENDIF.
      ELSE.
        MESSAGE E999 WITH TEXT-014.
      ENDIF.
ENDCASE.
ENDFORM.                               " USER_COMMAND

Total for columns in ALV OO

Similar Messages

Maybe you are looking for