Subtotal in classical report

Question

hello experts,
how can i make subtotal in classical report,
scenario is like this,
say for a single likp-vbeln, there is lips-lfimg, i need to subtotal for lips-lfimg for each likp-vbeln,
how to du it?plz help

Answer 1

Hi Rajdeep,
Add lifmg to a variable, then
at end of vbeln print the sum and clear it.
Check the below code for example, here field a is similar to your vbeln and c is
similar to your lifmg,
TYPES: BEGIN OF ty_tab,
       a TYPE char2,
       b TYPE char3,
       c TYPE i,
       END OF ty_tab.
DATA: it_tab TYPE TABLE OF ty_tab,
      wa_tab TYPE ty_tab.
DATA: w_sum TYPE i.
wa_tab-a = 'A'.
wa_tab-b = 'AAA'.
wa_tab-c = 1.
APPEND wa_tab TO it_tab.
wa_tab-a = 'A'.
wa_tab-b = 'AAA'.
wa_tab-c = 1.
APPEND wa_tab TO it_tab.
wa_tab-a = 'A'.
wa_tab-b = 'AAA'.
wa_tab-c = 1.
APPEND wa_tab TO it_tab.
wa_tab-a = 'B'.
wa_tab-b = 'BBB'.
wa_tab-c = 1.
APPEND wa_tab TO it_tab.
wa_tab-a = 'B'.
wa_tab-b = 'BBB'.
wa_tab-c = 1.
APPEND wa_tab TO it_tab.
"Print the header
WRITE: sy-uline.
WRITE: /, 5 'A', 10 'B', 24 'C'.
WRITE: sy-uline.
"Print the values
LOOP AT it_tab INTO wa_tab.
  ADD wa_tab-c TO w_sum. "calculating sub total for field c
  WRITE: / ,5 wa_tab-a,
            10 wa_tab-b,
            15 wa_tab-c.
  AT END OF a.    "For each new a print the subtotal
    WRITE: sy-uline.
    WRITE: /, 5 'Sub total of C',
              15 w_sum.
    WRITE: sy-uline.
    CLEAR w_sum.
  ENDAT.
Regards,
Manoj Kumar P