SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Merge branch 'master' into issue553

Browse Source
This commit is contained in:
Christian Tapia Sabogal 2017-01-20 11:40:14 -05:00 committed by GitHub
commit 0c48d5c0ca
3 changed files with 15 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/zabapgit_file_status.prog.abap
View File

@ -21,7 +21,8 @@ CLASS lcl_file_status DEFINITION FINAL
PRIVATE SECTION.
CLASS-METHODS calculate_status
IMPORTING it_local TYPE ty_files_item_tt
IMPORTING iv_devclass TYPE devclass
it_local TYPE ty_files_item_tt
it_remote TYPE ty_files_tt
it_cur_state TYPE ty_file_signatures_tt
RETURNING VALUE(rt_results) TYPE ty_results_tt.
@ -36,7 +37,8 @@ CLASS lcl_file_status DEFINITION FINAL
IMPORTING is_local TYPE ty_file_item
RETURNING VALUE(rs_result) TYPE ty_result,
build_new_remote
IMPORTING is_remote TYPE ty_file
IMPORTING iv_devclass TYPE devclass
is_remote TYPE ty_file
it_items TYPE ty_items_ts
it_state TYPE ty_file_signatures_ts
RETURNING VALUE(rs_result) TYPE ty_result,
@ -61,6 +63,8 @@ CLASS lcl_file_status IMPLEMENTATION.
rt_results = calculate_status(
iv_devclass = io_repo->get_package( )
it_local = io_repo->get_files_local( io_log = io_log )
it_remote = io_repo->get_files_remote( )
it_cur_state = io_repo->get_local_checksums_per_file( ) ).
@ -147,9 +151,10 @@ CLASS lcl_file_status IMPLEMENTATION.
" Process new remote files (marked above with empty SHA1)
LOOP AT lt_remote ASSIGNING <ls_remote> WHERE sha1 IS NOT INITIAL.
APPEND INITIAL LINE TO rt_results ASSIGNING <ls_result>.
<ls_result> = build_new_remote( is_remote = <ls_remote>
it_items = lt_items_idx
it_state = lt_state_idx ).
<ls_result> = build_new_remote( iv_devclass = iv_devclass
is_remote = <ls_remote>
it_items = lt_items_idx
it_state = lt_state_idx ).
ENDLOOP.
SORT rt_results BY
@ -278,7 +283,8 @@ CLASS lcl_file_status IMPLEMENTATION.
ENDIF.
" Item is in state and in cache but with no package - it was deleted
IF ls_item-devclass IS INITIAL.
" OR devclass is the same as repo package (see #532)
IF ls_item-devclass IS INITIAL OR ls_item-devclass = iv_devclass.
rs_result-match = abap_false.
rs_result-lstate = gc_state-deleted.
ENDIF.

4
src/zabapgit_object_tabl.prog.abap
View File

@ -106,7 +106,7 @@ CLASS lcl_object_tabl IMPLEMENTATION.
CALL FUNCTION 'RS_DD_DELETE_OBJ'
EXPORTING
no_ask = abap_false
no_ask = abap_true
objname = lv_objname
objtype = 'T'
EXCEPTIONS
@ -433,4 +433,4 @@ CLASS lcl_object_tabl IMPLEMENTATION.
ENDIF.
ENDMETHOD.
ENDCLASS. "lcl_object_TABL IMPLEMENTATION
ENDCLASS. "lcl_object_TABL IMPLEMENTATION

1
src/zabapgit_unit_test.prog.abap
View File

@ -1917,6 +1917,7 @@ CLASS ltcl_file_status IMPLEMENTATION.
lt_results_exp = lt_results.
lt_results = lcl_file_status=>calculate_status(
iv_devclass = '$Z$'
it_local = lt_local
it_remote = lt_remote
it_cur_state = lt_state ).