diff --git a/src/ui/zcl_abapgit_gui_page.clas.abap b/src/ui/zcl_abapgit_gui_page.clas.abap index 5384327ed..0698e1bea 100644 --- a/src/ui/zcl_abapgit_gui_page.clas.abap +++ b/src/ui/zcl_abapgit_gui_page.clas.abap @@ -24,6 +24,7 @@ CLASS zcl_abapgit_gui_page DEFINITION PUBLIC ABSTRACT page_layout TYPE string, page_title TYPE string, page_menu TYPE REF TO zcl_abapgit_html_toolbar, + page_menu_provider TYPE REF TO zif_abapgit_gui_menu_provider, END OF ty_control . DATA ms_control TYPE ty_control . @@ -53,7 +54,9 @@ CLASS zcl_abapgit_gui_page DEFINITION PUBLIC ABSTRACT VALUE(ri_html) TYPE REF TO zif_abapgit_html . METHODS title RETURNING - VALUE(ri_html) TYPE REF TO zif_abapgit_html . + VALUE(ri_html) TYPE REF TO zif_abapgit_html + RAISING + zcx_abapgit_exception . METHODS footer IMPORTING !iv_time TYPE ty_time @@ -88,7 +91,7 @@ ENDCLASS. -CLASS zcl_abapgit_gui_page IMPLEMENTATION. +CLASS ZCL_ABAPGIT_GUI_PAGE IMPLEMENTATION. METHOD constructor. @@ -264,6 +267,13 @@ CLASS zcl_abapgit_gui_page IMPLEMENTATION. METHOD title. + DATA lo_page_menu LIKE ms_control-page_menu. + + lo_page_menu = ms_control-page_menu. + IF lo_page_menu IS NOT BOUND AND ms_control-page_menu_provider IS BOUND. + lo_page_menu = ms_control-page_menu_provider->get_menu( ). + ENDIF. + CREATE OBJECT ri_html TYPE zcl_abapgit_html. ri_html->add( '