ABAP DO循环 和preform 递归

1.DO循环：

IF  LV_MONAT < 12.
            DO LV_MONAT TIMES VARYING LV_VARY FROM LV_Z-HSL01 NEXT
            LV_Z-HSL02.
              LV_BALA_DATA-BE_AMOUNT = LV_BALA_DATA-BE_AMOUNT + LV_VARY.
            ENDDO.

假设lv_monat = 7, 循环次，从一月开始，二月，三月、、、、 到7月，

  期初余额LV_BALA_DATA-BE_AMOUNT= 累加到7月。

2.preform里套preform.
在perform时perform自己是一种递归的行为, 我不知道你懂不懂递归

设计递归算法, 你要明确, 必须要有退出的机制4.

你要实现的功能是不是: 假设input = 3 result = 1 * 2 * 3?5.如果4是的话,代码:

DATA: input TYPE i,     

 init TYPE i,    

  result TYPE i.

input = 5

.init = 1.

PERFORM multiply USING input init result.

WRITE: result. 

 FORM multiply USING value(input) TYPE i          

          value(init) TYPE i                 

   result TYPE i. 

IF init = 1.   

 result = 1. 

 ENDIF. 

result = result * init. 

 init = init + 1. 

 IF init <= input.   

 PERFORM multiply USING input                           init                           result. 

ENDIF.

ENDFORM.