Data to upload for excel into the internal table

Question

Hi Friends,
iam getting the run error when i wrote this code,
can any one help me please.
data : begin of itab occurs 3,
       a type i,
       b type i,
       end of itab.
       CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
         EXPORTING
           FILENAME  = 'D:\Siemens\asd.xls'
           I_BEGIN_COL                   = 1
           I_BEGIN_ROW                   = 1
           I_END_COL                     = 2
           I_END_ROW                     = 3
         TABLES
           INTERN                        = itab
        EXCEPTIONS
          INCONSISTENT_PARAMETERS       = 1
          UPLOAD_OLE                    = 2
          OTHERS                        = 3
       IF SY-SUBRC <> 0.
write : / 'this is not executed'.
exit.
       ENDIF.
       loop at itab.
       write : / itab-a,itab-b.
       endloop.
and the data in the excel sheet  is
1   2
3   4
5   5

Answer 1

Check the following ex:
REPORT ZFI_EXCEL .
*Read the data from the locally held spreadsheet
*Once read using this FM, the data will be held like:-
*ROW  |COL  |VALUE
*---|-|---
*0001 |0001 |2
*0001 |0002 |00000000001
*0001 |0003 |1
*0001 |0004 |
*0001 |0005 |2
*0001 |00010|SHORT TEXT for a/c
*0001 |00011|LONG TEXT a/c 0000000001
*0002 |0001 |2
*0002 |0002 |00000000002
*0002 |0003 |1
*0002 |0004 |
*0002 |0005 |2
*0002 |00010|SHORT TEXT for a/c
*0001 |00011|LONG TEXT a/c 0000000002
*etc........
data: begin of excel_tab occurs 0.
        include structure alsmex_tabline.
data: end of excel_tab .
data: begin of itab occurs 0,
        bldat like bkpf-bldat,
        blart like bkpf-blart,
        bukrs like bkpf-bukrs,
        budat like bkpf-budat,
        waers like bkpf-waers,
        bschl like bseg-bschl,
        hkont like bseg-hkont,
        sgtxt like bseg-sgtxt,
      end of itab.
data: process_tab_struct_tmp like itab.
field-symbols: <fs1>.
selection-screen: begin of block blk.
parameters: fname type rlgrap-filename.
selection-screen: end of block blk.
at selection-screen on value-request for fname.
      CALL FUNCTION 'F4_FILENAME'
       EXPORTING
         PROGRAM_NAME        = 'ZFI_EXCEL'
         DYNPRO_NUMBER       = '1000'
         FIELD_NAME          = 'FNAME'
       IMPORTING
         FILE_NAME           = FNAME.
START-OF-SELECTION.
  CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    EXPORTING
      filename                      = FNAME
      i_begin_col                   = 1
      i_begin_row                   = 1
      i_end_col                     = 24
      i_end_row                     = 60000
    tables
      intern                        = EXCEL_TAB
LOOP AT EXCEL_TAB.
assign component excel_tab-col of structure
                                      process_tab_struct_tmp to <fs1>.
  <fs1> = excel_tab-value.
at end of row.
move-corresponding: process_tab_struct_tmp to itab.  “Move values to itab
append itab.
endat.
ENDLOOP.
LOOP AT ITAB.
  WRITE:/2 ITAB-BLDAT,14(8) ITAB-BLART,20(10) ITAB-BUDAT.
ENDLOOP.