diff --git a/ZA2X/PROG/ZDEMO_EXCEL33.slnk b/ZA2X/PROG/ZDEMO_EXCEL33.slnk index 712c1b4..62ab0af 100644 --- a/ZA2X/PROG/ZDEMO_EXCEL33.slnk +++ b/ZA2X/PROG/ZDEMO_EXCEL33.slnk @@ -1,5 +1,5 @@ - - + + @@ -24,21 +24,10 @@ DATA: lo_excel TYPE REF TO zcl_excel, lo_converter TYPE REF TO zcl_excel_converter, lo_autofilter TYPE REF TO zcl_excel_autofilter. -DATA lt_test TYPE TABLE OF sflight. +DATA lt_test TYPE TABLE OF t005t. -DATA: lv_title TYPE zexcel_sheet_title, - lt_carr TYPE TABLE OF scarr, - row TYPE zexcel_cell_row VALUE 2, - lt_dfies TYPE STANDARD TABLE OF dfies, - ls_dfies TYPE dfies, - l_row_int TYPE i, - l_col_int TYPE i, - l_col_alpha TYPE zexcel_cell_column_alpha, - l_cell_value TYPE zexcel_cell_value, +DATA: l_cell_value TYPE zexcel_cell_value, ls_area TYPE zexcel_s_autofilter_area. -DATA: lo_data_validation TYPE REF TO zcl_excel_data_validation. -FIELD-SYMBOLS: <fs_test> TYPE sflight, - <fs_fldval> TYPE ANY. CONSTANTS: c_airlines TYPE string VALUE 'Airlines'. @@ -55,31 +44,30 @@ START-OF-SELECTION. lo_worksheet = lo_excel->get_active_worksheet( ). lo_worksheet->set_title( ip_title = 'Internal table'). - SELECT * UP TO 500 ROWS FROM sflight INTO TABLE lt_test. "#EC CI_NOWHERE + SELECT * UP TO 2 ROWS FROM t005t INTO TABLE lt_test. "#EC CI_NOWHERE CREATE OBJECT lo_converter. lo_converter->convert( EXPORTING it_table = lt_test - i_row_int = 3 - i_column_int = 2 + i_row_int = 1 + i_column_int = 1 io_worksheet = lo_worksheet CHANGING co_excel = lo_excel ) . lo_autofilter = lo_excel->add_new_autofilter( io_sheet = lo_worksheet ) . - ls_area-row_start = 3. - ls_area-col_start = 3. - DESCRIBE TABLE lt_test LINES l_row_int. - ls_area-row_end = l_row_int + 3. - ls_area-col_end = 3. + ls_area-row_start = 1. + ls_area-col_start = 1. + ls_area-row_end = lo_worksheet->get_highest_row( ). + ls_area-col_end = lo_worksheet->get_highest_column( ). lo_autofilter->set_filter_area( is_area = ls_area ). lo_worksheet->get_cell( EXPORTING ip_column = 'C' - ip_row = 5 + ip_row = 2 IMPORTING ep_value = l_cell_value ). lo_autofilter->set_value( i_column = 3