From 4ea14eee0e9f530e2f4659bec7a2857b8955e2ef Mon Sep 17 00:00:00 2001 From: Ivan Femia Date: Wed, 25 Apr 2012 15:23:32 +0000 Subject: [PATCH] Fix a bug introduced with commit for issue #163 git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@302 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049 --- ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk | 5 ++++- ZA2X/CLAS/ZCL_EXCEL_WRITER_2007.slnk | 12 +++++++----- 2 files changed, 11 insertions(+), 6 deletions(-) diff --git a/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk b/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk index 8f9def2..7530c49 100644 --- a/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk +++ b/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk @@ -3751,7 +3751,8 @@ endmethod. me->update_dimension_range( ). IF upper_cell EQ lower_cell. "only one cell " Worksheet not filled - IF upper_cell-cell_coords = '0'. +* IF upper_cell-cell_coords = '0'. + IF upper_cell-cell_coords IS INITIAL. ep_dimension_range = 'A1'. ELSE. ep_dimension_range = upper_cell-cell_coords. @@ -4498,6 +4499,8 @@ endmethod. lv_row_alpha TYPE string, lv_column_alpha TYPE zexcel_cell_column_alpha. + CHECK lt_sheet_content IS NOT INITIAL. + * update dimension range lt_sheet_content = sheet_content. "upper left corner diff --git a/ZA2X/CLAS/ZCL_EXCEL_WRITER_2007.slnk b/ZA2X/CLAS/ZCL_EXCEL_WRITER_2007.slnk index 9c09cb8..580a3ef 100644 --- a/ZA2X/CLAS/ZCL_EXCEL_WRITER_2007.slnk +++ b/ZA2X/CLAS/ZCL_EXCEL_WRITER_2007.slnk @@ -4707,11 +4707,13 @@ endmethod. lv_value = lo_range->name. lo_sub_element->set_attribute_ns( name = lc_xml_attr_name value = lv_value ). - lv_value = lo_range->sheetid. " Issue #163 - SHIFT lv_value RIGHT DELETING TRAILING space. " Issue #163 - SHIFT lv_value LEFT DELETING LEADING space. " Issue #163 - lo_sub_element->set_attribute_ns( name = lc_xml_attr_localsheetid " Issue #163 - value = lv_syindex ). " Issue #163 + lv_value = lo_range->sheetid. " Issue #163 + IF lv_value GT 0. " Issue #163 + SHIFT lv_value RIGHT DELETING TRAILING space. " Issue #163 + SHIFT lv_value LEFT DELETING LEADING space. " Issue #163 + lo_sub_element->set_attribute_ns( name = lc_xml_attr_localsheetid " Issue #163 + value = lv_value ). " Issue #163 + ENDIF. lv_value = lo_range->get_value( ). lo_sub_element->set_value( value = lv_value ). lo_element->append_child( new_child = lo_sub_element ). " range node