diff --git a/src/zcl_excel_worksheet.clas.abap b/src/zcl_excel_worksheet.clas.abap index e0a9faa..6ef57ac 100644 --- a/src/zcl_excel_worksheet.clas.abap +++ b/src/zcl_excel_worksheet.clas.abap @@ -851,7 +851,7 @@ ENDCLASS. -CLASS ZCL_EXCEL_WORKSHEET IMPLEMENTATION. +CLASS zcl_excel_worksheet IMPLEMENTATION. METHOD add_comment. @@ -3304,30 +3304,6 @@ CLASS ZCL_EXCEL_WORKSHEET IMPLEMENTATION. ENDMETHOD. - METHOD normalize_columnrow_parameter. - - IF ( ( ip_column IS NOT INITIAL OR ip_row IS NOT INITIAL ) AND ip_columnrow IS NOT INITIAL ) - OR ( ip_column IS INITIAL AND ip_row IS INITIAL AND ip_columnrow IS INITIAL ). - RAISE EXCEPTION TYPE zcx_excel - EXPORTING - error = 'Please provide either row and column, or cell reference'. - ENDIF. - - IF ip_columnrow IS NOT INITIAL. - zcl_excel_common=>convert_columnrow2column_a_row( - EXPORTING - i_columnrow = ip_columnrow - IMPORTING - e_column_int = ep_column - e_row = ep_row ). - ELSE. - ep_column = zcl_excel_common=>convert_column2int( ip_column ). - ep_row = ip_row. - ENDIF. - - ENDMETHOD. - - METHOD normalize_column_heading_texts. DATA: lt_field_catalog TYPE zexcel_t_fieldcatalog, @@ -3412,6 +3388,30 @@ CLASS ZCL_EXCEL_WORKSHEET IMPLEMENTATION. ENDMETHOD. + METHOD normalize_columnrow_parameter. + + IF ( ( ip_column IS NOT INITIAL OR ip_row IS NOT INITIAL ) AND ip_columnrow IS NOT INITIAL ) + OR ( ip_column IS INITIAL AND ip_row IS INITIAL AND ip_columnrow IS INITIAL ). + RAISE EXCEPTION TYPE zcx_excel + EXPORTING + error = 'Please provide either row and column, or cell reference'. + ENDIF. + + IF ip_columnrow IS NOT INITIAL. + zcl_excel_common=>convert_columnrow2column_a_row( + EXPORTING + i_columnrow = ip_columnrow + IMPORTING + e_column_int = ep_column + e_row = ep_row ). + ELSE. + ep_column = zcl_excel_common=>convert_column2int( ip_column ). + ep_row = ip_row. + ENDIF. + + ENDMETHOD. + + METHOD normalize_range_parameter. DATA: lv_errormessage TYPE string. @@ -4175,6 +4175,23 @@ CLASS ZCL_EXCEL_WORKSHEET IMPLEMENTATION. ENDMETHOD. "SET_CELL_STYLE + METHOD set_table_reference. + + FIELD-SYMBOLS: TYPE zexcel_s_cell_data. + + READ TABLE sheet_content ASSIGNING WITH KEY cell_row = ip_row + cell_column = ip_column. + IF sy-subrc = 0. + -table = ir_table. + -table_fieldname = ip_fieldname. + -table_header = ip_header. + ELSE. + zcx_excel=>raise_text( 'Cell not found' ). + ENDIF. + + ENDMETHOD. + + METHOD set_column_width. DATA: lo_column TYPE REF TO zcl_excel_column. DATA: width TYPE f. @@ -4487,23 +4504,6 @@ CLASS ZCL_EXCEL_WORKSHEET IMPLEMENTATION. ENDMETHOD. "SET_TABLE - METHOD set_table_reference. - - FIELD-SYMBOLS: TYPE zexcel_s_cell_data. - - READ TABLE sheet_content ASSIGNING WITH KEY cell_row = ip_row - cell_column = ip_column. - IF sy-subrc = 0. - -table = ir_table. - -table_fieldname = ip_fieldname. - -table_header = ip_header. - ELSE. - zcx_excel=>raise_text( 'Cell not found' ). - ENDIF. - - ENDMETHOD. - - METHOD set_title. *--------------------------------------------------------------------* * ToDos: