SAP/abap2UI5
1
0
Fork 0
mirror of https://github.com/abap2UI5/abap2UI5.git synced 2025-04-30 04:36:18 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

New property title for z2ui5_cl_pop_table (#1426)

Browse Source
This commit is contained in:
Christian Günter 2024-09-13 11:54:11 +02:00 committed by GitHub
parent 5cd5e1e6a1
commit ba47b24f3a
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/02/01/z2ui5_cl_pop_table.clas.abap
View File

@ -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 <tab> 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.