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

add sap.m.Tree & sap.m.StandardTreeItem (#378)

Browse Source 
* add sap.m.Tree & sap.m.StandardTreeItem

* add recursive table handling

* add recursive table handling 2

* abaplint fix

Co-authored-by: abaplint[bot] <24845621+abaplint[bot]@users.noreply.github.com>

* abaplint fix

Co-authored-by: abaplint[bot] <24845621+abaplint[bot]@users.noreply.github.com>

---------

Co-authored-by: Daniel Wegner <daniel.wegner@objective-partner.com>
Co-authored-by: oblomov <102328295+oblomov-dev@users.noreply.github.com>
Co-authored-by: abaplint[bot] <24845621+abaplint[bot]@users.noreply.github.com>
This commit is contained in:
Daniel Wegner 2023-07-13 18:38:12 +02:00 committed by GitHub
parent 29b7ea5367
commit 2ab226100c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 126 additions and 71 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/z2ui5_cl_http_handler.clas.locals_imp.abap
View File

@ -12,7 +12,7 @@ CLASS z2ui5_lcl_utility DEFINITION INHERITING FROM cx_no_check.
data_rtti TYPE string,
check_ref_data TYPE abap_bool,
END OF ty_attri.
TYPES ty_T_attri TYPE STANDARD TABLE OF ty_attri WITH EMPTY KEY.
TYPES ty_t_attri TYPE STANDARD TABLE OF ty_attri WITH EMPTY KEY.
DATA:
BEGIN OF ms_error,
@ -201,7 +201,7 @@ CLASS z2ui5_lcl_fw_handler DEFINITION.
END OF cs_bind_type.
TYPES:
BEGIN OF ty_S_next2,
BEGIN OF ty_s_next2,
t_scroll TYPE z2ui5_if_client=>ty_t_name_value,
title TYPE string,
search TYPE string,
@ -269,7 +269,7 @@ CLASS z2ui5_lcl_fw_handler DEFINITION.
BEGIN OF ty_s_next,
o_app_call TYPE REF TO z2ui5_if_app,
o_app_leave TYPE REF TO z2ui5_if_app,
s_set TYPE ty_S_next2,
s_set TYPE ty_s_next2,
END OF ty_s_next.
DATA ms_actual TYPE z2ui5_if_client=>ty_s_get.
@ -622,7 +622,13 @@ CLASS z2ui5_lcl_utility IMPLEMENTATION.
ASSIGN <comp_ui5>->* TO FIELD-SYMBOL(<ls_data_ui5>).
IF sy-subrc = 0.
CASE ls_comp-type->kind.
WHEN cl_abap_typedescr=>kind_table.
trans_ref_tab_2_tab( EXPORTING ir_tab_from = <comp_ui5>
IMPORTING t_result = <comp> ).
WHEN OTHERS.
<comp> = <ls_data_ui5>.
ENDCASE.
ENDIF.
ENDLOOP.
@ -1290,7 +1296,7 @@ CLASS z2ui5_lcl_fw_db IMPLEMENTATION.
METHOD cleanup.
data(lv_timestampl) = z2ui5_lcl_utility=>get_timestampl( ).
DATA(lv_timestampl) = z2ui5_lcl_utility=>get_timestampl( ).
DATA(lv_ts_four_hours_ago) = cl_abap_tstmp=>subtractsecs( tstmp = lv_timestampl
secs = 60 * 60 * 4 ).
@ -1393,10 +1399,10 @@ CLASS z2ui5_lcl_fw_handler IMPLEMENTATION.
* DATA(lv_q) = z2ui5_lcl_utility=>get_param( `q` ).
* DATA(lv_app) = to_lower( z2ui5_lcl_utility=>get_classname_by_ref( ms_db-o_app ) ).
IF ms_next-S_set-search IS INITIAL.
IF ms_next-s_set-search IS INITIAL.
lo_resp->add_attribute( n = `SEARCH` v = ms_actual-s_config-search ).
ELSE.
lo_resp->add_attribute( n = `SEARCH` v = ms_next-S_set-search ).
lo_resp->add_attribute( n = `SEARCH` v = ms_next-s_set-search ).
ENDIF.
result = lo_resp->get_root( )->stringify( ).
@ -1690,7 +1696,7 @@ CLASS z2ui5_lcl_fw_handler IMPLEMENTATION.
r_result->ms_actual-check_launchpad_active = ms_actual-check_launchpad_active.
r_result->ms_actual-check_on_navigated = abap_true.
r_result->ms_next-s_Set = ms_next-s_set.
r_result->ms_next-s_set = ms_next-s_set.
ENDMETHOD.
@ -1724,7 +1730,7 @@ CLASS z2ui5_lcl_fw_client IMPLEMENTATION.
check_launchpad_active = mo_handler->ms_actual-check_launchpad_active
t_event_arg = mo_handler->ms_actual-t_event_arg
t_scroll_pos = mo_handler->ms_actual-t_scroll_pos
s_DRAFT = CORRESPONDING #( mo_handler->ms_db )
s_draft = CORRESPONDING #( mo_handler->ms_db )
check_on_navigated = mo_handler->ms_actual-check_on_navigated
s_config = z2ui5_lcl_fw_handler=>ss_config ).
result-s_draft-app = mo_handler->ms_db-o_app.

