abap - 如何将多个参数传递给子程序？

Question

我试图将多个参数传递给一个子例程，但出现以下错误:

Incorrect nesting: before the statement "FORM", the structure introduced by "FORM" must be concluded with "ENDFORM"

这是我的代码:

CASE p_choose.
  WHEN 'UMK'.
    PERFORM umk USING: p_modul,
                       p_e_pal,
                       p_vbeln,
                       p_e_umk.
"some other cases
ENDCASE.

FORM umk USING: p_modul,
                p_e_pal,
                p_vbeln,
                p_e_umk.
ENDFORM.

我的错误在哪里？如何传递多个参数？或者根本不可能？谢谢!

Answer 1

我自己已经找到了解决方案。错误是每个参数后面的“，”。

正确的代码是:

CASE p_choose.
  WHEN 'UMK'.
    PERFORM umk USING p_modul
                      p_e_pal
                      p_vbeln
                      p_e_umk.
"some other cases
ENDCASE.

FORM umk USING p_modul
               p_e_pal
               p_vbeln
               p_e_umk.
ENDFORM.