PARAMETERS: p_file LIKE rlgrap-filename DEFAULT 'c:tmptest.xls'.

DATA: itab LIKE t001 OCCURS 0 WITH HEADER LINE.

SELECT * FROM t001 INTO TABLE itab.

CALL FUNCTION 'SAP_CONVERT_TO_XLS_FORMAT'

  EXPORTING

    i_filename     = p_file

  TABLES

    i_tab_sap_data = itab.

TYPES: BEGIN OF t_upload,

           field1(12),

           field2(12),

           field3(12),

         END OF t_upload.

  DATA it_upload TYPE TABLE OF t_upload.

  DATA wa_upload TYPE t_upload.

  DATA itab TYPE TABLE OF alsmex_tabline WITH HEADER LINE.

  CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'

    EXPORTING

      filename    = filename

      i_begin_col = 1

      i_begin_row = 1

      i_end_col   = 3

      i_end_row   = 65535

    TABLES

      intern      = itab.

  LOOP AT itab.

    CASE itab-col.

    WHEN '0001'.

        it_upload-field1 = itab-value.

    WHEN '0002'.

        it_upload-field2 = itab-value.

    WHEN '0003'.

        it_upload-field3 = itab-value.

    AT END OF row.

      APPEND t_upload.

      CLEAR t_upload.

    ENDAT.

  ENDLOOP.