ABAP--关于abap的subroutines的几个注意点

1、参数引用传递(Parameters Passed by Reference)
使用USING或CHANGING不带value关键字来声明参数引用传递。代码样例：
FORM subr USING    p1 [{TYPE type}|{LIKE field}]
                   p2 [{TYPE type}|{LIKE field}]
                   ...
          CHANGING p1 [{TYPE type}|{LIKE field}]
                   p2 [{TYPE type}|{LIKE field}]
                   ...
在引用传递的方式，参数不在堆中占有内存，传入的是变量的地址，在子程序中对变量的修改实际上是对实际参数的修改。在这种方式using和changing是等价的。

2、输入参数传值传递(Input Parameters That Pass Values)
使用USING带value关键字来声明输入参数传值传递。代码样例：
FORM subr USING    value(p1) [{TYPE type}|{LIKE field}]
                   value(p2) [{TYPE type}|{LIKE field}]
                   ...
在输入参数传值传递的方式，参数在堆中占有内存，传入的是变量的值，在子程序中对变量的修改不会对实际参数的造成修改。

3、输出参数传值传递(Output Parameters That Pass Values)
使用USING带value关键字来声明输入参数传值传递。代码样例：
FORM subr CHANGING    value(p1) [{TYPE type}|{LIKE field}]
                   value(p2) [{TYPE type}|{LIKE field}]
                   ...
在输出参数传值传递的方式，形式参数在堆中占有内存，传入的是变量的值，在子程序中对变量的修改只有正常结束 (Endform,CHECK,EXIT等语句结束)时才会有形式参数拷贝到对实际参数，如果是错误消息退出则不会影响实际参数。

4、local的使用
Local语句可以保护在子过程对全局变量的修改不会影响到子过程之外。特别是在子过程里不能直接使用Tables定义工作区，既是你将TABLES语句写在子过程里，该工作区也是全局性的。如果你需要定义子程序内的工作区，你可以先用tables定义一个全局的，再在子程序里使用local定义本地的，代码样例如下：
REPORT demo_mod_tech_local.
TABLES sflight.
PERFORM tabtest1.
WRITE: / sflight-planetype, sflight-price currency sflight-currency.

PERFORM tabtest2.
WRITE: / sflight-planetype, sflight-price currency sflight-currency.

FORM tabtest1.
  sflight-planetype = 'A310'.
  sflight-price = '150.00'.
  WRITE: / sflight-planetype, sflight-price currency sflight-currency.
ENDFORM.

FORM tabtest2.
  LOCAL sflight.
  sflight-planetype = 'B747'.
  sflight-price = '500.00'.
  WRITE: / sflight-planetype, sflight-price currency sflight-currency.
ENDFORM.

Trackback: http://tb.blog.csdn.net/TrackBack.aspx?PostId=1681935