anchor.diff:      io_xml->add( iv_name = 'OBJM'
                    ig_data = lt_objm ).
   
  +    ls_tobj = read_extra( ls_objh-objectname ).
  +
  +    io_xml->add( iv_name = 'TOBJ'
  +                 ig_data = ls_tobj ).
  +
     ENDMETHOD.                    "serialize
   
     METHOD lif_object~deserialize.
  
positive.code: *
  *----------------------------------------------------------------------*
  CLASS lcl_object_tobj IMPLEMENTATION.
  
    METHOD lif_object~has_changed_since.
      rv_changed = abap_true.
  
negative.code:           ls_objt  TYPE objt,
            lt_objs  TYPE tt_objs,
            lt_objsl TYPE tt_objsl,
            lt_objm  TYPE tt_objm,
            ls_tobj  TYPE ty_tobj.
  
  
      io_xml->read( EXPORTING iv_name = 'OBJH'
  