anchor.diff:  CLASS lcl_serialize_doma IMPLEMENTATION.
   
     METHOD delete.
  -    _raise 'todo, delete, doma'.
  +* see class CL_WB_DDIC
  +
  +    DATA: lv_objname TYPE rsedd0-ddobjname.
  +
  +
  +    lv_objname = is_item-obj_name.
  +
  +    CALL FUNCTION 'RS_DD_DELETE_OBJ'
  +      EXPORTING
  +        no_ask               = abap_true
  +        objname              = lv_objname
  +        objtype              = 'D'
  +      EXCEPTIONS
  +        not_executed         = 1
  +        object_not_found     = 2
  +        object_not_specified = 3
  +        permission_failure   = 4.
  +    IF sy-subrc <> 0.
  +      _raise 'error from RS_DD_DELETE_OBJ, DOMA'.
  +    ENDIF.
  +
     ENDMETHOD.                    "delete
   
     METHOD serialize.
  
positive.code: 
    METHOD delete.
  
      _raise 'todo, delete ttyp'.
  
    ENDMETHOD.                    "delete
  
  
negative.code: 
    METHOD delete.
  
      DATA: lv_objname TYPE rsedd0-ddobjname.
  
  
      lv_objname = is_item-obj_name.
  
      CALL FUNCTION 'RS_DD_DELETE_OBJ'
        EXPORTING
          no_ask               = abap_true
          objname              = lv_objname
          objtype              = 'H'
        EXCEPTIONS
          not_executed         = 1
          object_not_found     = 2
          object_not_specified = 3
          permission_failure   = 4.
      IF sy-subrc <> 0.
        _raise 'error from RS_DD_DELETE_OBJ, SHLP'.
      ENDIF.
  
    ENDMETHOD.                    "delete
  
  