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

Update z2ui5_cl_popup_layout_v2.clas.abap (#942)

Browse Source 
Bug Fix
This commit is contained in:
abapsheep 2024-02-23 15:25:51 +01:00 committed by GitHub
parent e4f0f44c56
commit 7f0c0a2b3a
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 15 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/02/02/z2ui5_cl_popup_layout_v2.clas.abap
View File

@ -30,6 +30,7 @@ CLASS z2ui5_cl_popup_layout_v2 DEFINITION
TYPES:
BEGIN OF ty_s_layo,
mandt TYPE mandt,
layout TYPE c LENGTH 12,
tab TYPE c LENGTH 30,
descr TYPE c LENGTH 50,
@ -82,7 +83,7 @@ CLASS z2ui5_cl_popup_layout_v2 DEFINITION
RETURNING
VALUE(result) TYPE REF TO z2ui5_cl_popup_layout_v2.
PROTECTED SECTION.
PROTECTED SECTION.
DATA client TYPE REF TO z2ui5_if_client.
DATA mv_init TYPE abap_bool.
@ -101,7 +102,8 @@ CLASS z2ui5_cl_popup_layout_v2 DEFINITION
METHODS render_save.
METHODS save_layout.
METHODS render_open.
METHODS get_selected_layout.
METHODS get_selected_layout
RETURNING VALUE(result) TYPE ty_s_layout.
METHODS get_layouts.
METHODS init_edit.
METHODS render_delete.
@ -315,12 +317,11 @@ CLASS z2ui5_cl_popup_layout_v2 IMPLEMENTATION.
client->nav_app_leave( ).
WHEN 'OPEN_SELECT'.
get_selected_layout( ).
ms_layout = get_selected_layout( ).
client->popup_destroy( ).
client->nav_app_leave( ).
WHEN 'DELETE_SELECT'.
get_selected_layout( ).
db_delete_layout( ).
client->popup_destroy( ).
client->nav_app_leave( ).
@ -589,7 +590,7 @@ CLASS z2ui5_cl_popup_layout_v2 IMPLEMENTATION.
DATA(t001) = VALUE #( mt_t001[ selkz = abap_true ] OPTIONAL ).
IF t001 IS NOT INITIAL.
ms_layout = db_read_layout(
result = db_read_layout(
layout = t001-layout
tab = t001-tab ).
@ -748,8 +749,10 @@ CLASS z2ui5_cl_popup_layout_v2 IMPLEMENTATION.
METHOD db_delete_layout.
DELETE z2ui5_t001 FROM @ms_layout-s_head.
DELETE z2ui5_t002 FROM TABLE @ms_layout-t_layout.
DATA(layout) = get_selected_layout( ).
DELETE z2ui5_t001 FROM @layout-s_head.
DELETE z2ui5_t002 FROM TABLE @layout-t_layout.
IF sy-subrc = 0.
COMMIT WORK AND WAIT.
@ -776,8 +779,8 @@ CLASS z2ui5_cl_popup_layout_v2 IMPLEMENTATION.
METHOD db_read_head.
SELECT * FROM z2ui5_t001
WHERE classname = @i_classname
AND tab = @i_tab
WHERE classname = @i_classname
AND tab = @i_tab
INTO CORRESPONDING FIELDS OF TABLE @r_result ##SUBRC_OK.
ENDMETHOD.
@ -794,15 +797,14 @@ CLASS z2ui5_cl_popup_layout_v2 IMPLEMENTATION.
FROM z2ui5_t001
WHERE classname = @i_classname
AND tab = @i_tab_name
INTO TABLE @r_t001 ##SUBRC_OK.
INTO CORRESPONDING FIELDS OF TABLE @r_t001 ##SUBRC_OK.
ENDMETHOD.
METHOD db_read_layout_info.
SELECT mandt,
layout,
SELECT layout,
tab,
fname,
rollname,
@ -815,7 +817,7 @@ CLASS z2ui5_cl_popup_layout_v2 IMPLEMENTATION.
FROM z2ui5_t002
WHERE layout = @i_def-layout
AND tab = @i_def-tab
INTO TABLE @r_t002 ##SUBRC_OK.
INTO CORRESPONDING FIELDS OF TABLE @r_t002 ##SUBRC_OK.
ENDMETHOD.