anchor.diff:    PUBLIC SECTION.
       INTERFACES lif_object.
       ALIASES mo_files FOR lif_object~mo_files.
  +
  +  PRIVATE SECTION.
  +    TYPES: BEGIN OF ty_t100_texts,
  +           sprsl TYPE t100-sprsl,
  +           msgnr TYPE t100-msgnr,
  +           text  TYPE t100-text,
  +           END OF ty_t100_texts,
  +           tt_t100_texts  TYPE STANDARD TABLE OF ty_t100_texts.
  +
  +    METHODS:
  +      serialize_texts
  +        IMPORTING io_xml TYPE REF TO lcl_xml_output
  +        RAISING   lcx_exception,
  +      deserialize_texts
  +        IMPORTING io_xml        TYPE REF TO lcl_xml_input
  +        RAISING   lcx_exception.
  +
   
   ENDCLASS.                    "lcl_object_msag DEFINITION
   
  
positive.code:     io_xml->add( ig_data = lt_source
                   iv_name = 'T100' ).
  
  
    ENDMETHOD.                    "serialize
  
    METHOD lif_object~compare_to_remote_version.
      CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
  
negative.code:     ls_t100a-ldate = sy-datum.
      ls_t100a-ltime = sy-uzeit.
      MODIFY t100a FROM ls_t100a.                           "#EC CI_SUBRC
      IF sy-subrc <> 0.
        lcx_exception=>raise( 'MSAG: Table T100A modify failed' ).
      ENDIF.
  
      ls_t100t-sprsl = mv_language.
      ls_t100t-arbgb = ls_t100a-arbgb.
      ls_t100t-stext = ls_t100a-stext.
      MODIFY t100t FROM ls_t100t.                           "#EC CI_SUBRC
      IF sy-subrc <> 0.
        lcx_exception=>raise( 'MSAG: Table T100T modify failed' ).
      ENDIF.
  
      LOOP AT lt_before INTO ls_t100u.
        DELETE FROM t100 WHERE arbgb = ls_t100u-arbgb AND msgnr = ls_t100u-msgnr.
        DELETE FROM t100u WHERE arbgb = ls_t100u-arbgb AND msgnr = ls_t100u-msgnr.
      ENDLOOP.
  
      deserialize_texts( io_xml = io_xml ).
  
  
    ENDMETHOD.                    "deserialize
  
    METHOD lif_object~serialize.
  