abap perform参数用法

ABAP中的PERFORM语句是一种调用子程序的方法。通过 PERFORM 语句，您可以在当前程序中调用另一个子程序中的代码，然后再返回到当前程序。在使用PERFORM语句时，需要指定被调用的子程序名。

PERFORM语句有两种语法形式：

1. PERFORM subroutine_name.
[USING {parameters}].

这种语法形式用于调用不带参数的子程序，其中 subroutine_name 是被调用的子程序名。

2. PERFORM subroutine_name
[USING {parameters}]
[CHANGING {parameters}].

这种语法形式用于调用带参数的子程序，其中 USING 子句用于传递输入参数，而 CHANGING 子句用于传递输出参数。

例如，以下代码演示了如何调用带参数的子程序：

REPORT ztest.

DATA: lv_input TYPE i,
      lv_output TYPE i.

lv_input = 10.

PERFORM add_numbers USING lv_input CHANGING lv_output.

WRITE: / 'Input:', lv_input, / 'Output:', lv_output. 

*&------------------------------------------------------------------*
*&      Form  add_numbers
*&------------------------------------------------------------------*
FORM add_numbers USING p_input TYPE i CHANGING p_output TYPE i.
  p_output = p_input + 5.
ENDFORM.

在上面的代码中，我们定义了一个带输入和输出参数的子程序 add_numbers，并在主程序中使用 PERFORM 语句调用该子程序。在使用 PERFORM 语句时，我们使用 USING 子句传递输入参数 lv_input，使用 CHANGING 子句传递输出参数 lv_output。在子程序中，我们将输入参数加上5，并将结果存储在输出参数中。最后，在主程序中输出输入和输出参数的值。