Push button on the alvgrid tool bar?

Question

how can u place push button on the ALV GRID TOOL BAR?

Answer 1

Hi,
1. create the local class and implement the Toolbar event.
2. within the event to add the new button.
see the below example code.
CLASS LCL_EVENT_HANDLER DEFINITION.
  PUBLIC SECTION.
    METHODS:
    HANDLER_TOOLBAR      FOR EVENT TOOLBAR OF CL_GUI_ALV_GRID
                             IMPORTING  E_OBJECT E_INTERACTIVE     ,
    HANDLER_USER_COMMAND FOR EVENT USER_COMMAND OF CL_GUI_ALV_GRID
                             IMPORTING E_UCOMM                     .
ENDCLASS.                    "lcl_event_handler DEFINITION
CLASS LCL_EVENT_HANDLER IMPLEMENTATION.
Toolbar -----Create 'Add Issue' button
  METHOD HANDLER_TOOLBAR.
    DATA:  L_WA_TOOLBAR  TYPE  STB_BUTTON.                                          "  Toolbar
    CLEAR: L_WA_TOOLBAR.
Button Type
    L_WA_TOOLBAR-BUTN_TYPE  =  C_BUTTON_TYPE   .            "  3.
    APPEND L_WA_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
Add Issue Button.
    CLEAR: L_WA_TOOLBAR.
    L_WA_TOOLBAR-FUNCTION   =  'ADD_MI'   .                                         "  'ADD_MI'   .
    L_WA_TOOLBAR-ICON       =  'ICON_CREATE'.
    L_WA_TOOLBAR-QUICKINFO  =  'CREATE'   .                                         "  'Add Issue'.
    L_WA_TOOLBAR-TEXT       =  'CREATE'   .                                         "  'Add Issue'.
    L_WA_TOOLBAR-DISABLED   =  ''.
    APPEND L_WA_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
    CLEAR: L_WA_TOOLBAR.
  ENDMETHOD.                    "handler_toolbar
User Actions Events-- Handle 'Add Issue' Button Click.
  METHOD HANDLER_USER_COMMAND.
    CASE E_UCOMM.
Add Issue Button.
      WHEN C_ADD_MI.
        IF NOT G_MATNR IS INITIAL.
          FG_REFRESH  =  C_TRUE.
          PERFORM F_ADD_MEDIAISSUE.
        ENDIF.
    ENDCASE.
Refresh Control
    CALL METHOD CL_GUI_CFW=>FLUSH
      EXCEPTIONS
        CNTL_SYSTEM_ERROR = 1
        CNTL_ERROR        = 2
        OTHERS            = 3.
Handle Exceptions
    IF SY-SUBRC <> 0.
      CASE SY-SUBRC.
        WHEN 1.
          G_ERROR_TEXT = TEXT-026.                                        "  'Control System Error'.
        WHEN 2.
          G_ERROR_TEXT = TEXT-027.                                        "  'Control CL_GUI_CFW Has Raised Error'.
      ENDCASE.
        MESSAGE G_ERROR_TEXT TYPE 'E'.
    ENDIF.
Refresh Alv Grid.
    PERFORM F_REFRESH_GRID.
  ENDMETHOD.                    "handler_user_command
ENDCLASS.                    "lcl_event_handler IMPLEMENTATION
Object Ref. Event Class.
DATA: OBJ_EVENT_HANDLER TYPE REF TO LCL_EVENT_HANDLER.
refer the sample program BCALV_GRID_05 in SE38
Reward if found helpful.
Regards,
Boobalan Suburaj