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

Merge pull request #466 from sbcgua/master

Browse Source 
W3xx deserialize, fix remote filesize change bug
This commit is contained in:
Lars Hvam 2016-11-26 12:13:26 +01:00 committed by GitHub
commit 6fbd5f996b
1 changed files with 26 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/zabapgit_object_w3xx.prog.abap
View File

@ -33,6 +33,11 @@ CLASS lcl_object_w3super DEFINITION INHERITING FROM lcl_objects_super ABSTRACT.
RETURNING VALUE(rv_ext) TYPE string RETURNING VALUE(rv_ext) TYPE string
RAISING lcx_exception. RAISING lcx_exception.
METHODS patch_size
IMPORTING iv_size TYPE i
CHANGING ct_params TYPE ty_wwwparams_tt
RAISING lcx_exception.
ENDCLASS. "lcl_object_W3SUPER DEFINITION ENDCLASS. "lcl_object_W3SUPER DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
@ -250,6 +255,12 @@ CLASS lcl_object_w3super IMPLEMENTATION.
lcx_exception=>raise( 'Wrong W3xx type' ). lcx_exception=>raise( 'Wrong W3xx type' ).
ENDCASE. ENDCASE.
" Update size of file (for the case file was actually changed remotely)
" Will also trigger "stage" at next sync if remote XML
" was not updated with the new file size
patch_size( EXPORTING iv_size = lv_size
CHANGING ct_params = lt_w3params ).
CALL FUNCTION 'WWWPARAMS_UPDATE' CALL FUNCTION 'WWWPARAMS_UPDATE'
TABLES TABLES
params = lt_w3params params = lt_w3params
@ -361,6 +372,21 @@ CLASS lcl_object_w3super IMPLEMENTATION.
ENDMETHOD. " get_ext. ENDMETHOD. " get_ext.
METHOD patch_size.
FIELD-SYMBOLS <param> LIKE LINE OF ct_params.
READ TABLE ct_params ASSIGNING <param> WITH KEY name = 'filesize'.
IF sy-subrc > 0.
lcx_exception=>raise( |W3xx: Cannot find file size for { ms_key-objid }| ).
ENDIF.
<param>-value = iv_size.
SHIFT <param>-value LEFT DELETING LEADING space.
ENDMETHOD. " patch_size.
METHOD lif_object~compare_to_remote_version. METHOD lif_object~compare_to_remote_version.
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result. CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
ENDMETHOD. ENDMETHOD.