anchor.diff:    PROTECTED SECTION.
       TYPES: ty_spaces_tt TYPE STANDARD TABLE OF i WITH DEFAULT KEY.
   
  +    TYPES: BEGIN OF ty_tpool.
  +        INCLUDE TYPE textpool.
  +    TYPES:   split TYPE c LENGTH 8.
  +    TYPES: END OF ty_tpool.
  +
  +    TYPES: ty_tpool_tt TYPE STANDARD TABLE OF ty_tpool WITH DEFAULT KEY.
  +
       TYPES: BEGIN OF ty_dynpro,
                header     TYPE rpy_dyhead,
                containers TYPE dycatt_tab,
  
positive.code:     rs_metadata-version = 'v1.0.0' ##no_text.
    ENDMETHOD.                    "get_metadata
  
    METHOD add_tpool.
  
      FIELD-SYMBOLS: <ls_tpool_in>  LIKE LINE OF it_tpool,
                     <ls_tpool_out> LIKE LINE OF rt_tpool.
  
  
      LOOP AT it_tpool ASSIGNING <ls_tpool_in>.
        APPEND INITIAL LINE TO rt_tpool ASSIGNING <ls_tpool_out>.
        MOVE-CORRESPONDING <ls_tpool_in> TO <ls_tpool_out>.
        IF <ls_tpool_out>-id = 'S'.
          <ls_tpool_out>-split = <ls_tpool_out>-entry.
          <ls_tpool_out>-entry = <ls_tpool_out>-entry+8.
        ENDIF.
      ENDLOOP.
  
    ENDMETHOD.                    "add_tpool
  
    METHOD read_tpool.
  
      FIELD-SYMBOLS: <ls_tpool_in>  LIKE LINE OF it_tpool,
                     <ls_tpool_out> LIKE LINE OF rt_tpool.
  
  
      LOOP AT it_tpool ASSIGNING <ls_tpool_in>.
        APPEND INITIAL LINE TO rt_tpool ASSIGNING <ls_tpool_out>.
        MOVE-CORRESPONDING <ls_tpool_in> TO <ls_tpool_out>.
        IF <ls_tpool_out>-id = 'S'.
          CONCATENATE <ls_tpool_in>-split <ls_tpool_in>-entry
            INTO <ls_tpool_out>-entry
            RESPECTING BLANKS.
        ENDIF.
      ENDLOOP.
  
    ENDMETHOD.                    "read_tpool
  
    METHOD corr_insert.
  
      DATA: ls_object TYPE ddenqs.
  
negative.code:     METHODS deserialize_cua
        IMPORTING is_cua TYPE ty_cua
        RAISING   lcx_exception.
  
      CLASS-METHODS:
        add_tpool
          IMPORTING it_tpool        TYPE textpool_table
          RETURNING VALUE(rt_tpool) TYPE ty_tpool_tt,
        read_tpool
          IMPORTING it_tpool        TYPE ty_tpool_tt
          RETURNING VALUE(rt_tpool) TYPE ty_tpool_tt.
  
    PRIVATE SECTION.
      METHODS:
  