diff --git a/src/zcl_abapgit_migrations.clas.abap b/src/zcl_abapgit_migrations.clas.abap index 45950a5a6..2e609ce27 100644 --- a/src/zcl_abapgit_migrations.clas.abap +++ b/src/zcl_abapgit_migrations.clas.abap @@ -7,11 +7,9 @@ CLASS zcl_abapgit_migrations DEFINITION CLASS-METHODS run RAISING zcx_abapgit_exception. + PROTECTED SECTION. PRIVATE SECTION. - CLASS-METHODS rebuild_local_checksums_161112 - RAISING - zcx_abapgit_exception . CLASS-METHODS local_dot_abapgit RAISING zcx_abapgit_exception . @@ -47,56 +45,11 @@ CLASS ZCL_ABAPGIT_MIGRATIONS IMPLEMENTATION. ENDMETHOD. - METHOD rebuild_local_checksums_161112. - - DATA: lt_repos TYPE zif_abapgit_definitions=>ty_repo_ref_tt, - lv_repo_list TYPE string, - lv_index TYPE i. - - FIELD-SYMBOLS: LIKE LINE OF lt_repos. - - - lt_repos = zcl_abapgit_repo_srv=>get_instance( )->list( ). - - LOOP AT lt_repos ASSIGNING . - lv_index = sy-tabix. - - IF ->is_offline( ) = abap_true. " Skip local repos - DELETE lt_repos INDEX lv_index. - CONTINUE. - ENDIF. - - " Ignore empty repos or repos with file checksums - IF lines( ->get_local_checksums( ) ) = 0 - OR lines( ->get_local_checksums_per_file( ) ) > 0. - DELETE lt_repos INDEX lv_index. - CONTINUE. - ENDIF. - - lv_repo_list = lv_repo_list && `, ` && ->get_name( ). - ENDLOOP. - - IF lines( lt_repos ) = 0. - RETURN. " All OK - ENDIF. - - CALL FUNCTION 'POPUP_TO_INFORM' - EXPORTING - titel = 'Migration' - txt1 = 'Automatic migration of local checksums removed' - txt2 = 'Remove all repos and install latest abapGit version'. - - ENDMETHOD. - - METHOD run. " Migrate STDTEXT to TABLE zcl_abapgit_persist_migrate=>run( ). - " Rebuild local file checksums - rebuild_local_checksums_161112( ). - " local .abapgit.xml state, issue #630 local_dot_abapgit( ).