Removed last change timestamp as export date

This commit is contained in:
mrsimpson 2016-02-12 19:33:53 +00:00
parent 22d695cfb2
commit bd7aa464d2
4 changed files with 28 additions and 9 deletions

View File

@ -50,7 +50,13 @@ CLASS lcl_saplink_adapter IMPLEMENTATION.
TRY.
DATA(ixmldoc) = mo_saplink->createixmldocfromobject( ).
CATCH zcx_saplink INTO DATA(lx_saplink).
RAISE EXCEPTION TYPE lcx_exception EXPORTING iv_text = lx_saplink->get_text( ).
IF lx_saplink->textid = zcx_saplink=>not_found.
* ABAPGit tries to serialize also locally non-existent objects which it found in a git repo=>
* don't create a file in this case, simply
RETURN. ">>>>>>>>>>>>>>>>>>>>>>>>>
ELSE.
RAISE EXCEPTION TYPE lcx_exception EXPORTING iv_text = lx_saplink->get_text( ).
ENDIF.
ENDTRY.
mo_files->add_xml( NEW lcl_xml( iv_xml = zsaplink=>convertixmldoctostring( ixmldoc ) ) ).

View File

@ -15,7 +15,8 @@ CLASS zsaplink_generic_obj DEFINITION
METHODS constructor
IMPORTING
!name TYPE string .
!name TYPE string
include_last_changed type abap_bool OPTIONAL.
METHODS checkexists
REDEFINITION .
@ -52,9 +53,12 @@ CLASS zsaplink_generic_obj DEFINITION
METHODS deleteobject
REDEFINITION .
PRIVATE SECTION.
DATA mo_xml_bridge TYPE REF TO lcl_tlogo_xml_bridge .
data include_last_changed type abap_bool.
CONSTANTS co_xml_metadata TYPE string VALUE 'objMetaData' ##NO_TEXT.
METHODS get_xml_bridge
@ -121,6 +125,8 @@ CLASS ZSAPLINK_GENERIC_OBJ IMPLEMENTATION.
*\---------------------------------------------------------------------/
super->constructor( name = name ).
me->include_last_changed = include_last_changed.
ENDMETHOD.
@ -191,7 +197,9 @@ CLASS ZSAPLINK_GENERIC_OBJ IMPLEMENTATION.
METHOD get_xml_bridge.
IF mo_xml_bridge IS INITIAL.
* can't be called in the constructor as getObjectType is intended to be polymorphic
mo_xml_bridge = NEW lcl_tlogo_xml_bridge( i_tlogo = CONV #( me->getobjecttype( ) ) ).
mo_xml_bridge = NEW lcl_tlogo_xml_bridge(
i_tlogo = CONV #( me->getobjecttype( ) )
iv_include_last_changed = me->include_last_changed ).
ENDIF.
ro_xml_bridge = mo_xml_bridge.

View File

@ -29,6 +29,7 @@ CLASS lcl_rso_tlogo_xml_bridge DEFINITION
METHODS constructor
IMPORTING
!i_tlogo TYPE rstlogo
iv_include_last_changed type abap_bool optional
EXCEPTIONS
tlogo_doesnt_exist .
METHODS parse_xml
@ -92,6 +93,7 @@ CLASS lcl_rso_tlogo_xml_bridge DEFINITION
DATA p_ts_objsl TYPE pt_ts_objsl .
DATA p_ts_tlogo_tables TYPE pt_ts_tlogo_tables .
DATA p_timestmp TYPE rstimestmp .
data mv_include_last_changed type abap_bool.
METHODS read_tlogo_prop .
ENDCLASS.

View File

@ -143,12 +143,14 @@ WITH UNIQUE KEY num.
CLEAR l_value.
l_r_element_transport = l_r_document->create_element( name = l_name ).
l_rc = l_r_document->append_child( l_r_element_transport ).
* XML: date (for comparison with object, last changed )
l_name = if_rso_object_xmic=>timestmp.
GET TIME STAMP FIELD l_timestmp.
l_value = cl_rso_repository=>timestamp_to_xml( l_timestmp ).
l_r_element = l_r_document->create_simple_element(
name = l_name value = l_value parent = l_r_element_transport ).
* XML: date (for comparison with object, last changed ) - modified oj: Do not always include this element
IF mv_include_last_changed = abap_true.
l_name = if_rso_object_xmic=>timestmp.
GET TIME STAMP FIELD l_timestmp.
l_value = cl_rso_repository=>timestamp_to_xml( l_timestmp ).
l_r_element = l_r_document->create_simple_element(
name = l_name value = l_value parent = l_r_element_transport ).
ENDIF.
* parse all tables of this TLOGO object
LOOP AT p_ts_objsl ASSIGNING <l_s_objsl>.
@ -345,6 +347,7 @@ WITH UNIQUE KEY num.
p_tlogo = i_tlogo.
CALL METHOD read_tlogo_prop.
mv_include_last_changed = iv_include_last_changed.
ENDMETHOD. "