PUSH_BUTTON_ABAP

*&---------------------------------------------------------------------*
*& Report  Z_TEST_BUTTON
*&
*&---------------------------------------------------------------------*
*& How to use push button
*&
*&---------------------------------------------------------------------*

REPORT Z_TEST_BUTTON.

SELECTION-SCREEN begin of line.
SELECTION-SCREEN PUSHBUTTON (10) BUT1 USER-COMMAND SEARCH.
SELECTION-SCREEN PUSHBUTTON (20) BUT2 USER-COMMAND RESET.
SELECTION-SCREEN end of line.

** Initialization
INITIALIZATION.
BUT1 = 'Search'.
BUT2 = 'Reset'.

AT SELECTION-SCREEN.
CASE sy-ucomm.
  WHEN 'SEARCH'.
     PERFORM SEARCH.
   WHEN 'RESET'.
    PERFORM RESET.
ENDCASE.

 FORM SEARCH.
   MESSAGE 'TEST1' TYPE 'I'.
 ENDFORM.

FORM RESET.
  MESSAGE 'TEST2' TYPE 'I'.
ENDFORM.