mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
62 lines
1.4 KiB
ABAP
62 lines
1.4 KiB
ABAP
CLASS zcl_abapgit_gui_page_hoc DEFINITION
|
|
PUBLIC
|
|
INHERITING FROM zcl_abapgit_gui_page
|
|
FINAL
|
|
CREATE PRIVATE .
|
|
|
|
PUBLIC SECTION.
|
|
|
|
CLASS-METHODS create
|
|
IMPORTING
|
|
!ii_child_component TYPE REF TO zif_abapgit_gui_renderable
|
|
!iv_page_title TYPE string
|
|
!io_page_menu TYPE REF TO zcl_abapgit_html_toolbar OPTIONAL
|
|
!ii_page_menu_provider TYPE REF TO zif_abapgit_gui_menu_provider OPTIONAL
|
|
RETURNING
|
|
VALUE(ri_page_wrap) TYPE REF TO zif_abapgit_gui_renderable
|
|
RAISING
|
|
zcx_abapgit_exception .
|
|
METHODS get_child
|
|
RETURNING
|
|
VALUE(ri_child) TYPE REF TO zif_abapgit_gui_renderable .
|
|
PROTECTED SECTION.
|
|
METHODS render_content REDEFINITION.
|
|
PRIVATE SECTION.
|
|
|
|
DATA mi_child TYPE REF TO zif_abapgit_gui_renderable .
|
|
ENDCLASS.
|
|
|
|
|
|
|
|
CLASS ZCL_ABAPGIT_GUI_PAGE_HOC IMPLEMENTATION.
|
|
|
|
|
|
METHOD create.
|
|
|
|
DATA lo_page TYPE REF TO zcl_abapgit_gui_page_hoc.
|
|
|
|
CREATE OBJECT lo_page.
|
|
lo_page->ms_control-page_title = iv_page_title.
|
|
lo_page->ms_control-page_menu = io_page_menu.
|
|
lo_page->ms_control-page_menu_provider = ii_page_menu_provider.
|
|
lo_page->mi_child = ii_child_component.
|
|
|
|
ri_page_wrap = lo_page.
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD get_child.
|
|
ri_child = mi_child.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD render_content.
|
|
|
|
IF mi_child IS BOUND.
|
|
ri_html = mi_child->render( ).
|
|
ENDIF.
|
|
|
|
ENDMETHOD.
|
|
ENDCLASS.
|