anchor.diff:             TO <header>.
       ASSERT sy-subrc = 0.
   
  -    ASSIGN COMPONENT 'CREATEDBY' OF STRUCTURE <header>
  +    clear_field(
  +      EXPORTING iv_fieldname = 'CREATEDBY'
  +      CHANGING  cs_header   = <header> ).
  +
  +    clear_field(
  +      EXPORTING iv_fieldname = 'CREATEDON'
  +      CHANGING  cs_header   = <header> ).
  +
  +    clear_field(
  +      EXPORTING iv_fieldname = 'CREATEDAT'
  +      CHANGING  cs_header   = <header> ).
  +
  +    clear_field(
  +      EXPORTING iv_fieldname = 'CHANGEDBY'
  +      CHANGING  cs_header   = <header> ).
  +
  +    clear_field(
  +      EXPORTING iv_fieldname = 'CHANGEDON'
  +      CHANGING  cs_header   = <header> ).
  +
  +    clear_field(
  +      EXPORTING iv_fieldname = 'CHANGEDAT'
  +      CHANGING  cs_header   = <header> ).
  +
  +  ENDMETHOD.
  +
  +
  +  METHOD clear_field.
  +
  +    FIELD-SYMBOLS: <field>  TYPE any.
  +
  +    ASSIGN COMPONENT iv_fieldname OF STRUCTURE cs_header
              TO <field>.
       ASSERT sy-subrc = 0.
       CLEAR: <field>.
   
  -    ASSIGN COMPONENT 'CREATEDON' OF STRUCTURE <header>
  -           TO <field>.
  -    ASSERT sy-subrc = 0.
  -    CLEAR: <field>.
  -
  -    ASSIGN COMPONENT 'CREATEDAT' OF STRUCTURE <header>
  -           TO <field>.
  -    ASSERT sy-subrc = 0.
  -    CLEAR: <field>.
  -
  -    ASSIGN COMPONENT 'CHANGEDBY' OF STRUCTURE <header>
  -           TO <field>.
  -    ASSERT sy-subrc = 0.
  -    CLEAR: <field>.
  -
  -    ASSIGN COMPONENT 'CHANGEDON' OF STRUCTURE <header>
  -           TO <field>.
  -    ASSERT sy-subrc = 0.
  -    CLEAR: <field>.
  -
  -    ASSIGN COMPONENT 'CHANGEDAT' OF STRUCTURE <header>
  -           TO <field>.
  -    ASSERT sy-subrc = 0.
  -    CLEAR: <field>.
  -
     ENDMETHOD.
   
   ENDCLASS.
  
positive.code:           VALUE(ro_persistence) TYPE REF TO object,
        clear_dynamic_fields
          CHANGING
            cs_complete_comm_assembly TYPE any.
  
  ENDCLASS.
  
  
negative.code: 
      TRY.
          lo_persistence = get_persistence( lv_id ).
  
          " Interface IF_UCON_SA_PERSIST and other objects are not present
          " in lower Netweaver realeses. Therefore we have to call them
          " dynamically to be downward comapatible.
  
          CALL METHOD lo_persistence->('IF_UCON_SA_PERSIST~LOAD')
            EXPORTING
  