Excel Sheet Upload: Program reads file for a long time

Question

Hi All,
I'm using the function modules GUI_UPLOAD and TEXT_CONVERT_XLS_TO_SAP to upload data from an excelsheet on the presentation server into a table in SAP. The call to the TEXT_CONVERT_XLS_TO_SAP function takes too long. The task bar says "Converting Line 1" and the number continues to increase to more than 50,000 when I just end the transaction. My input file has less than 2000 rows and 8 columns. Has anyone encountered such a problem with this function module, or does anyone know what to do in such cases?
Thanks.

Answer 1

Hi,
I wrote program using <b>FM ALSM_EXCEL_TO_INTERNAL_TABL</b>
Have look on sample program:
REPORT  yload_allocation_pattern                .
TABLES : zfibnr_alloc_pat.
TYPES t_itab1 TYPE alsmex_tabline.
DATA: it_itab1 TYPE STANDARD TABLE OF t_itab1 WITH HEADER LINE.
DATA :BEGIN OF it_allocation OCCURS 0,
      ibnr_aloc_patid LIKE zfibnr_alloc_pat-ibnr_aloc_patid,
      rel_loss_year LIKE zfibnr_alloc_pat-rel_loss_year,
      kind_loss LIKE zfibnr_alloc_pat-kind_loss,
      prem_alloc_pcnt LIKE zfibnr_alloc_pat-prem_alloc_pcnt,
      claim_paid_pcnt  LIKE zfibnr_alloc_pat-claim_paid_pcnt,
      claim_ostd_pcnt LIKE zfibnr_alloc_pat-claim_ostd_pcnt,
      claim_rep_pcnt LIKE  zfibnr_alloc_pat-claim_rep_pcnt,
      res_segid LIKE zfibnr_alloc_pat-res_segid,
     valid_from LIKE zfibnr_alloc_pat-valid_from,
     valid_to LIKE zfibnr_alloc_pat-valid_to,
     END OF it_allocation.
DATA  : it_alloc_pat LIKE zfibnr_alloc_pat OCCURS 0 WITH HEADER LINE.
DATA : wa_allocation TYPE zfibnr_alloc_pat.
FIELD-SYMBOLS : <fs>.
DATA : v_index TYPE i.
S E L E C T I O N S C R E E N
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-012.
*SELECTION-SCREEN SKIP 1.
*SELECTION-SCREEN BEGIN OF LINE.
*SELECTION-SCREEN COMMENT  1(18) text-013.
*SELECTION-SCREEN POSITION 19.
PARAMETERS: p_file TYPE rlgrap-filename OBLIGATORY, " File name
*>>Insertion by Chetan --Row and Column in Excel.
           p_row type I default 1000,
           p_col type I default 50.
*<< end of Insertion.
*SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
A T S E L E C T I O N S C R E E N
AT SELECTION-SCREEN.
  IF NOT p_file IS INITIAL.
**-----validating the file path & file name
   PERFORM VALID_FILE USING P_PC_CHK P_FILE.
  ENDIF.
*----Gettting the local file with f4 button
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
  PERFORM get_local_file_name USING p_file.
START-OF-SELECTION.
  CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    EXPORTING
      filename                = p_file
      i_begin_col             = 1
      i_begin_row             = 1
      i_end_col               = p_col
      i_end_row               = p_row
    TABLES
      intern                  = it_itab1
    EXCEPTIONS
      inconsistent_parameters = 1
      upload_ole              = 2
      OTHERS                  = 3.
  IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  IF it_itab1[] IS INITIAL.
    MESSAGE s003(zz) WITH 'No Data Uploaded'.
    EXIT.
  ELSE.
    SORT it_itab1 BY row col.
    LOOP AT it_itab1.
      MOVE : it_itab1-col TO v_index.
      ASSIGN COMPONENT v_index OF STRUCTURE it_allocation TO  <fs>.
      MOVE : it_itab1-value TO <fs>.
      AT END OF row.
        it_alloc_pat-entry_date = sy-datum.
        MOVE-CORRESPONDING it_allocation TO it_alloc_pat.
        APPEND it_alloc_pat.
        CLEAR it_alloc_pat.
        CLEAR  it_allocation.
      ENDAT.
    ENDLOOP.
  ENDIF.
  LOOP AT it_alloc_pat INTO wa_allocation.
    MODIFY zfibnr_alloc_pat FROM  wa_allocation.
    CLEAR wa_allocation.
  ENDLOOP.
*&      Form  GET_LOCAL_FILE_NAME
      text
     -->P_P_FILE  text
FORM get_local_file_name  USING    p_p_file.
  CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
    CHANGING
      file_name = p_file.
  IF sy-subrc <> 0.
    MESSAGE i000(zmur) WITH  'Error in getting filename'(014).
    STOP.
  ENDIF.
ENDFORM.                    " GET_LOCAL_FILE_NAME
Thanks,
Pramod