内表列值相加

有些报表需要将每一列的数值做合计，而且列非常多，将每列的值相加就要写很多条列相加的代码是很麻烦的，

所以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         ---  不 会将自已当前的值加入计算