diff --git a/src/objects/aff/zcl_abapgit_aff_registry.clas.abap b/src/objects/aff/zcl_abapgit_aff_registry.clas.abap index 2486ae95b..39d81b330 100644 --- a/src/objects/aff/zcl_abapgit_aff_registry.clas.abap +++ b/src/objects/aff/zcl_abapgit_aff_registry.clas.abap @@ -49,6 +49,7 @@ CLASS zcl_abapgit_aff_registry IMPLEMENTATION. register( 'CHKC' ). register( 'CHKO' ). register( 'CHKV' ). + register( 'DRTY' ). register( 'EVTB' ). register( 'EEEC' ). register( 'GSMP' ). diff --git a/src/objects/aff/zcl_abapgit_object_drty.clas.abap b/src/objects/aff/zcl_abapgit_object_drty.clas.abap new file mode 100644 index 000000000..9137eb7b2 --- /dev/null +++ b/src/objects/aff/zcl_abapgit_object_drty.clas.abap @@ -0,0 +1,53 @@ +CLASS zcl_abapgit_object_drty DEFINITION + PUBLIC + INHERITING FROM zcl_abapgit_object_common_aff + FINAL + CREATE PUBLIC . + + PUBLIC SECTION. + METHODS zif_abapgit_object~changed_by REDEFINITION. + METHODS zif_abapgit_object~get_deserialize_steps REDEFINITION. + PROTECTED SECTION. + METHODS get_additional_extensions REDEFINITION. + PRIVATE SECTION. +ENDCLASS. + + + +CLASS zcl_abapgit_object_drty IMPLEMENTATION. + METHOD zif_abapgit_object~changed_by. + + DATA: lo_drty_handler TYPE REF TO object, + lv_object_key TYPE seu_objkey, + lx_error TYPE REF TO cx_root. + + TRY. + lv_object_key = ms_item-obj_name. + CALL METHOD ('CL_DRTY_AFF_OBJECT_HANDLER')=>('GET_DDIC_HANDLER') + EXPORTING + object_key = lv_object_key + RECEIVING + handler = lo_drty_handler. + + CALL METHOD lo_drty_handler->('GET_CHANGED_BY') + RECEIVING + rv_changed_by = rv_user. + + CATCH cx_root INTO lx_error. + zcx_abapgit_exception=>raise_with_text( lx_error ). + ENDTRY. + ENDMETHOD. + + METHOD zif_abapgit_object~get_deserialize_steps. + APPEND zif_abapgit_object=>gc_step_id-ddic TO rt_steps. + ENDMETHOD. + + METHOD get_additional_extensions. + DATA ls_additional_extension LIKE LINE OF rv_additional_extensions. + ls_additional_extension-extension = 'acds'. + CALL METHOD ('CL_CDS_AFF_FILE_NAME_MAPPER')=>for_cds + RECEIVING + result = ls_additional_extension-file_name_mapper. + APPEND ls_additional_extension TO rv_additional_extensions. + ENDMETHOD. +ENDCLASS. \ No newline at end of file diff --git a/src/objects/aff/zcl_abapgit_object_drty.clas.xml b/src/objects/aff/zcl_abapgit_object_drty.clas.xml new file mode 100644 index 000000000..498b593d6 --- /dev/null +++ b/src/objects/aff/zcl_abapgit_object_drty.clas.xml @@ -0,0 +1,16 @@ + + + + + + ZCL_ABAPGIT_OBJECT_DRTY + E + abapGit - DRTY - CDS Type + 1 + X + X + X + + + +