mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
INTF: Fix check if interface exists (#4759)
As mentioned in #4673, the existence check for interfaces is not correct and actually checking for classes. The PR will correct the check. Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
parent
3f454f3633
commit
ce677e449f
|
@ -81,17 +81,7 @@ CLASS zcl_abapgit_oo_base IMPLEMENTATION.
|
||||||
|
|
||||||
|
|
||||||
METHOD zif_abapgit_oo_object_fnc~exists.
|
METHOD zif_abapgit_oo_object_fnc~exists.
|
||||||
CALL FUNCTION 'SEO_CLASS_EXISTENCE_CHECK'
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
EXPORTING
|
|
||||||
clskey = is_object_name
|
|
||||||
EXCEPTIONS
|
|
||||||
not_specified = 1
|
|
||||||
not_existing = 2
|
|
||||||
is_interface = 3
|
|
||||||
no_text = 4
|
|
||||||
inconsistent = 5
|
|
||||||
OTHERS = 6.
|
|
||||||
rv_exists = boolc( sy-subrc <> 2 ).
|
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -15,6 +15,8 @@ CLASS zcl_abapgit_oo_interface DEFINITION
|
||||||
REDEFINITION .
|
REDEFINITION .
|
||||||
METHODS zif_abapgit_oo_object_fnc~deserialize_source
|
METHODS zif_abapgit_oo_object_fnc~deserialize_source
|
||||||
REDEFINITION .
|
REDEFINITION .
|
||||||
|
METHODS zif_abapgit_oo_object_fnc~exists
|
||||||
|
REDEFINITION .
|
||||||
PROTECTED SECTION.
|
PROTECTED SECTION.
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
|
|
||||||
|
@ -257,6 +259,21 @@ CLASS zcl_abapgit_oo_interface IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
|
||||||
|
METHOD zif_abapgit_oo_object_fnc~exists.
|
||||||
|
CALL FUNCTION 'SEO_INTERFACE_EXISTENCE_CHECK'
|
||||||
|
EXPORTING
|
||||||
|
intkey = is_object_name
|
||||||
|
EXCEPTIONS
|
||||||
|
not_specified = 1
|
||||||
|
not_existing = 2
|
||||||
|
is_class = 3
|
||||||
|
no_text = 4
|
||||||
|
inconsistent = 5
|
||||||
|
OTHERS = 6.
|
||||||
|
rv_exists = boolc( sy-subrc = 0 OR sy-subrc = 4 ).
|
||||||
|
ENDMETHOD.
|
||||||
|
|
||||||
|
|
||||||
METHOD zif_abapgit_oo_object_fnc~get_includes.
|
METHOD zif_abapgit_oo_object_fnc~get_includes.
|
||||||
DATA lv_interface_name TYPE seoclsname.
|
DATA lv_interface_name TYPE seoclsname.
|
||||||
lv_interface_name = iv_object_name.
|
lv_interface_name = iv_object_name.
|
||||||
|
|
Loading…
Reference in New Issue
Block a user