abap中的连加

abap中的连加

之前一直以为abap死板写程序麻烦，今天给了我一个意外原来好几个变量累加可以这样做。如下程序：

DATA: input1 TYPE i, input2 TYPE i, input3 TYPE i, 
      input4 TYPE i, input5 TYPE i, input6 TYPE i, 
              sum TYPE i. 
                 input4 = 123. 
                 input5 = 123. 
                 input6 = 123. 
               sum = sum + : input4, input5, input6. 
               WRITE:/ sum.

如果是input4到input60了？那就要用到field-symbol了，这就是没有数组的麻烦之处。我写了一个事例程序，不知道有没有更简单的方法：

FIELD-SYMBOLS: <fs_test> type i. 
sum = 0. 
do 27 TIMES. 
count = sy-index. 
CONCATENATE 'input' count into inputvar. 
ASSIGN (inputvar) to <fs_test>. 
sum = <fs_test> + sum. 
ENDDO.

这样就完成了类似与指针的操作，但是比ｃ还是简单。这样的方法在求会计期间的累加时是很方便的。