anchor.diff:  
   endmethod.
   
  -method apply_conv_exit.
  -
  -  data l_fm_name type rs38l_fnam value 'CONVERSION_EXIT_XXXXX_OUTPUT'.
  -  replace first occurrence of 'XXXXX' in l_fm_name with i_convexit.
  -
  -  call function 'FUNCTION_EXISTS'
  -    exporting
  -      funcname           = l_fm_name
  -    exceptions
  -      function_not_exist = 1
  -      others             = 2.
  -
  -  if sy-subrc <> 0.
  -    return.
  -  endif.
  -
  -  data l_tmp type char40. " Potential bug, but string is padded at the end
  -  call function l_fm_name
  -    exporting
  -      input  = i_in
  -    importing
  -      output = l_tmp
  -    exceptions
  -      others = 1.
  -
  -  if sy-subrc <> 0.
  -    return.
  -  endif.
  -
  -  r_out = l_tmp.
  -
  -endmethod.  "apply_conv_exit
  -
  -method serialize_date.
  -  data:
  -        l_iter    type i,
  -        l_part    type c,
  -        l_sep     type c.
  -
  -  if i_date is initial. " Empty date -> empty string
  -    return.
  -  endif.
  -  l_sep = iv_date_format+3(1).
  -
  -  do 3 times.
  -    l_iter = sy-index - 1.
  -    l_part = iv_date_format+l_iter(1).
  -
  -    case l_part.
  -      when 'D'.
  -        r_out = r_out && i_date+6(2).
  -      when 'M'.
  -        r_out = r_out && i_date+4(2).
  -      when 'Y'.
  -        r_out = r_out && i_date+0(4).
  -      when others.
  -        " assuming date format was validated ...
  -    endcase.
  -
  -    if l_sep is not initial and l_iter < 2.
  -      r_out = r_out && l_sep.
  -    endif.
  -  enddo.
  -endmethod.
  +
  +method serialize_header.
  +  data lt_fields type string_table.
  +  field-symbols <c> like line of id_struc->components.
  +
  +  loop at id_struc->components assigning <c>.
  +    append <c>-name to lt_fields.
  +  endloop.
  +
  +  data lv_buf type string.
  +  lv_buf = concat_lines_of( table = lt_fields sep = zcl_text2tab_serializer=>c_tab ).
  +  append lv_buf to ct_lines.
  +
  +endmethod.
  +
   
   method validate_components.
     " check if all components are elementary
  
positive.code:   r_string = concat_lines_of( table = lt_lines sep = mv_line_sep ).
  
  endmethod.
  
  method serialize_field.
    data:
  
negative.code:   endloop.
  
  endmethod.
  ENDCLASS.
  