Performance while saving db entries in a CSV File (Saving the MARA)

Question

Hi Experts.
Now, I have a very difficult problem and until now noone could give me a solution.
The scenario is that I have to export the complete MARA as CSV (Comma Seperated Text File) on the server (xfer-DIR).
So, I select a bunch of mara entries and convert them to character on field level. Why on field level? Because there is no way to convert a whole workarea to character. This means the following command does not work if there is any field with field type P (packed) or F (float).
l_v_char_line = l_s_mara
transfer l_v_char_line to l_v_file
If I move the data on field level to a character the data will be converted correctly. But this means that I need to proof on field level and this results in a very inperformant runtime.
In case the table just consists of CLIKE fileds I can do the move as written above and the transferrate is about 5 MB/s. But when I work on field level base the transferrate is about 200 KB/s.
Below is a part of my coding.
Does anyone know a solution?
          "& Select without WHERE clause
          SELECT (l_t_result)
          FROM (l_t_source)
          UP TO statement_calculator->idx_to ROWS
          INTO CORRESPONDING FIELDS OF TABLE <fs_local_table>[]
          PACKAGE SIZE sel_package_size.
            l_v_dbcnt = sy-dbcnt.
            CLEAR l_stmt_values.
            LOOP AT <fs_local_table> ASSIGNING <fs_workarea>.
              DO.
                IF sy-index > 1.
                  CONCATENATE l_stmt_values l_v_line cl_datext_controller=>delimiter
                  INTO l_stmt_values.
                ENDIF.
                CLEAR l_v_line.
                ASSIGN COMPONENT sy-index
                OF STRUCTURE <fs_workarea> TO <fs_any>.
                IF sy-subrc <> 0.
                  EXIT.
                ENDIF.
                "& Converts
                l_v_line = <fs_any>.
                READ TABLE l_o_struct->components[]
                INTO l_s_components INDEX sy-index.
                IF  sy-subrc = 0
                AND l_s_components-type_kind CA 'NPFIbs%'.
                  "& Convert number like to output format
                  CALL METHOD me->convert_number_string
                    EXPORTING
                      i_numvalue = <fs_any>
                      i_typekind = l_s_components-type_kind
                    CHANGING
                      x_string   = l_v_line.
                ELSEIF sy-subrc = 0
                   AND l_s_components-type_kind CA 'Cg&!?'.
                  "& Delete special characters
                  CALL METHOD me->delete_special_character
                    CHANGING
                      x_string = l_v_line.
                ENDIF.
                UNASSIGN: <fs_any>.
              ENDDO.
              CONCATENATE l_stmt_values cl_abap_char_utilities=>cr_lf
              INTO l_stmt_values.
            ENDLOOP.
            "& Transfer data to file stream
            TRANSFER l_stmt_values TO l_v_filename.
          ENDSELECT.
Edited by: Thomas Zloch on Feb 23, 2011 5:33 PM - code tags added

Answer 1

Ok. That is what I thought, too. But it doesn't matter. Reading all MARA data at once (see coding below) results in 477 Kb/s and reading with a package size 100000 results in 456 Kb/s. This is really a bad performance.
I'm frightened that there seems to be no solution with abap stadard development tools. Right. We could use any ETL Tool to export data, but thats not our aim. The server, who the application is running on, has really enough capacity to handle the exports.
          "& Select without WHERE clause
          SELECT (l_t_result)
          FROM (l_t_source)
          UP TO statement_calculator->idx_to ROWS
          INTO CORRESPONDING FIELDS OF TABLE <fs_local_table>[].
          l_v_dbcnt = sy-dbcnt.
          CLEAR l_stmt_values.
          LOOP AT <fs_local_table> ASSIGNING <fs_workarea>.
            DO.
              IF sy-index > 1.
                CONCATENATE l_stmt_values l_v_line cl_datext_controller=>delimiter
                INTO l_stmt_values.
              ENDIF.
              CLEAR l_v_line.
              ASSIGN COMPONENT sy-index
              OF STRUCTURE <fs_workarea> TO <fs_any>.
              IF sy-subrc <> 0.
                EXIT.
              ENDIF.
              "& Converts
              l_v_line = <fs_any>.
              UNASSIGN: <fs_any>.
            ENDDO.
            CONCATENATE l_stmt_values cl_abap_char_utilities=>cr_lf
            INTO l_stmt_values.
          ENDLOOP.
          TRANSFER l_stmt_values TO l_v_filename.