现在的位置: 首页 > 综合 > 正文

abap中的连加

2013年10月12日 ⁄ 综合 ⁄ 共 647字 ⁄ 字号 评论关闭

如有转载请注明出处:http://blog.csdn.net/donkey2004112103/archive/2009/03/14/3989683.aspx

之前一直以为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.

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

抱歉!评论已关闭.