Regarding subtotal text and total text

Hi All,
can any body provide example program for ALV total text and subtotal text both using REUSE_ALV_GRID_DISPALY.  and
using OOPS.
@@@MODERATOR::    Please dont lock my threads.I have been searching since 2 days for this example and i tried with the provided examples .but they are not worked out ::
FOr your information :
Some of the links i searched in SDN: 
http://wiki.sdn.sap.com/wiki/display/ABAP/ALVDisplayTotalTextOrSubtotalText
Re: SubTotal Text in ALV?
http://wiki.sdn.sap.com/wiki/display/ABAP/ALVStandardSumTotalOr+Subtotal

Hi Naveen,
If you are looking for specific Subtotal text in ALV Grid, then i think it is not possible.
You can use SORT table to get sub-totals based on the columns that you display.
Generally the record existing on the column based on which you sort the table, appears as the sub-total text automatically.....
You can try giving Subtotal text in the LAYOUT as well and pass the layout to the ALV function module.
Best Regards,
Ram.

Similar Messages

  • Regarding Subtotal Text Printing in ALV

    Dear all,
    I want to print some text in subtotaling.But i am not getting it..I am doing like below.
    My FORM SUBTOTAL_TEXT  does not get hit al all.
    Plz let me know where I am going wrong
    *&      Form  GET_EVENTS
          text
    -->  p1        text
    <--  p2        text
    FORM GET_EVENTS .
      CONSTANTS : C_FORNAME_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       = IT_EVENT
        EXCEPTIONS
          list_type_wrong = 0
          OTHERS          = 0.
    Subtotal
      READ TABLE IT_EVENT INTO L_S_EVENT WITH KEY NAME = SLIS_EV_SUBTOTAL_TEXT.
      IF sy-subrc = 0.
        MOVE C_FORNAME_SUBTOTAL_TEXT TO L_S_EVENT-FORM.
        MODIFY IT_EVENT FROM L_S_EVENT INDEX SY-TABIX..
      ENDIF.
    ENDFORM.                    " GET_EVENTS
    *&      Form  DATA_DISPLAY
          Text-ALV Grid Display through FM REUSE_ALV_GRID_DISPLAY
    FORM DATA_DISPLAY .
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
       I_INTERFACE_CHECK                 = ' '
       I_BYPASSING_BUFFER                = ' '
       I_BUFFER_ACTIVE                   = ' '
         I_CALLBACK_PROGRAM                = 'ZCOMPLIANCE_WEEK'
       I_CALLBACK_PF_STATUS_SET          = ' '
         I_CALLBACK_USER_COMMAND           = 'USER_COMMAND'
         I_CALLBACK_TOP_OF_PAGE            = 'TOP_OF_PAGE'
       I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
       I_CALLBACK_HTML_END_OF_LIST       = ' '
       I_STRUCTURE_NAME                  =
       I_BACKGROUND_ID                   = ' '
       I_GRID_TITLE                      =
       I_GRID_SETTINGS                   =
        IS_LAYOUT                         = I_LAYOUT
         IT_FIELDCAT                       = FIELDCAT[]
       IT_EXCLUDING                      =
       IT_SPECIAL_GROUPS                 =
         IT_SORT                           = IT_SORTCAT
       IT_FILTER                         =
       IS_SEL_HIDE                       =
        I_DEFAULT                        = 'X'
       I_SAVE                            = ' '
       IS_VARIANT                        =
         IT_EVENTS                         = IT_EVENT
       IT_EVENT_EXIT                     =
       IS_PRINT                          =
       IS_REPREP_ID                      =
       I_SCREEN_START_COLUMN             = 0
       I_SCREEN_START_LINE               = 0
       I_SCREEN_END_COLUMN               = 0
       I_SCREEN_END_LINE                 = 0
       I_HTML_HEIGHT_TOP                 = 0
       I_HTML_HEIGHT_END                 = 0
       IT_ALV_GRAPHICS                   =
       IT_HYPERLINK                      =
       IT_ADD_FIELDCAT                   =
       IT_EXCEPT_QINFO                   =
       IR_SALV_FULLSCREEN_ADAPTER        =
    IMPORTING
       E_EXIT_CAUSED_BY_CALLER           =
       ES_EXIT_CAUSED_BY_USER            =
       TABLES
         T_OUTTAB                          = IT_DISPLAY.
    EXCEPTIONS
       PROGRAM_ERROR                     = 1
       OTHERS                            = 2
    IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    ENDFORM.                    " DATA_DISPLAY
    *&      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
        P_SUBTOT_TEXT-DISPLAY_TEXT_FOR_SUBTOTAL
        = 'Material level total'(009).
    ENDFORM.                    "SUBTOTAL_TEXT

    just check this sample code observe the comments
    REPORT ZTEST_ALV_TEXT .
    type-pools : slis.
    types : begin of itab_t,
    ebeln like ekpo-ebeln,
    lifnr like ekko-lifnr,
    ekorg like ekko-ekorg,
    ekgrp like ekko-ekgrp,
    werks like ekpo-werks,
    ebelp like ekpo-ebelp,
    matnr like ekpo-matnr,
    menge like ekpo-menge,
    netpr like ekpo-netpr,
    d, "Dummy field to fire the Subtotal text event
    end of itab_t.
    data: itab type table of itab_t.
    data: tab type itab_t.
    data : itab1 like eket occurs 0 with header line.
    data: t_fcat type slis_t_fieldcat_alv,
    it_sort type slis_t_sortinfo_alv,
    t_events type slis_t_event,
    listhead type slis_t_listheader,
    ls_layout type slis_layout_alv.
    start-of-selection.
    select a~ebeln
    a~lifnr
    a~ekorg
    a~ekgrp
    b~werks
    b~ebelp
    b~matnr
    b~menge
    b~netpr
    up to 100 rows
    into corresponding fields of table itab
    from ekko as a inner join ekpo as b
    on a~ebeln = b~ebeln.
    end-of-selection.
    perform fill_fcat using t_fcat.
    perform fill_event using t_events.
    perform fill_layout.
    perform display.
    form fill_fcat using p_t_fcat type slis_t_fieldcat_alv.
    data : lfcat type slis_fieldcat_alv,
    colpos type i value '0'.
    data : ls_sort type slis_sortinfo_alv.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'EBELN'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'EBELN'.
    lfcat-ref_tabname = 'EKKO'.
    lfcat-hotspot = 'X'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'LIFNR'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'LIFNR'.
    lfcat-ref_tabname = 'EKKO'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'EKORG'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'EKORG'.
    lfcat-ref_tabname = 'EKKO'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'EKGRP'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'EKGRP'.
    lfcat-ref_tabname = 'EKKO'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'WERKS'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'WERKS'.
    lfcat-ref_tabname = 'EKPO'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'EBELP'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'EBELP'.
    lfcat-ref_tabname = 'EKPO'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'MATNR'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'MATNR'.
    lfcat-ref_tabname = 'EKPO'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'MENGE'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'MENGE'.
    lfcat-ref_tabname = 'EKPO'.
    lfcat-do_sum = 'X'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'NETPR'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'NETPR'.
    lfcat-ref_tabname = 'EKPO'.
    lfcat-do_sum = 'X'.
    append lfcat to p_t_fcat.
    clear lfcat.
    colpos = colpos + 1.
    lfcat-col_pos = colpos.
    lfcat-fieldname = 'D'.
    lfcat-tabname = 'ITAB'.
    lfcat-ref_fieldname = 'EBELN'.
    lfcat-ref_tabname = 'EKKO'.
    lfcat-no_out = 'X'.
    append lfcat to p_t_fcat.
    clear lfcat.
    ls_sort-spos = 1.
    ls_sort-fieldname = 'EBELN'.
    ls_sort-tabname = 'ITAB'.
    ls_sort-up = 'X'.
    ls_sort-group = 'UL'.
    append ls_sort to it_sort.
    clear ls_sort.
    ls_sort-spos = 2.
    ls_sort-fieldname = 'D'.
    ls_sort-tabname = 'ITAB'.
    ls_sort-up = 'X'.
    ls_sort-group = 'UL'.
    ls_sort-subtot = 'X'.
    append ls_sort to it_sort.
    endform. " fill_fcat
    form fill_event using p_t_events type slis_t_event.
    data : ls_event type slis_alv_event.
    call function 'REUSE_ALV_EVENTS_GET'
    exporting
    i_list_type = 0
    importing
    et_events = p_t_events
    EXCEPTIONS
    LIST_TYPE_WRONG = 1
    OTHERS = 2
    if sy-subrc ne 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    endif.
    read table p_t_events with key name = slis_ev_top_of_page
    into ls_event.
    if sy-subrc = 0.
    move 'TOP_OF_PAGE' to ls_event-form.
    append ls_event to p_t_events.
    endif.
    read table p_t_events with key name = SLIS_EV_SUBTOTAL_TEXT
    into ls_event.
    if sy-subrc = 0.
    move 'SUBTOTAL' to ls_event-form.
    append ls_event to p_t_events.
    endif.
    endform. " FILL_EVENT
    FORM SUBTOTAL USING I_LISTHEAD STRUCTURE tab
    I_SUBTOTAL TYPE SLIS_SUBTOT_TEXT.
    *criteria type slis_fieldname,
    keyword like dd03p-reptext,
    criteria_text(255) type c,
    max_len like dd03p-outputlen,
    display_text_for_subtotal(255) type c,
    if I_SUBTOTAL-criteria = 'D'.
    I_SUBTOTAL-display_text_for_subtotal = 'Sub total'.
    endif.
    ENDFORM.
    form top_of_page.
    data : s_listhead type slis_listheader.
    clear s_listhead.
    s_listhead-typ = 'H'.
    s_listhead-info = 'SIMPLE REPORT'.
    append s_listhead to listhead.
    s_listhead-typ = 'S'.
    s_listhead-key = 'EBELN'.
    s_listhead-info = 'ALV'.
    append s_listhead to listhead.
    call function 'REUSE_ALV_COMMENTARY_WRITE'
    exporting
    it_list_commentary = listhead
    i_logo = 'ENJOYSAP_LOGO'
    I_END_OF_LIST_GRID =
    endform. "TOP_OF_PAGE
    form fill_layout .
    ls_layout-zebra = 'X'.
    ls_layout-detail_popup = 'X'.
    ls_layout-key_hotspot = 'X'.
    ls_layout-window_titlebar = 'Test Title'.
    ls_layout-totals_text = 'GRAND TOTAL'.
    ls_layout-subtotals_text = 'SUB'.
    endform. " fill_layout
    form display .
    call function 'REUSE_ALV_LIST_DISPLAY'
    exporting
    i_callback_program = sy-repid
    it_sort = it_sort[]
    it_events = t_events
    tables
    t_outtab = itab
    EXCEPTIONS
    PROGRAM_ERROR = 1
    OTHERS = 2
    if sy-subrc ne 0.
    MESSAGE ID SY-MSGI D TYPE SY-MSGTY NUMBER SY-MSGNO
    WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    endif.
    endform. " display

  • Regarding subtotal text in Alv

    Hi,
         Can you please let me know how to achieve subtotal text for classical ALV reports.
    Regards,
    MNR.

    Hi,
    pl check this link
    http://wiki.sdn.sap.com/wiki/display/Snippets/DisplaysubtotaltextinALV+report
    Regards,
    Booma

  • How to get subtotal and total per project in PS Module  cl_gui_alv_grid

    Hi all,
    i have a requirement of getting Subtotals and totals of few column in the alv grid. as i have already used cl_gui_alv_grid class to display the grid , so what excatly i have to follow to get the values.
    i have tried with :
    wa_sort    TYPE lvc_s_sort
        wa_sort-spos = '1'.
        wa_sort-fieldname = 'POST1'.
        wa_sort-up = 'X'.
        wa_sort-subtot  = 'X'.
        APPEND wa_sort TO t_sort.
        CLEAR: wa_sort.
    And in fieldcat have passed X to do_sum field.
    and
          CALL METHOD grid1->set_table_for_first_display
         EXPORTING
               is_variant                    = w_variant
               i_save                        = 'A'
               is_layout                     = t_layout
               it_toolbar_excluding          = t_toolbar_excluding
         CHANGING
            it_outtab                        = it_final_1[]
            it_fieldcatalog                  = t_fieldcat
            it_sort                          = t_sort
         EXCEPTIONS
           invalid_parameter_combination     = 1
           program_error                     = 2
           too_many_lines                    = 3
           OTHERS  
    But i coudnt see any subtotal column and total column in the grid.
    please help

    But i coudnt see any subtotal column and total column in the grid.
    please help
    you did every thing correct.
    but if you want the subtotals you have to do one more thing.
    that is you need to mention the do_sum = 'X'. for the columns which you want to see the subtotals(quantities, currency etcc) in the fieldcatalog.

  • How to show underline and overline for subtotal and total row in Cross tab

    Hi,
    I am developing cross tab report where i need to show undeline and overline in data for subtotal row and total row so as to distuingish normal rows from subtotal and total row.
    Thanks,
    Mahesh

    Hi BIPuser,
    i looked at the updated template, we need undeline on the data corresponding to subtotal row for ex. row 2.
    We have xml tag in xml data UNDERLINE_AFTER='Y' and UNDERLINE_BEFORE='Y' then we need to show underline and overline on data i.e on 121,122,123,221,222,223 ,not on ROW2.
    value1 value2
    row1 200 300
    row2 400 700
    we need underline and oveline on data 400 and 700 since it is subtotal data based on condition UNDERLINE_AFTER='Y' and UNDERLINE_BEFORE='Y'.
    Hope you understand.
    Please help!!!!!!
    Thanks,
    Mahesh
    Edited by: user13450806 on Feb 2, 2011 12:14 AM

  • ALV Grid  Subtotal text and Total text display

    Hello ABAPGuru's
    I want to display the subtotal and Total texts. alv grid program runing on background.
    Regards
    Sweety(Sri)

    Hello Neil,
    Here I have attached my routines.anyway my confusion. I have wrote the routine subtotal_text .but i am not passing ALV GRID FM.
    *&      Form  eventtab_build
    &----       This is used to get the list of events
    ----      <--RI_EVENTS  Internal table
    FORM eventtab_build  CHANGING ri_events TYPE slis_t_event.
    Structure for event handling.
      DATA: rs_event TYPE slis_alv_event.
    Returns table of possible events for a list type.
      CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
        EXPORTING
          i_list_type = 0
        IMPORTING
          et_events   = ri_events.  " Table of events to perform
    Read the internal table with the TOP_OF_PAGE and move the
    form name to the internal table
      READ TABLE ri_events
        WITH KEY name = slis_ev_top_of_page INTO rs_event.
      IF sy-subrc = 0.
        MOVE c_formname TO rs_event-form.              " Form name
        MODIFY ri_events FROM rs_event
           INDEX sy-tabix.                  " Top of page event
      ENDIF.
      READ TABLE ri_events
         WITH KEY name = slis_ev_end_of_page INTO rs_event.
      IF sy-subrc = 0.
        MOVE c_form_eop_name TO rs_event-form.              " Form name
        MODIFY ri_events FROM rs_event
           INDEX sy-tabix.                  " Top of page event
      ENDIF.
      READ TABLE ri_events
          WITH KEY name = slis_ev_subtotal_text INTO rs_event.
      IF sy-subrc = 0.
        MOVE c_formname_subtotal_text TO rs_event-form.     " Formname
        MODIFY ri_events FROM rs_event
           INDEX sy-tabix.                  " Top of page event
      ENDIF.
    *&-- Delete all unneeded events:
    DELETE ri_events  WHERE form IS INITIAL.
    ENDFORM.                    " eventtab_build
    *&      Form  SUBTOTAL_TEXT
          text
    -->  p1        text
    <--  p2        text
    FORM SUBTOTAL_TEXT USING  ep_subtot_line     TYPE  type_data
                              e_event_data       TYPE  slis_subtot_text.
      IF NOT e_event_data-criteria IS INITIAL.
      E_EVENT_DATA-DISPLAY_TEXT_FOR_SUBTOTAL = 'Account Total'.
       ENDIF.
    ENDFORM.                    "SUBTOTAL_TEXT
    *&      Form  initialise_layout
          Initialise Layout
    FORM initialise_layout .
      i_layout-colwidth_optimize = c_x.
      i_layout-group_change_edit = c_x.
    *i_layout-subtotals_text = ' a'.
      i_layout-detail_popup   = c_x.
    i_layout-zebra          = c_x.
      i_layout-no_vline       = 'X'.
      i_layout-no_hline       = 'X'.
      i_layout-totals_text = 'Account Total'.
    ENDFORM.                    " initialise_layout
    Call the function module to display the report
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program     = v_program
          i_callback_top_of_page = 'TOP_OF_PAGE'       "Top Of Page
          is_layout              = i_layout
          it_fieldcat            = i_fieldtab
          it_sort                = i_sort
          it_events              = i_events         " Events
          is_print               = i_print
          i_default              = c_x
          i_save                 = c_save
          is_variant             = v_variant
        TABLES
          t_outtab               = i_data
        EXCEPTIONS
          program_error          = 1
          OTHERS                 = 2.
      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
    Regards
    Sweety (Sri)

  • Need to display Subtotal text and total text in ALV

    HI,
    I need help.
    I am displaying subtotal and total for cost column which is group by Project type column
    My problem is i am able to display the subtotal and total values but not able to display the 'Subtotal' and 'Total' text on that respective row.
    I have updated lvc_s_sort table as follow.
    ls_sort-spos = 1.
      ls_sort-subtot = 'X'.
      ls_sort-fieldname = 'SUBTOT'.
      ls_sort-up = 'X'.
      ls_sort-SELTEXT = 'Subtotal'.
      ls_sort-spos = 2.
      ls_sort-subtot = 'X'.
      ls_sort-fieldname = 'PRART'.
      ls_sort-GROUP = 'UL'.
      ls_sort-up = 'X'.
    Please suggest what should be done to display the text.
    Regards,
    Rachna

    You have to use the event SUBTOTAL_TEXT for the ALV.
    the field CRITERIA can be used for checking the field.
    and field CRIT_TEXT for the sub total text.
    I hope you are aware about how to implement the events in ALV using OOP.
    Hope this helps you.

  • My subtotal and total text in ALV list does not show...

    Hello Experts,
    Please see my code below on what I am doing wrong. I want to display the subtotal and total text in my ALV list.
    CLEAR gs_layout.
        gs_layout-colwidth_optimize = 'X'.
        gs_layout-zebra             = 'X'.
        gs_layout-subtotals_text    = 'Subtotal'.
        gs_layout-totals_text       = 'Total'.
    CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
          EXPORTING
    *       I_INTERFACE_CHECK                 = ' '
    *       I_BYPASSING_BUFFER                = ' '
    *       I_BUFFER_ACTIVE                   = ' '
            i_callback_program                = sy-repid
    *       I_CALLBACK_PF_STATUS_SET          = ' '
    *       I_CALLBACK_USER_COMMAND           = ' '
    *       I_CALLBACK_TOP_OF_PAGE            = ' '
    *       I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
    *       I_CALLBACK_HTML_END_OF_LIST       = ' '
    *       I_STRUCTURE_NAME                  =
    *       I_BACKGROUND_ID                   = ' '
    *       I_GRID_TITLE                      =
    *       I_GRID_SETTINGS                   =
            is_layout                         = gs_layout
            it_fieldcat                       = gt_fieldcat
    *       IT_EXCLUDING                      =
    *       IT_SPECIAL_GROUPS                 =
            it_sort                           = gt_sort
    *       IT_FILTER                         =
    *       IS_SEL_HIDE                       =
    *       I_DEFAULT                         = 'X'
    *       I_SAVE                            = ' '
    *       IS_VARIANT                        =
            it_events                         = gt_events
    *       IT_EVENT_EXIT                     =
            is_print                          = gs_print
    *       IS_REPREP_ID                      =
    *       I_SCREEN_START_COLUMN             = 0
    *       I_SCREEN_START_LINE               = 0
    *       I_SCREEN_END_COLUMN               = 0
    *       I_SCREEN_END_LINE                 = 0
    *       I_HTML_HEIGHT_TOP                 = 0
    *       I_HTML_HEIGHT_END                 = 0
    *       IT_ALV_GRAPHICS                   =
    *       IT_HYPERLINK                      =
    *       IT_ADD_FIELDCAT                   =
    *       IT_EXCEPT_QINFO                   =
    *       IR_SALV_FULLSCREEN_ADAPTER        =
    *     IMPORTING
    *       E_EXIT_CAUSED_BY_CALLER           =
    *       ES_EXIT_CAUSED_BY_USER            =
          TABLES
            t_outtab                          = lt_output_fin
         EXCEPTIONS
           program_error                     = 1
           OTHERS                            = 2.
        IF sy-subrc <> 0.
    *      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
    *              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
        ENDIF.

    Use on Thread. Don't Cross post. and Follow the Rules.

  • Passing the Total/Subtotal Text in ALV

    Hi All,
    I would like to know is there any chance with ALV to pass Total/Subtotal Text.
    PS:I'm not looking for the text ls_layout-totals_text = 'Grand Total'.
    ls_layout-subtotals_text = 'SubTotal'.
    What i'm looking for is In My below Output:
    112365               TDS Windsor Sequencing                           
    112365               TDS Windsor Sequencing                           
    112365               TDS Windsor Sequencing                           
    * Total  <Group text>  "Here My   total amount is showing                                                         
    112313               Operations and Engineering                       
    * Total   <Group text>      "Here My   total amount is showing                                                         
    112363               DCX Windsor                                      
    * Total      <Group text>            "Here My   total amount is showing                                                                               
    ** Subtotal <Group text>   "Here My  "SUB total" amount is showing of above three totals
    I've <Group text> in My Final ALV one of field, but need to show at the place of <Group text> in above output.
    PS:And For Totals/Subtotals i'm using standard function of ALV by passing IT_SORT(which is in Reuse_Alv..FM)
    Any Hints?
    Thank You,
    Cheers,
    Amit.

    Hi Amit,
      Please check this example..I used the event BEFORE_LINE_OUTPUT to populate the subtotal texts
    dynamically..Used the Field-symbols technique to populate the subtotals text...Hope this is what you
    are looking for.
    TYPE-POOLS: slis,kkblo.
    DATA: BEGIN OF wa,
            vbeln TYPE vbeln,
            posnr TYPE posnr,
            matnr TYPE matnr,
            netpr TYPE netpr,
            waerk TYPE waerk,
            text  TYPE char20,
          END OF wa.
    DATA: BEGIN OF wa_vbak,
            vbeln TYPE vbeln,
          END OF wa_vbak.
    DATA: i_event   TYPE slis_t_event,
          t_sort    TYPE slis_t_sortinfo_alv,
          s_sort    TYPE LINE OF slis_t_sortinfo_alv,
          l_s_event TYPE LINE OF slis_t_event.
    DATA: t_fieldcatalog TYPE slis_t_fieldcat_alv.
    DATA: s_layout       TYPE slis_layout_alv.
    DATA: v_repid        TYPE syrepid.
    DATA: s_fieldcatalog TYPE slis_fieldcat_alv.
    DATA: itab1          LIKE TABLE OF wa.
    DATA: itab           LIKE TABLE OF wa_vbak.
    START-OF-SELECTION.
    * Field catalog populate.
      s_fieldcatalog-col_pos = '1'.
      s_fieldcatalog-fieldname = 'VBELN'.
      s_fieldcatalog-rollname = 'VBELN'.
      s_fieldcatalog-outputlen = '12'.
      APPEND s_fieldcatalog TO t_fieldcatalog.
      CLEAR: s_fieldcatalog.
      s_fieldcatalog-col_pos = '2'.
      s_fieldcatalog-fieldname = 'POSNR'.
      s_fieldcatalog-rollname = 'POSNR'.
      APPEND s_fieldcatalog TO t_fieldcatalog.
      CLEAR: s_fieldcatalog.
      s_fieldcatalog-col_pos = '3'.
      s_fieldcatalog-fieldname = 'MATNR'.
      s_fieldcatalog-rollname = 'MATNR'.
      APPEND s_fieldcatalog TO t_fieldcatalog.
      CLEAR: s_fieldcatalog.
      s_fieldcatalog-col_pos = '4'.
      s_fieldcatalog-fieldname = 'NETPR'.
      s_fieldcatalog-ref_tabname = 'VBAP'.
      s_fieldcatalog-ref_fieldname = 'NETPR'.
      s_fieldcatalog-do_sum = 'X'.
      APPEND s_fieldcatalog TO t_fieldcatalog.
      CLEAR: s_fieldcatalog.
    * Get vbak
      SELECT vbeln UP TO 100 ROWS
      FROM
      vbak
      INTO TABLE itab.
      IF NOT itab[] IS INITIAL.
    * Get vbap
        SELECT vbeln posnr matnr netpr waerk arktx
        FROM vbap
        INTO TABLE itab1
        FOR ALL ENTRIES IN itab
        WHERE vbeln = itab-vbeln.
      ENDIF.
      v_repid = sy-repid.
    * Build sort internal table.
      s_sort-spos      = '1'.
      s_sort-fieldname = 'VBELN'.
      s_sort-tabname  = 'ITAB1'.
      s_sort-up = 'X'.
      s_sort-subtot = 'X'.
      s_sort-group = 'UL'.
      APPEND s_sort TO t_sort.
    * Get alv events.
      CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
        EXPORTING
          i_list_type     = 2
        IMPORTING
          et_events       = i_event
        EXCEPTIONS
          list_type_wrong = 0
          OTHERS          = 0.
    * Before line output.
      READ TABLE i_event  INTO l_s_event
                        WITH KEY name = 'BEFORE_LINE_OUTPUT'.
      IF sy-subrc = 0.
        MOVE 'BEFORE_LINE_OUTPUT' TO l_s_event-form.
        MODIFY i_event FROM l_s_event INDEX sy-tabix.
      ENDIF.
    * Populate dummy text.
      s_layout-subtotals_text = 'Dummy'.
    * Init
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
        EXPORTING
          i_callback_program = v_repid.
    * Append
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
        EXPORTING
          is_layout                  = s_layout
          it_fieldcat                = t_fieldcatalog
          i_tabname                  = 'ITAB1'
          it_events                  = i_event
          it_sort                    = t_sort
        TABLES
          t_outtab                   = itab1
        EXCEPTIONS
          program_error              = 1
          maximum_of_appends_reached = 2
          OTHERS                     = 3.
    * Display
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
    *&      Form  BEFORE_LINE_OUTPUT
    *       text
    *      -->GS_LINEINFO  text
    FORM before_line_output USING gs_lineinfo TYPE kkblo_lineinfo.
      FIELD-SYMBOLS: <fs_layout>  TYPE kkblo_layout.
      ASSIGN ('(SAPLKKBL)GT_STACK-IS_LAYOUT') TO <fs_layout>.
      CHECK sy-subrc = 0.
    * Check if it is subtotal line.
      CHECK gs_lineinfo-subtot = 'X'.
    * Get the text
      READ TABLE itab1 INTO wa INDEX gs_lineinfo-sumindex.
      IF sy-subrc = 0.
        <fs_layout>-subtotals_text = wa-text.
      ENDIF.
    ENDFORM.                    "BEFORE_LINE_OUTPUT
    Thanks
    Naren

  • Subtotal Text in ALV

    Hi all,
    I wanted to display subtotal and total text in the output.
    I searched in SDN and specified subtotal_text in Layout.
    But still i am not getting the subtotal Text in  output.
    Here is my code.....
    Please help me , where i did wrong?
    REPORT  YTEST_ALV.
    Tables VBAK.
    Type-pools: slis.
    INITIALIZATION.
    Types: Begin of TY_VBAK,
             vbeln type vbak-vbeln,
             ERDAT TYPE VBAK-ERDAT,
             ERNAM TYPE VBAK-ERNAM,
             NETWR TYPE VBAK-NETWR,
             WAERK TYPE VBAK-WAERK,
             VKORG TYPE VBAK-VKORG,
           End Of TY_VBAK.
    DATA: IT_VBAK TYPE STANDARD TABLE OF TY_VBAK,
          IT_FLDCAT TYPE SLIS_T_FIELDCAT_ALV,
          WA_FLDCAT LIKE LINE OF IT_FLDCAT,
          GD_LAYOUT TYPE STANDARD TABLE OF SLIS_LAYOUT_ALV WITH HEADER LINE,
    *TO DISPLAY THE LIST BY SORTING A PARTICULAR COLUMN
          it_sortcat   type slis_sortinfo_alv occurs 1,
          wa_sort like line of it_sortcat.
    START-OF-SELECTION.
    SELECT-OPTIONS : S_VBELN FOR VBAK-VBELN.
    PERFORM DATA_RETRIEVAL.
    PERFORM BUILD_FLDCAT.
    PERFORM BLD_LAYOUT.
    PERFORM BUILD_SORTCAT.
    PERFORM DISPLAY_LIST.
    PERFORM TOP_OF_PAGE.
    *&      Form  DATA_RETRIEVAL
          text
    -->  p1        text
    <--  p2        text
    form DATA_RETRIEVAL .
    SELECT vbeln
           ERDAT
           ERNAM
           NETWR
           WAERK
           VKORG
           FROM VBAK INTO TABLE IT_VBAK WHERE VBELN IN S_VBELN.
    endform.                    " DATA_RETRIEVAL
    *&      Form  BUILD_FLDCAT
          text
    -->  p1        text
    <--  p2        text
    form BUILD_FLDCAT .
    WA_FLDCAT-FIELDNAME = 'VBELN'.
    WA_FLDCAT-SELTEXT_L = 'Sales Order No'.
    *WA_FLDCAT-EMPHASIZE = 'C013'.
    WA_FLDCAT-COL_POS = 0.
    APPEND WA_FLDCAT TO IT_FLDCAT.
    WA_FLDCAT-FIELDNAME = 'ERDAT'.
    WA_FLDCAT-SELTEXT_L = 'Date'.
    WA_FLDCAT-COL_POS = 1.
    APPEND WA_FLDCAT TO IT_FLDCAT.
    WA_FLDCAT-FIELDNAME = 'ERNAM'.
    WA_FLDCAT-SELTEXT_L = 'UserName'.
    WA_FLDCAT-COL_POS = 2.
    APPEND WA_FLDCAT TO IT_FLDCAT.
    WA_FLDCAT-FIELDNAME = 'NETWR'.
    WA_FLDCAT-SELTEXT_L = 'Amount'.
    WA_FLDCAT-COL_POS = 3.
    WA_FLDCAT-DO_SUM = 'X'.
    APPEND WA_FLDCAT TO IT_FLDCAT.
    WA_FLDCAT-FIELDNAME = 'WAERK'.
    WA_FLDCAT-SELTEXT_L = 'Currency'.
    WA_FLDCAT-COL_POS = 4.
    APPEND WA_FLDCAT TO IT_FLDCAT.
    WA_FLDCAT-FIELDNAME = 'VKORG'.
    WA_FLDCAT-SELTEXT_L = 'Sales Organisation'.
    WA_FLDCAT-COL_POS = 5.
    APPEND WA_FLDCAT TO IT_FLDCAT.
    endform.                    " BUILD_FLDCAT
    FORM BLD_LAYOUT.
    GD_LAYOUT-NO_INPUT = 'X'.
    GD_LAYOUT-TOTALS_TEXT = 'Total'.
    GD_LAYOUT-subtotals_text = 'SubTotal'.
    APPEND GD_LAYOUT.
    ENDFORM.
    *&      Form  DISPLAY_LIST
          text
    -->  p1        text
    <--  p2        text
    form DISPLAY_LIST .
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_INTERFACE_CHECK                 = ' '
      I_BYPASSING_BUFFER                = ' '
      I_BUFFER_ACTIVE                   = ' '
       I_CALLBACK_PROGRAM                = SY-REPID
      I_CALLBACK_PF_STATUS_SET          = ' '
      I_CALLBACK_USER_COMMAND           = ' '
       I_CALLBACK_TOP_OF_PAGE            = 'TOP_OF_PAGE'
      I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
      I_CALLBACK_HTML_END_OF_LIST       = ' '
      I_STRUCTURE_NAME                  =
      I_BACKGROUND_ID                   = ' '
      I_GRID_TITLE                      =
      I_GRID_SETTINGS                   =
       IS_LAYOUT                         = GD_LAYOUT
       IT_FIELDCAT                        = IT_FLDCAT
      IT_EXCLUDING                      =
      IT_SPECIAL_GROUPS                 =
       IT_SORT                           = it_sortcat
      IT_FILTER                         =
      IS_SEL_HIDE                       =
      I_DEFAULT                         = 'X'
       I_SAVE                            = 'X'
      IS_VARIANT                        =
      IT_EVENTS                         =
      IT_EVENT_EXIT                     =
      IS_PRINT                          =
      IS_REPREP_ID                      =
      I_SCREEN_START_COLUMN             = 0
      I_SCREEN_START_LINE               = 0
      I_SCREEN_END_COLUMN               = 0
      I_SCREEN_END_LINE                 = 0
      I_HTML_HEIGHT_TOP                 = 0
      I_HTML_HEIGHT_END                 = 0
      IT_ALV_GRAPHICS                   =
      IT_HYPERLINK                      =
      IT_ADD_FIELDCAT                   =
      IT_EXCEPT_QINFO                   =
      IR_SALV_FULLSCREEN_ADAPTER        =
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER           =
      ES_EXIT_CAUSED_BY_USER            =
      TABLES
        t_outtab                          = IT_VBAK.
    EXCEPTIONS
      PROGRAM_ERROR                     = 1
      OTHERS                            = 2
    IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    endform.                    " DISPLAY_LIST
    *&      Form  TOP_OF_PAGE
          text
    -->  p1        text
    <--  p2        text
    form TOP_OF_PAGE .
    DATA: IT_HEADER TYPE SLIS_T_LISTHEADER,
          WA_HEADER TYPE SLIS_LISTHEADER.
          WA_HEADER-TYP = 'H'.
          WA_HEADER-INFO = 'WELCOME HEADER'.
          APPEND WA_HEADER TO IT_HEADER.
          WA_HEADER-TYP = 'S'.
          WA_HEADER-KEY = 'REPORT'.
          WA_HEADER-INFO = SY-REPID.
          APPEND WA_HEADER TO IT_HEADER.
          WA_HEADER-TYP = 'S'.
          WA_HEADER-KEY = 'DATE'.
          CONCATENATE SY-DATUM6(2) '/'  SY-DATUM4(2) '/' SY-DATUM+0(4)       inTO WA_HEADER-INFO.
         WA_HEADER-INFO = SY-DATUM.
          APPEND WA_HEADER TO IT_HEADER.
          CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
            EXPORTING
              it_list_commentary       = IT_HEADER.
            I_LOGO                   =
            I_END_OF_LIST_GRID       =
            I_ALV_FORM               =
    endform.                    " TOP_OF_PAGE
    *TO DISPLAY THE LIST BY SORTING A PARTICULAR COLUMN
    *&      Form  BUILD_SORTCAT
          text
    -->  p1        text
    <--  p2        text
    form BUILD_SORTCAT .
      wa_sort-spos      = 1.
      wa_sort-fieldname = 'ERDAT'.
      wa_sort-SUBTOT    = 'X'. "subtotals any totals column by this field
      APPEND wa_sort TO it_sortcat.
    endform.                    " BUILD_SORTCAT

    Hi Elan,
    *& 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
    If found helpfull do reward.
    Regards.
    Eshwar.

  • Problem in Displaying Subtotal text in Grid Display

    Hi Experts,
                 I got a problem in passing the Subtotal text and Total Text in Grid Display.In my Case we are calculating Interest Rate for Document Number for Each Assignment Number. If any discount is maintain for document, calculate the interest rate as per the given formula.
               So, in this case, Instead of Subtotal text, we can view the 2 dots in Grid display. But in the place of that or else, i want to display the Subtotal. But this not happen in case of Grid Display, I tried in List Display, i can able to display the text.
    Here is the Code what i maintain.
      wa_sortcat-fieldname = 'ZUONR'.
      wa_sortcat-tabname   = 'IT_FINAL'.
      wa_sortcat-subtot    = c_x.
      APPEND wa_sortcat TO sortcat.
      wa_sortcat-fieldname = 'BUDAT'.
      wa_sortcat-tabname   = 'IT_FINAL'.
      APPEND wa_sortcat TO sortcat.
      wa_sortcat-fieldname = 'INTER'.         "Interest Rate
      wa_sortcat-subtot    = c_x.
      wa_sortcat-tabname   = 'IT_FINAL'.
      APPEND wa_sortcat TO sortcat.
    Fieldcatalog:
        wa_fieldcat-outputlen    = c_15.   " Interest Rate
        wa_fieldcat-do_sum       = c_x.
    Layout:
      alv_layout-colwidth_optimize = c_x.
      alv_layout-zebra                    = c_x.
      alv_layout-subtotals_text       = 'Subtotal'.
      alv_layout-totals_text              = 'Total'.
    I check in the SDN, But in some Threads, They explain as, We cant display the Subtotal text in Grid display.
    Please help me to sort this issue. And clarify this whether this is possible or not.
    Thanks in Advance.
    Srini

    Hi Naresh,
        Thanks for your reply, I added the given code by you to fieldcatalog for Interest rate field. i.e.
        wa_fieldcat-outputlen    = c_15.
        wa_fieldcat-do_sum       = c_x.
        wa_fieldcat-inttype      = 'I'.
    Is this is a correct process what you are thinking, or i had to declare for every field what i declare under fieldcatalog.
    Regards,
    Srini

  • Query on ALV List Subtotal texts

    Hi,
    I am using the FM REUSE_ALV_LIST_DISPLAY and my internal table would have data categorized by for ex. two company codes 1000 and 2000.
    My requirement is for the subtotal text to display something like this during the subtotals-
    Total: 1000 <Company code text for 1000>
    instead of the existing
    <w_fieldcat-seltext_> 1000.
    I have tried changing the field seltext_l in the  fieldcat for the first field 'BUKRS', which is working. But i need the changed value of the company code (i.e. like "Total: 2000 <company code text for 2000>" at the next summation level, which i am unable to get as the fieldcat modifications do not reflect in between the ALV list.
    I have also tried changing layout-subtotals_text, but of no use.
    Any pointers/help would be useful.
    Thanks in advance,
    Daksh.

    You need activate the event for SUBTOTAL TEXT and handle the text in there. There is a sample program in BCALV which does the same, take a look at that.
    Regards,
    Ravi
    Note : Please mark all the helpful answers

  • Display Subtotal Text  in ALV

    Hi,
    I have done the subtotal and total operation in ALV report.
    I wanted to display the text like
    Subtotal: _______
    Total     : _______
    I tried to give the text in th layout like..
    GD_LAYOUT-TOTALS_TEXT = 'Total'.
    GD_LAYOUT-subtotals_text = 'SubTotal'.
    i passed this layout in REUSE_ALV_GRID_DISPLAY
    but i am not getting the text in the output. what is wrong?
    Can any one please tell me to place the text?
    Regards,
    Elanthendral.

    Hi,
    Check out the layout work area declaration and passing part. What u have mentioned should work. Try to debug and find it.
    Find below the sample code.
    DATA: wa_layout       TYPE slis_layout_alv, "Layout structure
    END-OF-SELECTION.
       PERFORM build_layout.
    FORM build_layout .
    wa_layout-ZEBRA = 'X'.
    wa_layout-NO_VLINE = 'X'.
    wa_layout-NO_HLINE = 'X'.
    wa_layout-CELL_MERGE = 'X'.
    wa_layout-EDIT = 'X'.
    wa_layout-WINDOW_TITLEBAR = ''.
    wa_layout-NO_ULINE_HS = 'X'.
    wa_layout-LIGHTS_FIELDNAME = ''.
    wa_layout-LIGHTS_TABNAME = ''.
    wa_layout-LIGHTS_ROLLNAME = ''.
    wa_layout-LIGHTS_CONDENSE = 'X'.
    wa_layout-NO_TOTALLINE = 'X'.
    wa_layout-NO_SUBTOTALS = 'X'.
    wa_layout-TOTALS_BEFORE_ITEMS = 'X'.
    wa_layout-TOTALS_ONLY = 'X'.
    wa_layout-TOTALS_TEXT = ''.
    wa_layout-SUBTOTALS_TEXT = ''.
    wa_layout-BOX_FIELDNAME = ''.
    wa_layout-BOX_TABNAME = ''.
    wa_layout-BOX_ROLLNAME = ''.
    wa_layout-CONFIRMATION_PROMPT = 'X'.
    wa_layout-HEADER_TEXT = ''.
    ENDFORM.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'           EXPORTING
            i_callback_program      = gf_repid
            is_layout               = gwa_layout
            it_fieldcat             = gt_catalog
          TABLES
            t_outtab                = gt_line
          EXCEPTIONS
            program_error           = 1
            OTHERS                  = 2.
    Regards,
    ramya

  • How to display different subtotal text for each group in alv report

    Hi,
    i need to display subtotal text as "totals of  Mat1"  for material numbers 1 to 10 as group1 and again i need to display subtotal text as " totals of Mat2" for material number 11 to 20.
    group 2.
    Please help me asap.

    You can create subtotals by columns.
    You would need extra column to group the materials( 1 to 10 GROUP1 20 to 30 GROUP2 by example)  and use this column for subtotals

  • How to display subtotal text in alv report for particular group of values

    Hi,
    if material number falls 1 to 10 then i considered be calculate and display subtotal qty amount with subtotal text " Total of the mat1" and if material number falls 11 to 20 then again i need to be claculate and display subtotal qty amount with subtotal text "total of the mat2". if material number falls 21 to 30 then i don't want to display any subtotal and At last grand total also is not required.
    Please help me asap

    just check the thread...
    Can we modify a sub-total in ALV

Maybe you are looking for

  • How To create a custom tag in jsf

    I'm trying to create a custom tag in jsf.what should be the approach to create it.it would be better if somebody will explain me from the skretch.

  • Help with creative zen sl

    i need help my mp3 play is stuck in recovery mode and warranty is done

  • HELP! Can't drive tv with Video adapter

    Just bought the DVI to Video Adapter (M9267G/A) and tried to drive my TV using both an S-video and Composite video cable. No joy. I followed instructions on apple site: hooked up tv to adapter (it is on) and only then, hot-plugged the adapter into th

  • Settings problem

    How do I set Dreamweaver to automatically fix .swf object tags? (using 8.0) Dreamweavr would fix the object tags on my old computer, but it crashed and now that I have installed Dreamweaver 8 on my new computer it doesn't present me with the same pop

  • Web page made in ID CS5 issue

    Hello, I created a web page (4 pages) in InDesign CS5. I export as an interactive PDF and the page centers in Acrobat fine. When I export as an SWF file it throws the page into the upper left corner (see my link) How do I get the content to stay cent