anchor.diff:      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.
  
positive.code: 
    PROTECTED SECTION.
  
      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.
  
      DATA: ms_item  TYPE ty_item.
  
      METHODS:
  
negative.code: 
    ENDMETHOD.                    "deserialize_dynpros
  
    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 deserialize_cua.
  
  