fix clear binding (#1041)

This commit is contained in:
oblomov 2024-03-23 16:24:07 +00:00 committed by GitHub
parent c1bc01e735
commit 8283bf7454
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194

View File

@ -155,13 +155,18 @@ CLASS z2ui5_cl_core_bind_srv IMPLEMENTATION.
METHOD clear.
mo_app->mt_attri->*[ name = val ]-check_dissolved = abap_false.
TRY.
data(lv_path) = shift_right( val = val sub = `->*` ).
mo_app->mt_attri->*[ name = lv_path ]-check_dissolved = abap_false.
LOOP AT mo_app->mt_attri->* REFERENCE INTO DATA(lr_bind2).
IF lr_bind2->name CS val && `-`.
DELETE mo_app->mt_attri->*.
ENDIF.
ENDLOOP.
LOOP AT mo_app->mt_attri->* REFERENCE INTO DATA(lr_bind2).
IF lr_bind2->name CS val.
DELETE mo_app->mt_attri->*.
ENDIF.
ENDLOOP.
CATCH cx_root.
ENDTRY.
ENDMETHOD.