fix #2176, table line type mismatch

This commit is contained in:
Alexander Tsybulsky 2018-12-02 12:55:49 +02:00 committed by Lars Hvam
parent e809df8384
commit 64a0ec086d

View File

@ -184,12 +184,12 @@ CLASS ZCL_ABAPGIT_FOLDER_LOGIC IMPLEMENTATION.
zcx_abapgit_exception=>raise( |Package { lv_absolute_name } exceeds ABAP 30-characters-name limit| ).
ENDIF.
rv_package = lv_absolute_name.
READ TABLE lt_unique_package_names TRANSPORTING NO FIELDS
WITH TABLE KEY table_line = lv_absolute_name.
WITH TABLE KEY table_line = rv_package.
IF sy-subrc = 0.
zcx_abapgit_exception=>raise( |Package { lv_absolute_name } has a subpackage with the same name| ).
zcx_abapgit_exception=>raise( |Package { rv_package } has a subpackage with the same name| ).
ELSE.
rv_package = lv_absolute_name.
INSERT rv_package INTO TABLE lt_unique_package_names.
ENDIF.