diff --git a/src/objects/zif_abapgit_comparison_result.intf.abap b/src/objects/zif_abapgit_comparison_result.intf.abap new file mode 100644 index 000000000..c4ff882c6 --- /dev/null +++ b/src/objects/zif_abapgit_comparison_result.intf.abap @@ -0,0 +1,8 @@ +INTERFACE zif_abapgit_comparison_result PUBLIC. + + METHODS: + show_confirmation_dialog, + is_result_complete_halt + RETURNING VALUE(rv_response) TYPE abap_bool. + +ENDINTERFACE. diff --git a/src/objects/zif_abapgit_comparison_result.intf.xml b/src/objects/zif_abapgit_comparison_result.intf.xml new file mode 100644 index 000000000..b6fa7a885 --- /dev/null +++ b/src/objects/zif_abapgit_comparison_result.intf.xml @@ -0,0 +1,16 @@ + + + + + + ZIF_ABAPGIT_COMPARISON_RESULT + 1 + E + Comparison result + 2 + 1 + X + + + + diff --git a/src/objects/zif_abapgit_object.intf.abap b/src/objects/zif_abapgit_object.intf.abap new file mode 100644 index 000000000..6b64bfdf6 --- /dev/null +++ b/src/objects/zif_abapgit_object.intf.abap @@ -0,0 +1,35 @@ +INTERFACE zif_abapgit_object PUBLIC. + + METHODS: + serialize + IMPORTING io_xml TYPE REF TO zcl_abapgit_xml_output + RAISING zcx_abapgit_exception, + deserialize + IMPORTING iv_package TYPE devclass + io_xml TYPE REF TO zcl_abapgit_xml_input + RAISING zcx_abapgit_exception, + delete + RAISING zcx_abapgit_exception, + exists + RETURNING VALUE(rv_bool) TYPE abap_bool + RAISING zcx_abapgit_exception, + changed_by + RETURNING VALUE(rv_user) TYPE xubname + RAISING zcx_abapgit_exception, + jump + RAISING zcx_abapgit_exception, + get_metadata + RETURNING VALUE(rs_metadata) TYPE zif_abapgit_definitions=>ty_metadata, + has_changed_since + IMPORTING iv_timestamp TYPE timestamp + RETURNING VALUE(rv_changed) TYPE abap_bool + RAISING zcx_abapgit_exception. + METHODS: + compare_to_remote_version + IMPORTING io_remote_version_xml TYPE REF TO zcl_abapgit_xml_input + RETURNING VALUE(ro_comparison_result) TYPE REF TO zif_abapgit_comparison_result + RAISING zcx_abapgit_exception. + + DATA: mo_files TYPE REF TO zcl_abapgit_objects_files. + +ENDINTERFACE. diff --git a/src/objects/zif_abapgit_object.intf.xml b/src/objects/zif_abapgit_object.intf.xml new file mode 100644 index 000000000..7b2308644 --- /dev/null +++ b/src/objects/zif_abapgit_object.intf.xml @@ -0,0 +1,16 @@ + + + + + + ZIF_ABAPGIT_OBJECT + 1 + E + Object + 2 + 1 + X + + + + diff --git a/src/zabapgit_object_acid.prog.abap b/src/zabapgit_object_acid.prog.abap index 908bf7352..e2d2ec95f 100644 --- a/src/zabapgit_object_acid.prog.abap +++ b/src/zabapgit_object_acid.prog.abap @@ -10,8 +10,8 @@ CLASS lcl_object_acid DEFINITION INHERITING FROM lcl_objects_super FINAL. PUBLIC SECTION. - INTERFACES lif_object. - ALIASES mo_files FOR lif_object~mo_files. + INTERFACES zif_abapgit_object. + ALIASES mo_files FOR zif_abapgit_object~mo_files. PRIVATE SECTION. METHODS: create_object @@ -27,15 +27,15 @@ ENDCLASS. "lcl_object_acid DEFINITION *----------------------------------------------------------------------* CLASS lcl_object_acid IMPLEMENTATION. - METHOD lif_object~has_changed_since. + METHOD zif_abapgit_object~has_changed_since. rv_changed = abap_true. ENDMETHOD. "lif_object~has_changed_since - METHOD lif_object~get_metadata. + METHOD zif_abapgit_object~get_metadata. rs_metadata = get_metadata( ). ENDMETHOD. "lif_object~get_metadata - METHOD lif_object~changed_by. + METHOD zif_abapgit_object~changed_by. * looks like "changed by user" is not stored in the database rv_user = c_user_unknown. ENDMETHOD. @@ -59,13 +59,13 @@ CLASS lcl_object_acid IMPLEMENTATION. ENDMETHOD. "create_object - METHOD lif_object~serialize. + METHOD zif_abapgit_object~serialize. DATA: lo_aab TYPE REF TO cl_aab_id, lv_description TYPE aab_id_descript. - IF lif_object~exists( ) = abap_false. + IF zif_abapgit_object~exists( ) = abap_false. RETURN. ENDIF. @@ -80,7 +80,7 @@ CLASS lcl_object_acid IMPLEMENTATION. ENDMETHOD. "lif_object~serialize - METHOD lif_object~deserialize. + METHOD zif_abapgit_object~deserialize. DATA: lv_description TYPE aab_id_descript, lo_aab TYPE REF TO cl_aab_id. @@ -97,7 +97,7 @@ CLASS lcl_object_acid IMPLEMENTATION. ENDMETHOD. "lif_object~deserialize - METHOD lif_object~delete. + METHOD zif_abapgit_object~delete. DATA: lo_aab TYPE REF TO cl_aab_id. @@ -123,7 +123,7 @@ CLASS lcl_object_acid IMPLEMENTATION. ENDMETHOD. "lif_object~delete - METHOD lif_object~exists. + METHOD zif_abapgit_object~exists. DATA: lv_state TYPE flag, lo_aab TYPE REF TO cl_aab_id. @@ -138,7 +138,7 @@ CLASS lcl_object_acid IMPLEMENTATION. ENDMETHOD. "lif_object~exists - METHOD lif_object~jump. + METHOD zif_abapgit_object~jump. CALL FUNCTION 'RS_TOOL_ACCESS' EXPORTING @@ -149,7 +149,7 @@ CLASS lcl_object_acid IMPLEMENTATION. ENDMETHOD. "lif_object~jump - METHOD lif_object~compare_to_remote_version. + METHOD zif_abapgit_object~compare_to_remote_version. CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null. ENDMETHOD. diff --git a/src/zabapgit_object_auth.prog.abap b/src/zabapgit_object_auth.prog.abap index 12d58651d..aea3ed1d9 100644 --- a/src/zabapgit_object_auth.prog.abap +++ b/src/zabapgit_object_auth.prog.abap @@ -10,8 +10,8 @@ CLASS lcl_object_auth DEFINITION INHERITING FROM lcl_objects_super FINAL. PUBLIC SECTION. - INTERFACES lif_object. - ALIASES mo_files FOR lif_object~mo_files. + INTERFACES zif_abapgit_object. + ALIASES mo_files FOR zif_abapgit_object~mo_files. ENDCLASS. "lcl_object_auth DEFINITION @@ -22,20 +22,20 @@ ENDCLASS. "lcl_object_auth DEFINITION *----------------------------------------------------------------------* CLASS lcl_object_auth IMPLEMENTATION. - METHOD lif_object~has_changed_since. + METHOD zif_abapgit_object~has_changed_since. rv_changed = abap_true. ENDMETHOD. "lif_object~has_changed_since - METHOD lif_object~get_metadata. + METHOD zif_abapgit_object~get_metadata. rs_metadata = get_metadata( ). ENDMETHOD. "lif_object~get_metadata - METHOD lif_object~changed_by. + METHOD zif_abapgit_object~changed_by. * looks like "changed by user" is not stored in the database rv_user = c_user_unknown. ENDMETHOD. - METHOD lif_object~serialize. + METHOD zif_abapgit_object~serialize. DATA: ls_authx TYPE authx. @@ -51,7 +51,7 @@ CLASS lcl_object_auth IMPLEMENTATION. ENDMETHOD. "lif_object~serialize - METHOD lif_object~deserialize. + METHOD zif_abapgit_object~deserialize. * see include LSAUT_FIELDF02 DATA: ls_authx TYPE authx, @@ -77,7 +77,7 @@ CLASS lcl_object_auth IMPLEMENTATION. ENDMETHOD. "lif_object~deserialize - METHOD lif_object~delete. + METHOD zif_abapgit_object~delete. DATA: lv_fieldname TYPE authx-fieldname. @@ -101,7 +101,7 @@ CLASS lcl_object_auth IMPLEMENTATION. ENDMETHOD. "lif_object~delete - METHOD lif_object~exists. + METHOD zif_abapgit_object~exists. DATA: lv_fieldname TYPE authx-fieldname. @@ -113,7 +113,7 @@ CLASS lcl_object_auth IMPLEMENTATION. ENDMETHOD. "lif_object~exists - METHOD lif_object~jump. + METHOD zif_abapgit_object~jump. DATA: field TYPE fieldname. @@ -126,7 +126,7 @@ CLASS lcl_object_auth IMPLEMENTATION. ENDMETHOD. "lif_object~jump - METHOD lif_object~compare_to_remote_version. + METHOD zif_abapgit_object~compare_to_remote_version. CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null. ENDMETHOD. diff --git a/src/zabapgit_object_clas.prog.abap b/src/zabapgit_object_clas.prog.abap index 13b6bd3f9..a326f9582 100644 --- a/src/zabapgit_object_clas.prog.abap +++ b/src/zabapgit_object_clas.prog.abap @@ -10,8 +10,8 @@ CLASS lcl_object_clas DEFINITION INHERITING FROM lcl_objects_program. PUBLIC SECTION. - INTERFACES lif_object. - ALIASES mo_files FOR lif_object~mo_files. + INTERFACES zif_abapgit_object. + ALIASES mo_files FOR zif_abapgit_object~mo_files. METHODS constructor IMPORTING is_item TYPE zif_abapgit_definitions=>ty_item @@ -49,7 +49,7 @@ ENDCLASS. "lcl_object_dtel DEFINITION *----------------------------------------------------------------------* CLASS lcl_object_clas IMPLEMENTATION. - METHOD lif_object~has_changed_since. + METHOD zif_abapgit_object~has_changed_since. DATA: lt_includes TYPE seoincl_t. @@ -65,13 +65,13 @@ CLASS lcl_object_clas IMPLEMENTATION. RETURN. ENDIF. ENDLOOP. - ENDMETHOD. "lif_object~has_changed_since + ENDMETHOD. "zif_abapgit_object~has_changed_since - METHOD lif_object~get_metadata. + METHOD zif_abapgit_object~get_metadata. rs_metadata = get_metadata( ). - ENDMETHOD. "lif_object~get_metadata + ENDMETHOD. "zif_abapgit_object~get_metadata - METHOD lif_object~changed_by. + METHOD zif_abapgit_object~changed_by. TYPES: BEGIN OF ty_includes, programm TYPE programm, @@ -106,14 +106,14 @@ CLASS lcl_object_clas IMPLEMENTATION. ENDMETHOD. - METHOD lif_object~exists. + METHOD zif_abapgit_object~exists. DATA: ls_class_key TYPE seoclskey. ls_class_key-clsname = ms_item-obj_name. rv_bool = mo_object_oriented_object_fct->exists( iv_object_name = ls_class_key ). - ENDMETHOD. "lif_object~exists + ENDMETHOD. "zif_abapgit_object~exists - METHOD lif_object~jump. + METHOD zif_abapgit_object~jump. CALL FUNCTION 'RS_TOOL_ACCESS' EXPORTING operation = 'SHOW' @@ -122,21 +122,21 @@ CLASS lcl_object_clas IMPLEMENTATION. in_new_window = abap_true. ENDMETHOD. "jump - METHOD lif_object~delete. + METHOD zif_abapgit_object~delete. DATA: ls_clskey TYPE seoclskey. ls_clskey-clsname = ms_item-obj_name. mo_object_oriented_object_fct->delete( ls_clskey ). ENDMETHOD. "delete - METHOD lif_object~serialize. + METHOD zif_abapgit_object~serialize. DATA: lt_source TYPE seop_source_string, ls_class_key TYPE seoclskey. ls_class_key-clsname = ms_item-obj_name. - IF lif_object~exists( ) = abap_false. + IF zif_abapgit_object~exists( ) = abap_false. RETURN. ENDIF. @@ -265,7 +265,7 @@ CLASS lcl_object_clas IMPLEMENTATION. ENDMETHOD. "serialize_xml - METHOD lif_object~deserialize. + METHOD zif_abapgit_object~deserialize. deserialize_abap( io_xml = io_xml iv_package = iv_package ). @@ -396,7 +396,7 @@ CLASS lcl_object_clas IMPLEMENTATION. mo_object_oriented_object_fct->add_to_activation_list( ms_item ). ENDMETHOD. "deserialize - METHOD lif_object~compare_to_remote_version. + METHOD zif_abapgit_object~compare_to_remote_version. CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null. ENDMETHOD. diff --git a/src/zabapgit_object_cmpt.prog.abap b/src/zabapgit_object_cmpt.prog.abap index 2fc0de5d8..deaead207 100644 --- a/src/zabapgit_object_cmpt.prog.abap +++ b/src/zabapgit_object_cmpt.prog.abap @@ -11,7 +11,7 @@ CLASS lcl_object_cmpt DEFINITION INHERITING FROM lcl_objects_super FINAL. is_item TYPE zif_abapgit_definitions=>ty_item iv_language TYPE spras. - INTERFACES lif_object. + INTERFACES zif_abapgit_object. PRIVATE SECTION. DATA: mo_cmp_db TYPE REF TO object. @@ -35,13 +35,13 @@ CLASS lcl_object_cmpt IMPLEMENTATION. ENDMETHOD. - METHOD lif_object~has_changed_since. + METHOD zif_abapgit_object~has_changed_since. rv_changed = abap_true. ENDMETHOD. - METHOD lif_object~changed_by. + METHOD zif_abapgit_object~changed_by. DATA: mi_cmp_template TYPE REF TO object. @@ -63,14 +63,14 @@ CLASS lcl_object_cmpt IMPLEMENTATION. ENDMETHOD. - METHOD lif_object~get_metadata. + METHOD zif_abapgit_object~get_metadata. rs_metadata = get_metadata( ). rs_metadata-delete_tadir = abap_true. ENDMETHOD. - METHOD lif_object~exists. + METHOD zif_abapgit_object~exists. DATA: name TYPE c LENGTH 30. @@ -90,7 +90,7 @@ CLASS lcl_object_cmpt IMPLEMENTATION. ENDMETHOD. - METHOD lif_object~serialize. + METHOD zif_abapgit_object~serialize. DATA: lr_template TYPE REF TO data. FIELD-SYMBOLS: