mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 04:08:27 +08:00
e74e03f5a5
* typo corrected "Guide for installing bundle" * zcl_abapgit_factory naming convention https://github.com/larshp/abapGit/issues/1132
110 lines
2.8 KiB
ABAP
110 lines
2.8 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,
|
|
|
|
set_sap_package
|
|
IMPORTING
|
|
iv_package TYPE devclass
|
|
ii_sap_package TYPE REF TO zif_abapgit_sap_package,
|
|
|
|
set_code_inspector
|
|
IMPORTING
|
|
iv_package TYPE devclass
|
|
iv_check_variant_name TYPE sci_chkv OPTIONAL
|
|
ii_code_inspector TYPE REF TO zif_abapgit_code_inspector,
|
|
|
|
set_syntax_check
|
|
IMPORTING
|
|
iv_package TYPE devclass
|
|
ii_syntax_check TYPE REF TO zif_abapgit_code_inspector.
|
|
|
|
ENDCLASS.
|
|
|
|
|
|
|
|
CLASS zcl_abapgit_injector IMPLEMENTATION.
|
|
|
|
METHOD set_tadir.
|
|
|
|
zcl_abapgit_factory=>gi_tadir = ii_tadir.
|
|
|
|
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_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
|
|
check_variant_name = iv_check_variant_name.
|
|
IF sy-subrc <> 0.
|
|
|
|
ls_code_inspector-package = iv_package.
|
|
ls_code_inspector-check_variant_name = iv_check_variant_name.
|
|
|
|
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_syntax_check.
|
|
|
|
DATA: ls_syntax_check LIKE LINE OF zcl_abapgit_factory=>gt_syntax_check.
|
|
FIELD-SYMBOLS: <ls_syntax_check> LIKE LINE OF zcl_abapgit_factory=>gt_syntax_check.
|
|
|
|
READ TABLE zcl_abapgit_factory=>gt_syntax_check
|
|
ASSIGNING <ls_syntax_check>
|
|
WITH TABLE KEY package = iv_package.
|
|
IF sy-subrc <> 0.
|
|
|
|
ls_syntax_check-package = iv_package.
|
|
|
|
INSERT ls_syntax_check
|
|
INTO TABLE zcl_abapgit_factory=>gt_syntax_check
|
|
ASSIGNING <ls_syntax_check>.
|
|
|
|
ENDIF.
|
|
|
|
<ls_syntax_check>-instance = ii_syntax_check.
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|