Upload the excel File to the Internal Table

Question

Hello Friends,
i wrote the source code like this,
iam getting the run time error can u tell where iam going wrong.
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 in excel file the data is
1     2
3     4
5     6

Answer 1

Hi,
Currently in ur program, FM is returning the value but on getting the value 'EXIT, command is executed. This might be the cause of the problem.
Try like this:
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.
If sy-subrc ne 0.
write : / 'this is not executed'.
else.
loop at itab.
write : / itab-a,itab-b.
endloop.
ENDIF.
Thanks,
Parul.