Passing Excel data to Internal Table

 

*&---------------------------------------------------------------------*
*& Report ZVB_UPLOAD
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT zvb_upload.

TABLES:vbak.

TYPES:BEGIN OF ty_file,
        vbeln TYPE vbak-vbeln,
        auart TYPE vbak-auart,
      END OF ty_file.

DATA:it_file TYPE TABLE OF ty_file,
     iw_file TYPE ty_file.

DATA:lv_file TYPE rlgrap-filename,
     it_raw  TYPE truxs_t_text_data.
PARAMETERS:p_file TYPE ibipparms-path.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
  CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name  syst-cprog
      dynpro_number syst-dynnr
      field_name    ' '
    IMPORTING
      file_name     p_file.

START-OF-SELECTION.

  lv_file p_file.
  CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
*     I_FIELD_SEPERATOR    = '#'
      i_line_header        'X'
      i_tab_raw_data       it_raw       " WORK TABLE
      i_filename           lv_file
    TABLES
      i_tab_converted_data it_file[]    "ACTUAL DATA
    EXCEPTIONS
      conversion_failed    1
      OTHERS               2.
  
  LOOP AT it_file INTO iw_file.
    WRITE:/ iw_file-vbelniw_file-auart.
  ENDLOOP.

INPUT:

 

OUTPUT: 

 

Comments

Popular posts from this blog

CDS Views: Table Functions with Example

Passing Dynamic Variables to SO10 TEXT

Adobe Form/PDF Form Introduction