anchor.diff:                                                    io_xml   TYPE REF TO lcl_xml
                                           RAISING lcx_exception.
   
  +    CLASS-METHODS: deserialize_docu IMPORTING is_item  TYPE st_item
  +                                              io_xml   TYPE REF TO lcl_xml
  +                                    RAISING lcx_exception.
  +
       CLASS-METHODS exists IMPORTING is_clskey TYPE seoclskey
                            RETURNING value(rv_exists) TYPE abap_bool.
   
  
positive.code:     CLASS-METHODS: read_abap IMPORTING is_item  TYPE st_item
                                         iv_extra TYPE string OPTIONAL
                                         it_files TYPE tt_files
                              CHANGING ct_abap TYPE STANDARD TABLE
                              RAISING lcx_exception.
  
  
negative.code:     CREATE OBJECT ro_xml.
      ro_xml->structure_add( ls_vseoclass ).
  
  
      lv_cp = cl_oo_classname_service=>get_classpool_name( is_clskey-clsname ).
      READ TEXTPOOL lv_cp INTO lt_tpool LANGUAGE sy-langu.
      ro_xml->table_add( lt_tpool ).
  
  
      lv_object = is_clskey-clsname.
      CALL FUNCTION 'DOCU_GET'
        EXPORTING
          id                = 'CL'
          langu             = 'E'
          object            = lv_object
        IMPORTING
          dokstate          = lv_state
        TABLES
          line              = lt_lines
        EXCEPTIONS
          no_docu_on_screen = 1
          no_docu_self_def  = 2
          no_docu_temp      = 3
          ret_code          = 4
          OTHERS            = 5.
      IF sy-subrc = 0 AND lv_state = 'R'.
        ro_xml->table_add( lt_lines ).
      ENDIF.
  
    ENDMETHOD.                    "serialize_xml
  
  