diff --git a/ZA2X/CLAS/ZCL_EXCEL_COMMON.slnk b/ZA2X/CLAS/ZCL_EXCEL_COMMON.slnk index 5a1dd73..b0423cb 100644 --- a/ZA2X/CLAS/ZCL_EXCEL_COMMON.slnk +++ b/ZA2X/CLAS/ZCL_EXCEL_COMMON.slnk @@ -1,5 +1,5 @@ - + class ZCL_EXCEL_COMMON definition public final @@ -104,16 +104,16 @@ private section. *"* implementation or private method's signature *"* use this source file for any macro definitions you need *"* in the implementation part of the class - - - - - - - - - - + + + + + + + + + + method CHAR2HEX. IF o_conv IS NOT BOUND. @@ -128,9 +128,9 @@ private section. endmethod. - - - + + + method CONVERT_COLUMN2ALPHA. DATA: lo_conv TYPE REF TO cl_abap_conv_in_ce, @@ -152,9 +152,9 @@ endmethod. endmethod. - - - + + + method CONVERT_COLUMN2INT. DATA: lv_uccpi TYPE i, @@ -182,10 +182,10 @@ endmethod. endmethod. - - - - + + + + method CONVERT_COLUMNROW2COLUMN_A_ROW. DATA: width TYPE i, col_width TYPE i, @@ -202,9 +202,9 @@ endmethod. e_row = row_str. endmethod. - - - + + + method DATE_TO_EXCEL_STRING. DATA: lv_date_diff TYPE i. @@ -213,9 +213,9 @@ endmethod. ep_value = zcl_excel_common=>number_to_excel_string( ip_value = lv_date_diff ). endmethod. - - - + + + method ENCRYPT_PASSWORD. DATA lv_curr_offset TYPE i. @@ -255,10 +255,10 @@ endmethod. endmethod. - - - - METHOD escape_string. + + + + method ESCAPE_STRING. DATA lv_value TYPE string. lv_value = ip_value. @@ -271,11 +271,11 @@ endmethod. ep_escaped_value = lv_value. -ENDMETHOD. +endmethod. - - - + + + method EXCEL_STRING_TO_DATE. DATA: lv_date_int TYPE i. @@ -287,9 +287,9 @@ ENDMETHOD. ENDTRY. endmethod. - - - + + + method EXCEL_STRING_TO_TIME. DATA: lv_seconds_in_day TYPE i, lv_day_fraction TYPE f, @@ -307,10 +307,10 @@ lc_seconds_in_day TYPE i VALUE 86400. ENDTRY. endmethod. - - - - method GET_FIELDCATALOG. + + + + METHOD get_fieldcatalog. DATA: lr_data TYPE REF TO data, lo_structdescr TYPE REF TO cl_abap_structdescr, @@ -348,20 +348,20 @@ endmethod. ELSE. "component is not DDIC -> return minimum information required ls_fieldcatalog-fieldname = ls_component-name. - ls_fieldcatalog-position = sy-tabix. ls_fieldcatalog-dynpfld = abap_true. ls_fieldcatalog-scrtext_m = ls_component-name. ENDIF. + ls_fieldcatalog-position = sy-tabix. " Fix issue #119 APPEND ls_fieldcatalog TO ep_fieldcatalog. ENDLOOP. ENDIF. -endmethod. +ENDMETHOD. - - - - METHOD number_to_excel_string. + + + + method NUMBER_TO_EXCEL_STRING. DATA: lv_value_c TYPE c LENGTH 100. WRITE ip_value TO lv_value_c EXPONENT 0 NO-GROUPING NO-SIGN. @@ -375,11 +375,11 @@ endmethod. ELSEIF ip_value EQ 0. ep_value = '0'. ENDIF. -ENDMETHOD. +endmethod. - - - + + + method SHL01. DATA: @@ -397,9 +397,9 @@ ENDMETHOD. endmethod. - - - + + + method SHR14. DATA: @@ -424,9 +424,9 @@ endmethod. endmethod. - - - + + + method TIME_TO_EXCEL_STRING. DATA: lv_seconds_in_day TYPE i, lv_day_fraction TYPE f,