DSYS: Fix error for objects containing / in name (#6431)

Co-authored-by: Marc Bernard <59966492+mbtools@users.noreply.github.com>
This commit is contained in:
Frank Müller 2023-08-28 23:56:16 +02:00 committed by GitHub
parent c9edbe1d48
commit c4cf63ebe0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -49,18 +49,22 @@ CLASS ZCL_ABAPGIT_OBJECT_DSYS IMPLEMENTATION.
super->constructor( is_item = is_item
iv_language = iv_language ).
CALL FUNCTION 'RS_NAME_SPLIT_NAMESPACE'
EXPORTING
name_with_namespace = ms_item-obj_name
IMPORTING
namespace = lv_prefix
name_without_namespace = lv_bare_name.
IF ms_item-obj_name(1) = '/'.
mv_doc_object = |{ lv_bare_name+0(4) }{ lv_prefix }{ lv_bare_name+4(*) }|.
CALL FUNCTION 'RS_NAME_SPLIT_NAMESPACE'
EXPORTING
name_with_namespace = ms_item-obj_name
IMPORTING
namespace = lv_prefix
name_without_namespace = lv_bare_name.
mv_doc_object = |{ lv_bare_name+0(4) }{ lv_prefix }{ lv_bare_name+4(*) }|.
ELSE.
mv_doc_object = ms_item-obj_name.
ENDIF.
ENDMETHOD.
METHOD deserialize_dsys.
DATA: ls_data TYPE ty_data,