mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 04:08:27 +08:00
52 lines
1.1 KiB
ABAP
52 lines
1.1 KiB
ABAP
*&---------------------------------------------------------------------*
|
|
*& Include ZABAPGIT_USER_EXITS
|
|
*&---------------------------------------------------------------------*
|
|
|
|
INTERFACE lif_exit.
|
|
|
|
METHODS:
|
|
change_local_host
|
|
CHANGING ct_hosts TYPE ZIF_ABAPGIT_DEFINITIONS=>ty_icm_sinfo2_tt,
|
|
allow_sap_objects
|
|
RETURNING VALUE(rv_allowed) TYPE abap_bool.
|
|
|
|
ENDINTERFACE.
|
|
|
|
* add class LCL_USER_EXIT implementing LIF_EXIT in following include,
|
|
* place the include in a different package than ZABAPGIT
|
|
INCLUDE zabapgit_user_exit IF FOUND.
|
|
|
|
*******************
|
|
|
|
CLASS lcl_exit DEFINITION FINAL.
|
|
|
|
PUBLIC SECTION.
|
|
CLASS-METHODS: get_instance RETURNING VALUE(ri_exit) TYPE REF TO lif_exit.
|
|
|
|
INTERFACES: lif_exit.
|
|
|
|
ENDCLASS.
|
|
|
|
CLASS lcl_exit IMPLEMENTATION.
|
|
|
|
METHOD get_instance.
|
|
|
|
TRY.
|
|
CREATE OBJECT ri_exit TYPE ('LCL_USER_EXIT').
|
|
CATCH cx_sy_create_object_error.
|
|
CREATE OBJECT ri_exit TYPE lcl_exit.
|
|
ENDTRY.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD lif_exit~change_local_host.
|
|
* default behavior
|
|
RETURN.
|
|
ENDMETHOD.
|
|
|
|
METHOD lif_exit~allow_sap_objects.
|
|
rv_allowed = abap_false.
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|