Adding values in same field inside loop

Question

Dear Experts,
suppose in my o/p i am displaying material number and its value:
material No:      Qty
matnr                1000
matnr                2000
matnr                3000
matnr                4000
matnr                5000
Now I want my third field  ( SUM ) such that the value displayed should
get added to the next value displayed, till the loop ends for each particular material.
material No:     Qty           Sum
matnr               1000        1000     " (1000)
matnr               2000        3000     " (1000 + 2000)
matnr               3000        6000     " (1000 + 2000 + 3000)
matnr               4000      10000     " (1000 + 2000 + 3000 + 6000)
matnr               5000      15000     " (1000 + 2000 + 3000 + 6000 + 10000)
Actually my requirement is :
First I need to get  material and Quantity from MSEG table 
then I need to compare this material and quantity in MBEW table  to get the total stock
particular material.
so my condition is like :
if i_mseg~sum GE mbew-lbkum.
  delete i_mseg.
endif.
Please advice.

Answer 1

Hi Karthik ,
Pls try this.
REPORT  ztest.
TYPES: BEGIN OF ty_mseg,
       matnr TYPE mseg-matnr,
       menge TYPE mseg-menge,
       sum TYPE mseg-menge,
       END OF ty_mseg.
TYPES : BEGIN OF ty_mbew,
        matnr TYPE mseg-matnr,
        lbkum TYPE mbew-lbkum,
        END OF ty_mbew.
DATA : it_mseg TYPE TABLE OF ty_mseg,
       wa_mseg TYPE ty_mseg,
       it_mbew TYPE TABLE OF ty_mbew,
       wa_mbew TYPE ty_mbew.
DATA : sum TYPE mseg-menge.
START-OF-SELECTION.
  wa_mseg-matnr = '1111'.
  wa_mseg-menge = '1000'.
  APPEND wa_mseg TO it_mseg.
  wa_mseg-matnr = '1112'.
  wa_mseg-menge = '1000'.
  APPEND wa_mseg TO it_mseg.
  wa_mseg-matnr = '1113'.
  wa_mseg-menge = '1000'.
  APPEND wa_mseg TO it_mseg.
  SELECT matnr lbkum
            FROM  mbew INTO TABLE it_mbew
                FOR ALL ENTRIES IN it_mseg
    WHERE matnr = it_mseg-matnr.
  LOOP AT it_mseg INTO wa_mseg.
    READ TABLE it_mbew INTO wa_mbew WITH KEY matnr = wa_mseg-matnr.
    CHECK sy-subrc = 0.
    IF wa_mseg-menge LT wa_mbew-lbkum.
      ADD wa_mseg-menge TO sum.
      wa_mseg-sum = sum.
      MODIFY it_mseg FROM wa_mseg.
      WRITE : / wa_mseg-matnr,wa_mseg-menge,wa_mseg-sum.
    ELSE.
      DELETE it_mseg FROM wa_mseg.
    ENDIF.
  ENDLOOP.
I just hard-coded some materials for checking with the logic.You can get materials list directly from mseg as per your selection criterian right!