ABAP 调用 ZCL_EXCEL_READER_2007举例
调用方法举例:
DATA: lo_excel TYPE REF TO zcl_excel,
lo_reader TYPE REF TO zif_excel_reader,
lo_worksheet TYPE REF TO zcl_excel_worksheet.
TRY.
CREATE OBJECT lo_reader TYPE zcl_excel_reader_2007.
lo_excel = lo_reader->load_file( p_file ).
lo_worksheet = lo_excel->get_worksheet_by_index( iv_index = 1 ).
lo_worksheet->get_table( EXPORTING iv_skipped_rows = 1 IMPORTING et_table = gt_excel_data ).
DELETE gt_excel_data WHERE partner IS INITIAL OR bpext IS INITIAL.
LOOP AT gt_excel_data ASSIGNING FIELD-SYMBOL(<partner>).
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input = <partner>-partner " C field
IMPORTING
output = <partner>-partner.
ENDLOOP.
CATCH zcx_excel INTO DATA(lo_ex).
ENDTRY.