Screen 1000中添加USER-COMMAND

TABLES sscrfields.

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: pa_pernr LIKE p0001-pernr.
SELECTION-SCREEN END OF BLOCK b1.

 

SELECTION-SCREEN FUNCTION KEY 1.
SELECTION-SCREEN FUNCTION KEY 2.

 

INITIALIZATION.
  MOVE : '@03@ Run'   TO sscrfields-functxt_01.
  MOVE : '@03@ Display'   TO sscrfields-functxt_02.

 

AT SELECTION-SCREEN.
  CASE sscrfields-ucomm.
    WHEN 'FC01'.

*Run按钮的功能代码
    WHEN 'FC02'.
  ENDCASE.

START-OF-SELECTION.

以上代码则可以在SCREEN1000中添加2个按钮，查看SSCRFIELDS的内容我们可知，最多允许我们添加5个按钮。