ABAP中子程序參數傳遞方式

ABAP中子程序參數傳遞方式

子程序的参数传递大体分为值传递和引用传递两种，以及一种较为特殊的值和结果传递。

• 值传递时形参时作为实参的副本创建，形式参数有自己的内存，更改形参并不影响实参本身的内容
• 引用传递是指在子程序调用期间，将实参的地址给形参，而形参本身不占用内存。实际上等价于在子程序中直接使用主程序的数据对象（实参）。这样做的结果是一旦在其中对形参的值进行更改，实参的值也会更改。适用于像传递内表这样大量数据对象到子程序的情况。

USING : 引用传递 改变值
UAING VALUE: 值传递 不改变值
CHANGING: 引用传递 改变值
CHANGING VALUE: 值传递 并返回结果

• 值和结果传递的传递方式类似于值传递，但在子程序正常结束时，将把对形参的更改“结果”赋值给实参，所以实参数据也会被修改。如果子程序非正常中断，参数变量保持原值。

DATA: int1 TYPE i VALUE 1,
      int2 TYPE i VALUE 1.
WRITE: /' Before Calling Subroutine:',
      int1,     int2.
      
PERFORM self_add USING  int1 int2.

WRITE: / 'After Calling Subroutire:',
       int1,    int2.
FORM self_add USING       P1 TYPE i
                     value(P2) TYPE i.
    p1 = p1 + 1.
    p2 = p2 + 1.
    WRITE:/ 'Inside Suboutine:',
        int1,        int2.
ENDFORM.

結果如下