Internal Table - Summary

Question

Hi Experts,
I have an internal table with the following fields.
rollno(10)  type c,
name(20)    type c,
subject(10) type c,
mark(3)     type c.
the values stored in the above IT will be something like:
rollno     name     subject     mark
100     Sam     Maths     80
100     Sam     Science     90
100     Sam     Social     100
200     Wam     Maths     90
200     Wam     Science     90
200     Wam     Social     80
I want the o/p in an internal table like this:
rollno     name     Tot-mark
100     Sam     270
200     Wam     260
Please advice as to how i can acheive this
Thanks,
Manju

Answer 1

Hi,
for the summing of marks you can use COLLECT stmt. But the field you want to add up need not be in char or string. e.g: MARKS type INT.  As others are CHAR so they will act like Key for the MARKS field. take ROLLNO or NAME as key.
after addition MOVE source table to Target table(another internal table) for display.
or follow dis below mentioned code
data: begin of itab occurs 10,
          roll(10),
          name(5),
          sub(10),
          mark type i,
      end of itab.
itab-roll = '100'.
itab-name = 'sam'.
itab-sub = 'math'.
itab-mark = 40.
append itab.
itab-roll = '100'.
itab-name = 'sam'.
itab-sub = 'math1'.
itab-mark = 10.
append itab.
itab-roll = '100'.
itab-name = 'sam'.
itab-sub = 'math2'.
itab-mark = 30.
append itab.
itab-roll = '200'.
itab-name = 'sam1'.
itab-sub = 'math'.
itab-mark = 50.
append itab.
itab-roll = '200'.
itab-name = 'sam1'.
itab-sub = 'math1'.
itab-mark = 20.
append itab.
itab-roll = '200'.
itab-name = 'sam1'.
itab-sub = 'math2'.
itab-mark = 60.
append itab.
itab-roll = '300'.
itab-name = 'sam2'.
itab-sub = 'math'.
itab-mark = 80.
append itab.
itab-roll = '300'.
itab-name = 'sam2'.
itab-sub = 'math1'.
itab-mark = 70.
append itab.
sort itab by roll.
loop at itab.
   at new name.
    sum.
    Write: / itab-roll, itab-name, itab-mark.
    endat.
endloop.
Reward if helpful.
Thanks.
Edited by: Sagar@MM on May 22, 2008 10:00 AM
Edited by: Sagar@MM on May 22, 2008 11:33 AM
Edited by: Sagar@MM on May 22, 2008 11:34 AM