Creating the GUI Buttons on Tu0131tle Bar of the Reports

Question

Hi,
How can i create the buttons on title bar of my report as CL_GOS_MANAGER?
the CL_GOS_MANAGER interface is creating a button on title bar of a report to open gos manager popup window.
i want to do same as this method. i want to create my button.
Can somebody help me pls?
Thanks.

Answer 1

Thank you for your reply,
i've created a gui button on title bar with this code at INITIALIZATION;
DATA: lo_container TYPE REF TO cl_gui_gos_container,
        lo_dialogbox TYPE REF TO cl_gui_dialogbox_container,
        lo_toolbar TYPE REF TO cl_gui_toolbar.
  DATA: lo_menu TYPE REF TO cl_ctmenu.
  DATA lt_event TYPE cntl_simple_events.
  DATA ls_event TYPE cntl_simple_event.
  DATA lp_style TYPE i.
  DATA lp_icon TYPE iconname.
  DATA lp_butn_type TYPE tb_btype.
  DATA lp_url(30).
  DATA lp_quick TYPE iconquick.
  DATA lp_nobut TYPE c.
  GET PARAMETER ID 'SGOSNOBUT' FIELD lp_nobut.
  CHECK lp_nobut IS INITIAL.
  lp_style = cl_gui_control=>ws_visible.
*  IF CL_GOS_STARTER->go_container IS INITIAL.
    CREATE OBJECT lo_container
      EXPORTING
        width             = 58
        no_autodef_progid_dynnr = 'X'
      EXCEPTIONS
        OTHERS            = 5
    CHECK sy-subrc = 0.
    CREATE OBJECT lo_toolbar
      EXPORTING parent = lo_container.
    CALL FUNCTION 'ICON_CREATE'
      EXPORTING
        name       = 'ICON_PDF'
        add_stdinf = space
      IMPORTING
        RESULT     = lp_icon
      EXCEPTIONS
        OTHERS     = 0.
*    IF gp_frontend = 'ITS'.
** insert menubutton
*      lp_butn_type = 2.
*    ELSE.
** insert menubutton with default
*      lp_butn_type = 1.
*    ENDIF.
    lp_quick = text-001.
    CALL METHOD lo_toolbar->add_button
      EXPORTING
        fcode     = '%MY_BUTTON'
        icon      = lp_icon
        butn_type = lp_butn_type
        quickinfo = lp_quick.
* register events as system events.
    CLEAR lt_event.
    ls_event-eventid = cl_gui_toolbar=>m_id_function_selected.
    ls_event-appl_event = space.
    APPEND ls_event TO lt_event.
    ls_event-eventid = cl_gui_toolbar=>m_id_dropdown_clicked.
    ls_event-appl_event = space.
    APPEND ls_event TO lt_event.
    CALL METHOD lo_toolbar->set_registered_events
      EXPORTING
        events = lt_event.
*    SET HANDLER on_function_selected FOR lo_toolbar.
*  ELSE.
*    CALL METHOD show.
*  ENDIF.
*  SET HANDLER on_dropdown_clicked  FOR lo_toolbar.
  call method cl_gui_cfw=>flush.
but i didn't find where button clicked is falling.
Thanks again.