anchor.diff:  
       DATA: lv_parent    TYPE enhspotcompositename,
             lv_spot_name TYPE enhspotname,
  -          lx_root      TYPE REF TO cx_root,
             lv_tool      TYPE enhspottooltype,
             lv_package   LIKE iv_package,
             li_spot_ref  TYPE REF TO if_enh_spot_tool,
  -          li_enhs      TYPE REF TO lif_object_enhs.
  -
  -    lv_spot_name = ms_item-obj_name.
  -
  -    io_xml->read( EXPORTING iv_name = 'TOOL'
  -                  CHANGING  cg_data = lv_tool ).
  +          li_enhs      TYPE REF TO lif_object_enhs,
  +          lx_root      TYPE REF TO cx_root.
   
       IF lif_object~exists( ) = abap_true.
         lif_object~delete( ).
       ENDIF.
   
  -    lv_package = iv_package.
  +    io_xml->read( EXPORTING iv_name = 'TOOL'
  +                  CHANGING  cg_data = lv_tool ).
  +
  +    lv_spot_name = ms_item-obj_name.
  +    lv_package   = iv_package.
   
       TRY.
           cl_enh_factory=>create_enhancement_spot(
  
positive.code:           lv_package         LIKE iv_package,
            li_enh_object      TYPE REF TO if_enh_object,
            li_enh_object_docu TYPE REF TO if_enh_object_docu,
            lx_error           TYPE REF TO cx_enh_root,
            lv_text            TYPE string.
  
      io_xml->read( EXPORTING iv_name = 'PARENT_COMP'
                    CHANGING  cg_data = lv_parent ).
  
negative.code:   METHOD lif_object~exists.
  
      DATA: lv_spot_name TYPE enhspotname,
            li_spot_ref  TYPE REF TO if_enh_spot_tool.
  
      lv_spot_name = ms_item-obj_name.
  
      TRY.
          li_spot_ref = cl_enh_factory=>get_enhancement_spot( lv_spot_name ).
  
          rv_bool = abap_true.
  
  