From ba47b24f3a30197531d3be3fe67c832490667cba Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Christian=20G=C3=BCnter?= Date: Fri, 13 Sep 2024 11:54:11 +0200 Subject: [PATCH] New property title for z2ui5_cl_pop_table (#1426) --- src/02/01/z2ui5_cl_pop_table.clas.abap | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/02/01/z2ui5_cl_pop_table.clas.abap b/src/02/01/z2ui5_cl_pop_table.clas.abap index 3f12c2e3..f691bcf1 100644 --- a/src/02/01/z2ui5_cl_pop_table.clas.abap +++ b/src/02/01/z2ui5_cl_pop_table.clas.abap @@ -9,6 +9,7 @@ CLASS z2ui5_cl_pop_table DEFINITION CLASS-METHODS factory IMPORTING i_tab TYPE STANDARD TABLE + i_title TYPE clike OPTIONAL RETURNING VALUE(r_result) TYPE REF TO z2ui5_cl_pop_table. @@ -27,6 +28,7 @@ CLASS z2ui5_cl_pop_table DEFINITION PROTECTED SECTION. DATA check_initialized TYPE abap_bool. + DATA title TYPE string VALUE 'Table View'. DATA client TYPE REF TO z2ui5_if_client. METHODS on_event. METHODS display. @@ -48,7 +50,7 @@ CLASS z2ui5_cl_pop_table IMPLEMENTATION. DATA(popup) = z2ui5_cl_xml_view=>factory_popup( )->dialog( afterclose = client->_event( 'BUTTON_CONFIRM' ) stretch = abap_true - title = 'Table View' + title = title * icon = 'sap-icon://edit' )->content( ). @@ -85,6 +87,9 @@ CLASS z2ui5_cl_pop_table IMPLEMENTATION. FIELD-SYMBOLS TYPE any. r_result = NEW #( ). + IF i_title IS NOT INITIAL. + r_result->title = i_title. + ENDIF. CREATE DATA r_result->mr_tab LIKE i_tab. CREATE DATA r_result->ms_result-row LIKE LINE OF i_tab.