运行按钮旁边创建其他功能按钮

SELECTION-SCREEN BEGIN OF BLOCK 00 WITH FRAME TITLE TEXT-000.
*SELECT-OPTIONS: F
*PARAMETERS:  P_SPMON LIKE S001-SPMON(6) DEFAULT SY-DATUM.
SELECT-OPTIONS:  S_DATE FOR SY-DATUM OBLIGATORY.
*                E_DATE LIKE SY-DATUM.

SELECTION-SCREEN: SKIP 1.
SELECTION-SCREEN: FUNCTION KEY 1.
SELECTION-SCREEN END OF BLOCK 00.




*&---------------------------------------------------------------------*
INITIALIZATION .
*&---------------------------------------------------------------------*
  PERFORM INIT .

*  *   *&---------------------------------------------------------------------*

 

 

  SSCRFIELDS-FUNCTXT_01 = TEXT-FM1.

 

 

AT SELECTION-SCREEN.
*&---------------------------------------------------------------------*
  PERFORM GET_FORM.

 CASE SSCRFIELDS-UCOMM.
    WHEN 'FC01'.

 

Endcase.