mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-02 13:03:01 +08:00
543114963f
* abapOpenChecks config file
* Ignore SCI config folder
* checks revision
* Revert "checks revision"
This reverts commit 56a12289df.
* Renaming non-constants
Pending:
* Remove SCI configuration
Co-authored-by: Lars Hvam <larshp@hotmail.com>
104 lines
2.4 KiB
ABAP
104 lines
2.4 KiB
ABAP
CLASS zcl_abapgit_injector DEFINITION
|
|
PUBLIC
|
|
CREATE PRIVATE
|
|
FOR TESTING .
|
|
|
|
PUBLIC SECTION.
|
|
|
|
CLASS-METHODS set_tadir
|
|
IMPORTING
|
|
!ii_tadir TYPE REF TO zif_abapgit_tadir .
|
|
CLASS-METHODS set_sap_package
|
|
IMPORTING
|
|
!iv_package TYPE devclass
|
|
!ii_sap_package TYPE REF TO zif_abapgit_sap_package .
|
|
CLASS-METHODS set_code_inspector
|
|
IMPORTING
|
|
!iv_package TYPE devclass
|
|
!ii_code_inspector TYPE REF TO zif_abapgit_code_inspector .
|
|
CLASS-METHODS set_stage_logic
|
|
IMPORTING
|
|
!ii_logic TYPE REF TO zif_abapgit_stage_logic .
|
|
CLASS-METHODS set_cts_api
|
|
IMPORTING
|
|
!ii_cts_api TYPE REF TO zif_abapgit_cts_api .
|
|
CLASS-METHODS set_environment
|
|
IMPORTING
|
|
!ii_environment TYPE REF TO zif_abapgit_environment .
|
|
PROTECTED SECTION.
|
|
PRIVATE SECTION.
|
|
ENDCLASS.
|
|
|
|
|
|
|
|
CLASS ZCL_ABAPGIT_INJECTOR IMPLEMENTATION.
|
|
|
|
|
|
METHOD set_code_inspector.
|
|
|
|
DATA: ls_code_inspector LIKE LINE OF zcl_abapgit_factory=>gt_code_inspector.
|
|
FIELD-SYMBOLS: <ls_code_inspector> LIKE LINE OF zcl_abapgit_factory=>gt_code_inspector.
|
|
|
|
READ TABLE zcl_abapgit_factory=>gt_code_inspector
|
|
ASSIGNING <ls_code_inspector>
|
|
WITH TABLE KEY package = iv_package.
|
|
IF sy-subrc <> 0.
|
|
|
|
ls_code_inspector-package = iv_package.
|
|
|
|
INSERT ls_code_inspector
|
|
INTO TABLE zcl_abapgit_factory=>gt_code_inspector
|
|
ASSIGNING <ls_code_inspector>.
|
|
|
|
ENDIF.
|
|
|
|
<ls_code_inspector>-instance = ii_code_inspector.
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD set_cts_api.
|
|
zcl_abapgit_factory=>gi_cts_api = ii_cts_api.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD set_environment.
|
|
zcl_abapgit_factory=>gi_environment = ii_environment.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD set_sap_package.
|
|
|
|
DATA: ls_sap_package TYPE zcl_abapgit_factory=>ty_sap_package.
|
|
FIELD-SYMBOLS: <ls_sap_package> TYPE zcl_abapgit_factory=>ty_sap_package.
|
|
|
|
READ TABLE zcl_abapgit_factory=>gt_sap_package
|
|
ASSIGNING <ls_sap_package>
|
|
WITH TABLE KEY package = iv_package.
|
|
|
|
IF sy-subrc <> 0.
|
|
|
|
ls_sap_package-package = iv_package.
|
|
INSERT ls_sap_package
|
|
INTO TABLE zcl_abapgit_factory=>gt_sap_package
|
|
ASSIGNING <ls_sap_package>.
|
|
|
|
ENDIF.
|
|
|
|
<ls_sap_package>-instance = ii_sap_package.
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD set_stage_logic.
|
|
|
|
zcl_abapgit_factory=>gi_stage_logic = ii_logic.
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD set_tadir.
|
|
zcl_abapgit_factory=>gi_tadir = ii_tadir.
|
|
ENDMETHOD.
|
|
ENDCLASS.
|