49
src/z2ui5_cl_xml_view.clas.abap
View File

@ -1243,6 +1243,28 @@ CLASS z2ui5_cl_xml_view DEFINITION
!press TYPE clike OPTIONAL
RETURNING
VALUE(result) TYPE REF TO z2ui5_cl_xml_view .
METHODS tree
IMPORTING
!items TYPE clike OPTIONAL
!headerText TYPE clike OPTIONAL
!footerText TYPE clike OPTIONAL
!mode TYPE clike OPTIONAL
!includeItemInSelection TYPE abap_bool OPTIONAL
!inset TYPE abap_bool OPTIONAL
!width TYPE clike OPTIONAL
RETURNING
VALUE(result) TYPE REF TO z2ui5_cl_xml_view .
METHODS standard_tree_item
IMPORTING
!title TYPE clike OPTIONAL
!icon TYPE clike OPTIONAL
!press TYPE clike OPTIONAL
!detailPress TYPE clike OPTIONAL
!type TYPE clike OPTIONAL
!selected TYPE clike OPTIONAL
!counter TYPE clike OPTIONAL
RETURNING
VALUE(result) TYPE REF TO z2ui5_cl_xml_view .
PROTECTED SECTION.
DATA mv_name TYPE string.
@ -2774,6 +2796,7 @@ CLASS z2ui5_cl_xml_view IMPLEMENTATION.
METHOD tilecontent.
result = _generic( name = `TileContent`
ns = ``
t_prop = VALUE #(
@ -3063,6 +3086,32 @@ CLASS z2ui5_cl_xml_view IMPLEMENTATION.
ENDMETHOD.
METHOD tree.
result = _generic( name = `Tree`
t_prop = VALUE #(
( n = `items` v = items )
( n = `headerText` v = headertext )
( n = `footerText` v = footerText )
( n = `mode` v = mode )
( n = `width` v = width )
( n = `includeItemInSelection` v = lcl_utility=>get_json_boolean( includeItemInSelection ) )
( n = `inset` v = lcl_utility=>get_json_boolean( inset ) )
) ).
ENDMETHOD.
METHOD standard_tree_item.
result = me.
_generic( name = `StandardTreeItem`
t_prop = VALUE #( ( n = `title` v = title )
( n = `icon` v = icon )
( n = `press` v = press )
( n = `detailPress` v = detailPress )
( n = `type` v = type )
( n = `counter` v = counter )
( n = `selected` v = selected ) ) ).
endmethod.
METHOD numericcontent.
result = _generic( name = `NumericContent`