內表列值相加

有些報表需要將每一列的數值做合計，而且列非常多，將每列的值相加就要寫很多條列相加的代碼是很麻煩的，

所以ABAP提供了一個簡單的計算方法:ADD xxx THEN xxx UNTIL  xxx GIVING/TO xxx.

它自動把指定的列進行相加.

 

DATA: BEGIN OF SERIES,
         N1 TYPE I VALUE 10,
         N2 TYPE I VALUE 20,
         N3 TYPE I VALUE 30,
         N4 TYPE I VALUE 40,
         N5 TYPE I VALUE 50,
         N6 TYPE I VALUE 60,
      END OF SERIES.
DATA SUM TYPE I.
ADD SERIES-N1 THEN SERIES-N2 UNTIL SERIES-N6 GIVING SUM.
WRITE SUM.
ADD SERIES-N1 THEN SERIES-N2 UNTIL SERIES-N6 to SUM.
WRITE / SUM.

ADD SERIES-N2 THEN SERIES-N3 UNTIL SERIES-N6 TO SUM.
WRITE / SUM.
ADD SERIES-N2 THEN SERIES-N3 UNTIL SERIES-N6 GIVING SUM.
WRITE / SUM.

 

注意：GIVING  ---  會將自已當前的值加入計算

             TO         ---  不 會將自已當前的值加入計算