From 10ed6cf23069c81b98fe911d6c400b16b270b393 Mon Sep 17 00:00:00 2001 From: Ivan Femia Date: Wed, 20 Apr 2011 20:20:58 +0000 Subject: [PATCH] Fix issue #84 git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@163 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049 --- ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk | 3 +++ 1 file changed, 3 insertions(+) diff --git a/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk b/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk index 29517b7..4433724 100644 --- a/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk +++ b/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk @@ -2660,10 +2660,13 @@ endmethod. lv_value = <ls_field_catalog>-scrtext_m. ELSEIF <ls_field_catalog>-scrtext_s IS NOT INITIAL. lv_value = <ls_field_catalog>-scrtext_s. + <ls_field_catalog>-scrtext_m = lv_value. ELSEIF <ls_field_catalog>-scrtext_l IS NOT INITIAL. lv_value = <ls_field_catalog>-scrtext_l. + <ls_field_catalog>-scrtext_m = lv_value. ELSE. lv_value = 'Column'. " default value as Excel does + <ls_field_catalog>-scrtext_m = lv_value. ENDIF. WHILE 1 = 1. READ TABLE lt_column_name_buffer TRANSPORTING NO FIELDS WITH KEY table_line = lv_value BINARY SEARCH.