diff --git a/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk b/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk index 20e380c..9de89a6 100644 --- a/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk +++ b/ZA2X/CLAS/ZCL_EXCEL_WORKSHEET.slnk @@ -3,231 +3,236 @@ - class ZCL_EXCEL_WORKSHEET definition - public - final - create public . + *----------------------------------------------------------------------* +* CLASS ZCL_EXCEL_WORKSHEET DEFINITIO +*----------------------------------------------------------------------* +* +*----------------------------------------------------------------------* +CLASS zcl_excel_worksheet DEFINITION + PUBLIC + FINAL + CREATE PUBLIC . *"* public components of class ZCL_EXCEL_WORKSHEET *"* do not include other source files here!!! -public section. - type-pools ABAP . + PUBLIC SECTION. + TYPE-POOLS abap . - interfaces ZIF_EXCEL_SHEET_PROPERTIES . - interfaces ZIF_EXCEL_SHEET_PROTECTION . - interfaces ZIF_EXCEL_SHEET_VBA_PROJECT . + INTERFACES zif_excel_sheet_properties . + INTERFACES zif_excel_sheet_protection . + INTERFACES zif_excel_sheet_vba_project . - constants C_BREAK_COLUMN type ZEXCEL_BREAK value 2. "#EC NOTEXT - constants C_BREAK_NONE type ZEXCEL_BREAK value 0. "#EC NOTEXT - constants C_BREAK_ROW type ZEXCEL_BREAK value 1. "#EC NOTEXT - constants C_SHEET_STATE_HIDDEN type ZEXCEL_SHEET_STATE value 'hidden'. "#EC NOTEXT - constants C_SHEET_STATE_VERYHIDDEN type ZEXCEL_SHEET_STATE value 'veryHidden'. "#EC NOTEXT - constants C_SHEET_STATE_VISIBLE type ZEXCEL_SHEET_STATE value 'visible'. "#EC NOTEXT - data PRINT_GRIDLINES type ZEXCEL_PRINT_GRIDLINES read-only value ABAP_FALSE. "#EC NOTEXT . - data SHEET_CONTENT type ZEXCEL_T_CELL_DATA . - data SHEET_CONTENT_MERGE type ZEXCEL_T_CELL_DATA_UNSORTED . - data SHEET_SETUP type ref to ZCL_EXCEL_SHEET_SETUP . - data SHEET_STATE type ZEXCEL_SHEET_STATE . - data SHOW_GRIDLINES type ZEXCEL_SHOW_GRIDLINES read-only value ABAP_TRUE. "#EC NOTEXT . - data SHOW_ROWCOLHEADERS type ZEXCEL_SHOW_GRIDLINES read-only value ABAP_TRUE. "#EC NOTEXT . - data STYLES type ZEXCEL_T_SHEET_STYLE . + CONSTANTS c_break_column TYPE zexcel_break VALUE 2. "#EC NOTEXT + CONSTANTS c_break_none TYPE zexcel_break VALUE 0. "#EC NOTEXT + CONSTANTS c_break_row TYPE zexcel_break VALUE 1. "#EC NOTEXT + CONSTANTS c_sheet_state_hidden TYPE zexcel_sheet_state VALUE 'hidden'. "#EC NOTEXT + CONSTANTS c_sheet_state_veryhidden TYPE zexcel_sheet_state VALUE 'veryHidden'. "#EC NOTEXT + CONSTANTS c_sheet_state_visible TYPE zexcel_sheet_state VALUE 'visible'. "#EC NOTEXT + DATA print_gridlines TYPE zexcel_print_gridlines READ-ONLY VALUE abap_false. "#EC NOTEXT . + DATA sheet_content TYPE zexcel_t_cell_data . + DATA sheet_content_merge TYPE zexcel_t_cell_data_unsorted . + DATA sheet_setup TYPE REF TO zcl_excel_sheet_setup . + DATA sheet_state TYPE zexcel_sheet_state . + DATA show_gridlines TYPE zexcel_show_gridlines READ-ONLY VALUE abap_true. "#EC NOTEXT . + DATA show_rowcolheaders TYPE zexcel_show_gridlines READ-ONLY VALUE abap_true. "#EC NOTEXT . + DATA styles TYPE zexcel_t_sheet_style . - methods ADD_DRAWING - importing - !IP_DRAWING type ref to ZCL_EXCEL_DRAWING . - methods ADD_NEW_CONDITIONAL_STYLE - returning - value(EO_CONDITIONAL_STYLE) type ref to ZCL_EXCEL_STYLE_CONDITIONAL . - methods ADD_NEW_DATA_VALIDATION - returning - value(EO_DATA_VALIDATION) type ref to ZCL_EXCEL_DATA_VALIDATION . - methods BIND_ALV - importing - !IO_ALV type ref to OBJECT - !IT_TABLE type STANDARD TABLE - !I_TOP type I default 1 - !I_LEFT type I default 1 - !TABLE_STYLE type ZEXCEL_TABLE_STYLE optional - raising - ZCX_EXCEL . - type-pools SLIS . - type-pools SOI . - methods BIND_ALV_OLE2 - importing - !I_DOCUMENT_URL type CHAR255 default SPACE - !I_XLS type C default SPACE - !I_SAVE_PATH type STRING - !IO_ALV type ref to CL_GUI_ALV_GRID - !IT_LISTHEADER type SLIS_T_LISTHEADER optional - !I_TOP type I default 1 - !I_LEFT type I default 1 - !I_COLUMNS_HEADER type C default 'X' - !I_COLUMNS_AUTOFIT type C default 'X' - !I_FORMAT_COL_HEADER type SOI_FORMAT_ITEM optional - !I_FORMAT_SUBTOTAL type SOI_FORMAT_ITEM optional - !I_FORMAT_TOTAL type SOI_FORMAT_ITEM optional - exceptions - MISS_GUIDE - EX_TRANSFER_KKBLO_ERROR - FATAL_ERROR - INV_DATA_RANGE - DIM_MISMATCH_VKEY - DIM_MISMATCH_SEMA - ERROR_IN_SEMA . - methods BIND_TABLE - importing - !IP_TABLE type STANDARD TABLE - !IT_FIELD_CATALOG type ZEXCEL_T_FIELDCATALOG optional - !IS_TABLE_SETTINGS type ZEXCEL_S_TABLE_SETTINGS optional - exporting - !ES_TABLE_SETTINGS type ZEXCEL_S_TABLE_SETTINGS . - methods CALCULATE_COLUMN_WIDTHS . - methods CONSTRUCTOR - importing - !IP_EXCEL type ref to ZCL_EXCEL - !IP_TITLE type ZEXCEL_SHEET_TITLE optional . - methods DELETE_MERGE . - methods FREEZE_PANES - importing - !IP_NUM_COLUMNS type I optional - !IP_NUM_ROWS type I optional - raising - ZCX_EXCEL . - methods GET_ACTIVE_CELL - returning - value(EP_ACTIVE_CELL) type STRING . - methods GET_CELL - importing - !IP_COLUMN type ZEXCEL_CELL_COLUMN_ALPHA - !IP_ROW type ZEXCEL_CELL_ROW - exporting - !EP_VALUE type ZEXCEL_CELL_VALUE - !EP_RC type SYSUBRC - !EP_STYLE type ref to ZCL_EXCEL_STYLE . - methods GET_COLUMN_DIMENSION - importing - !IP_COLUMN type ZEXCEL_CELL_COLUMN_ALPHA - returning - value(R_COLUMN_DIMENSION) type ref to ZCL_EXCEL_WORKSHEET_COLUMNDIME . - methods GET_COLUMN_DIMENSIONS - returning - value(R_COLUMN_DIMENSION) type ZEXCEL_T_WORKSHEET_COLUMNDIME . - methods GET_COND_STYLES_ITERATOR - returning - value(EO_ITERATOR) type ref to CL_OBJECT_COLLECTION_ITERATOR . - methods GET_DATA_VALIDATIONS_ITERATOR - returning - value(EO_ITERATOR) type ref to CL_OBJECT_COLLECTION_ITERATOR . - methods GET_DATA_VALIDATIONS_SIZE - returning - value(EP_SIZE) type I . - methods GET_DEFAULT_COLUMN_DIMENSION - returning - value(R_COLUMN_DIMENSION) type ref to ZCL_EXCEL_WORKSHEET_COLUMNDIME . - methods GET_DEFAULT_EXCEL_DATE_FORMAT - returning - value(EP_DEFAULT_EXCEL_DATE_FORMAT) type ZEXCEL_NUMBER_FORMAT . - methods GET_DEFAULT_ROW_DIMENSION - returning - value(R_ROW_DIMENSION) type ref to ZCL_EXCEL_WORKSHEET_ROWDIMENSI . - methods GET_DIMENSION_RANGE - returning - value(EP_DIMENSION_RANGE) type STRING . - methods GET_DRAWINGS - returning - value(R_DRAWINGS) type ref to ZCL_EXCEL_DRAWINGS . - methods GET_DRAWINGS_ITERATOR - returning - value(EO_ITERATOR) type ref to CL_OBJECT_COLLECTION_ITERATOR . - methods GET_FREEZE_CELL - exporting - !EP_ROW type ZEXCEL_CELL_ROW - !EP_COLUMN type ZEXCEL_CELL_COLUMN . - methods GET_GUID - returning - value(EP_GUID) type OLTPGUID16 . - methods GET_HIGHEST_COLUMN - returning - value(R_HIGHEST_COLUMN) type ZEXCEL_CELL_COLUMN . - methods GET_HIGHEST_ROW - returning - value(R_HIGHEST_ROW) type INT4 . - methods GET_HYPERLINKS_ITERATOR - returning - value(EO_ITERATOR) type ref to CL_OBJECT_COLLECTION_ITERATOR . - methods GET_HYPERLINKS_SIZE - returning - value(EP_SIZE) type I . - methods GET_MERGE - returning - value(MERGE_RANGE) type STRING_TABLE . - methods GET_ROW_DIMENSION - importing - !IP_ROW type INT4 - returning - value(R_ROW_DIMENSION) type ref to ZCL_EXCEL_WORKSHEET_ROWDIMENSI . - methods GET_ROW_DIMENSIONS - returning - value(R_ROW_DIMENSION) type ZEXCEL_T_WORKSHEET_ROWDIMENSIO . - methods GET_TABLES_ITERATOR - returning - value(EO_ITERATOR) type ref to CL_OBJECT_COLLECTION_ITERATOR . - methods GET_TABLES_SIZE - returning - value(EP_SIZE) type I . - methods GET_TITLE - importing - !IP_ESCAPED type FLAG default '' - returning - value(EP_TITLE) type ZEXCEL_SHEET_TITLE . - methods SET_CELL - importing - !IP_COLUMN type ZEXCEL_CELL_COLUMN_ALPHA - !IP_ROW type ZEXCEL_CELL_ROW - !IP_VALUE type SIMPLE optional - !IP_FORMULA type ZEXCEL_CELL_FORMULA optional - !IP_STYLE type ZEXCEL_CELL_STYLE optional - !IP_HYPERLINK type ref to ZCL_EXCEL_HYPERLINK optional - !IP_DATA_TYPE type ZEXCEL_CELL_DATA_TYPE optional - !IP_ABAP_TYPE type ABAP_TYPEKIND optional - raising - ZCX_EXCEL . - methods SET_CELL_STYLE - importing - !IP_COLUMN type ZEXCEL_CELL_COLUMN_ALPHA - !IP_ROW type ZEXCEL_CELL_ROW - !IP_STYLE type ZEXCEL_CELL_STYLE - raising - ZCX_EXCEL . - methods SET_DEFAULT_EXCEL_DATE_FORMAT - importing - !IP_DEFAULT_EXCEL_DATE_FORMAT type ZEXCEL_NUMBER_FORMAT . - methods SET_MERGE - importing - !IP_COLUMN_START type ZEXCEL_CELL_COLUMN_ALPHA optional - !IP_COLUMN_END type ZEXCEL_CELL_COLUMN_ALPHA optional - !IP_ROW type ZEXCEL_CELL_ROW optional - !IP_ROW_TO type ZEXCEL_CELL_ROW optional . - methods SET_PRINT_GRIDLINES - importing - !I_PRINT_GRIDLINES type ZEXCEL_PRINT_GRIDLINES . - methods SET_SHOW_GRIDLINES - importing - !I_SHOW_GRIDLINES type ZEXCEL_SHOW_GRIDLINES . - methods SET_TABLE - importing - !IP_TABLE type STANDARD TABLE - !IP_HDR_STYLE type ZEXCEL_CELL_STYLE optional - !IP_BODY_STYLE type ZEXCEL_CELL_STYLE optional - !IP_TABLE_TITLE type STRING - !IP_TOP_LEFT_COLUMN type ZEXCEL_CELL_COLUMN_ALPHA default 'B' - !IP_TOP_LEFT_ROW type ZEXCEL_CELL_ROW default 3 . - methods SET_TITLE - importing - !IP_TITLE type ZEXCEL_SHEET_TITLE . - methods SET_SHOW_ROWCOLHEADERS - importing - !I_SHOW_ROWCOLHEADERS type ZEXCEL_SHOW_ROWCOLHEADER . + METHODS add_drawing + IMPORTING + !ip_drawing TYPE REF TO zcl_excel_drawing . + METHODS add_new_conditional_style + RETURNING + value(eo_conditional_style) TYPE REF TO zcl_excel_style_conditional . + METHODS add_new_data_validation + RETURNING + value(eo_data_validation) TYPE REF TO zcl_excel_data_validation . + METHODS bind_alv + IMPORTING + !io_alv TYPE REF TO object + !it_table TYPE STANDARD TABLE + !i_top TYPE i DEFAULT 1 + !i_left TYPE i DEFAULT 1 + !table_style TYPE zexcel_table_style OPTIONAL + RAISING + zcx_excel . + TYPE-POOLS slis . + TYPE-POOLS soi . + METHODS bind_alv_ole2 + IMPORTING + !i_document_url TYPE char255 DEFAULT space + !i_xls TYPE c DEFAULT space + !i_save_path TYPE string + !io_alv TYPE REF TO cl_gui_alv_grid + !it_listheader TYPE slis_t_listheader OPTIONAL + !i_top TYPE i DEFAULT 1 + !i_left TYPE i DEFAULT 1 + !i_columns_header TYPE c DEFAULT 'X' + !i_columns_autofit TYPE c DEFAULT 'X' + !i_format_col_header TYPE soi_format_item OPTIONAL + !i_format_subtotal TYPE soi_format_item OPTIONAL + !i_format_total TYPE soi_format_item OPTIONAL + EXCEPTIONS + miss_guide + ex_transfer_kkblo_error + fatal_error + inv_data_range + dim_mismatch_vkey + dim_mismatch_sema + error_in_sema . + METHODS bind_table + IMPORTING + !ip_table TYPE STANDARD TABLE + !it_field_catalog TYPE zexcel_t_fieldcatalog OPTIONAL + !is_table_settings TYPE zexcel_s_table_settings OPTIONAL + EXPORTING + !es_table_settings TYPE zexcel_s_table_settings . + METHODS calculate_column_widths . + METHODS constructor + IMPORTING + !ip_excel TYPE REF TO zcl_excel + !ip_title TYPE zexcel_sheet_title OPTIONAL . + METHODS delete_merge . + METHODS freeze_panes + IMPORTING + !ip_num_columns TYPE i OPTIONAL + !ip_num_rows TYPE i OPTIONAL + RAISING + zcx_excel . + METHODS get_active_cell + RETURNING + value(ep_active_cell) TYPE string . + METHODS get_cell + IMPORTING + !ip_column TYPE zexcel_cell_column_alpha + !ip_row TYPE zexcel_cell_row + EXPORTING + !ep_value TYPE zexcel_cell_value + !ep_rc TYPE sysubrc + !ep_style TYPE REF TO zcl_excel_style . + METHODS get_column_dimension + IMPORTING + !ip_column TYPE zexcel_cell_column_alpha + RETURNING + value(r_column_dimension) TYPE REF TO zcl_excel_worksheet_columndime . + METHODS get_column_dimensions + RETURNING + value(r_column_dimension) TYPE zexcel_t_worksheet_columndime . + METHODS get_cond_styles_iterator + RETURNING + value(eo_iterator) TYPE REF TO cl_object_collection_iterator . + METHODS get_data_validations_iterator + RETURNING + value(eo_iterator) TYPE REF TO cl_object_collection_iterator . + METHODS get_data_validations_size + RETURNING + value(ep_size) TYPE i . + METHODS get_default_column_dimension + RETURNING + value(r_column_dimension) TYPE REF TO zcl_excel_worksheet_columndime . + METHODS get_default_excel_date_format + RETURNING + value(ep_default_excel_date_format) TYPE zexcel_number_format . + METHODS get_default_row_dimension + RETURNING + value(r_row_dimension) TYPE REF TO zcl_excel_worksheet_rowdimensi . + METHODS get_dimension_range + RETURNING + value(ep_dimension_range) TYPE string . + METHODS get_drawings + RETURNING + value(r_drawings) TYPE REF TO zcl_excel_drawings . + METHODS get_drawings_iterator + RETURNING + value(eo_iterator) TYPE REF TO cl_object_collection_iterator . + METHODS get_freeze_cell + EXPORTING + !ep_row TYPE zexcel_cell_row + !ep_column TYPE zexcel_cell_column . + METHODS get_guid + RETURNING + value(ep_guid) TYPE oltpguid16 . + METHODS get_highest_column + RETURNING + value(r_highest_column) TYPE zexcel_cell_column . + METHODS get_highest_row + RETURNING + value(r_highest_row) TYPE int4 . + METHODS get_hyperlinks_iterator + RETURNING + value(eo_iterator) TYPE REF TO cl_object_collection_iterator . + METHODS get_hyperlinks_size + RETURNING + value(ep_size) TYPE i . + METHODS get_merge + RETURNING + value(merge_range) TYPE string_table . + METHODS get_row_dimension + IMPORTING + !ip_row TYPE int4 + RETURNING + value(r_row_dimension) TYPE REF TO zcl_excel_worksheet_rowdimensi . + METHODS get_row_dimensions + RETURNING + value(r_row_dimension) TYPE zexcel_t_worksheet_rowdimensio . + METHODS get_tables_iterator + RETURNING + value(eo_iterator) TYPE REF TO cl_object_collection_iterator . + METHODS get_tables_size + RETURNING + value(ep_size) TYPE i . + METHODS get_title + IMPORTING + !ip_escaped TYPE flag DEFAULT '' + RETURNING + value(ep_title) TYPE zexcel_sheet_title . + METHODS set_cell + IMPORTING + !ip_column TYPE zexcel_cell_column_alpha + !ip_row TYPE zexcel_cell_row + !ip_value TYPE simple OPTIONAL + !ip_formula TYPE zexcel_cell_formula OPTIONAL + !ip_style TYPE zexcel_cell_style OPTIONAL + !ip_hyperlink TYPE REF TO zcl_excel_hyperlink OPTIONAL + !ip_data_type TYPE zexcel_cell_data_type OPTIONAL + !ip_abap_type TYPE abap_typekind OPTIONAL + RAISING + zcx_excel . + METHODS set_cell_style + IMPORTING + !ip_column TYPE zexcel_cell_column_alpha + !ip_row TYPE zexcel_cell_row + !ip_style TYPE zexcel_cell_style + RAISING + zcx_excel . + METHODS set_default_excel_date_format + IMPORTING + !ip_default_excel_date_format TYPE zexcel_number_format . + METHODS set_merge + IMPORTING + !ip_column_start TYPE zexcel_cell_column_alpha OPTIONAL + !ip_column_end TYPE zexcel_cell_column_alpha OPTIONAL + !ip_row TYPE zexcel_cell_row OPTIONAL + !ip_row_to TYPE zexcel_cell_row OPTIONAL . + METHODS set_print_gridlines + IMPORTING + !i_print_gridlines TYPE zexcel_print_gridlines . + METHODS set_show_gridlines + IMPORTING + !i_show_gridlines TYPE zexcel_show_gridlines . + METHODS set_table + IMPORTING + !ip_table TYPE STANDARD TABLE + !ip_hdr_style TYPE zexcel_cell_style OPTIONAL + !ip_body_style TYPE zexcel_cell_style OPTIONAL + !ip_table_title TYPE string + !ip_top_left_column TYPE zexcel_cell_column_alpha DEFAULT 'B' + !ip_top_left_row TYPE zexcel_cell_row DEFAULT 3 . + METHODS set_title + IMPORTING + !ip_title TYPE zexcel_sheet_title . + METHODS set_show_rowcolheaders + IMPORTING + !i_show_rowcolheaders TYPE zexcel_show_rowcolheader . *"* protected components of class ZCL_EXCEL_WORKSHEET *"* do not include other source files here!!! protected section. @@ -424,12 +429,12 @@ endclass. - - - - - - + + + + + + @@ -441,15 +446,15 @@ endclass. - + - - - - - - - + + + + + + + @@ -460,9 +465,16 @@ endmethod. method ZIF_EXCEL_SHEET_PROPERTIES~INITIALIZE. + zif_excel_sheet_properties~show_zeros = zif_excel_sheet_properties=>c_showzero. zif_excel_sheet_properties~summarybelow = zif_excel_sheet_properties=>c_below_on. zif_excel_sheet_properties~summaryright = zif_excel_sheet_properties=>c_right_on. + +* inizialize zoomscale values + ZIF_EXCEL_SHEET_PROPERTIES~zoomscale = 100. + ZIF_EXCEL_SHEET_PROPERTIES~zoomscale_normal = 100. + ZIF_EXCEL_SHEET_PROPERTIES~zoomscale_pagelayoutview = 100 . + ZIF_EXCEL_SHEET_PROPERTIES~zoomscale_sheetlayoutview = 100 . endmethod. @@ -506,34 +518,34 @@ endmethod. me->zif_excel_sheet_vba_project~codename_pr = ip_codename_pr. endmethod. - - + + method ADD_DRAWING. drawings->add( ip_drawing ). endmethod. - - + + method ADD_NEW_CONDITIONAL_STYLE. CREATE OBJECT eo_conditional_style. conditional_styles->add( eo_conditional_style ). endmethod. - - + + method ADD_NEW_DATA_VALIDATION. CREATE OBJECT eo_data_validation. data_validations->add( eo_data_validation ). endmethod. - - - - - - + + + + + + method BIND_ALV. data: lo_converter type ref to zcl_excel_converter. @@ -557,19 +569,19 @@ endmethod. endmethod. - - - - - - - - - - - - - + + + + + + + + + + + + + @@ -2646,11 +2658,11 @@ endmethod. close_document. endmethod. - - - - - + + + + + method BIND_TABLE. DATA: @@ -2820,7 +2832,7 @@ endmethod. endmethod. - + method CALCULATE_COLUMN_WIDTHS. TYPES: BEGIN OF t_auto_size, @@ -2892,10 +2904,10 @@ endmethod. endmethod. - - - - method CONSTRUCTOR. + + + + METHOD constructor. DATA: lv_title TYPE zexcel_sheet_title. me->excel = ip_excel. @@ -2932,9 +2944,10 @@ endmethod. lower_cell-cell_column = 1. upper_cell-cell_row = 1. upper_cell-cell_column = 1. -endmethod. + +ENDMETHOD. - + method DELETE_MERGE. DELETE sheet_content_merge INDEX 1. @@ -2942,9 +2955,9 @@ endmethod. endmethod. - - - + + + method FREEZE_PANES. data: lv_xsplit type i, @@ -2972,8 +2985,8 @@ endmethod. freeze_pane_cell_row = ip_num_rows + 1. endmethod. - - + + method GET_ACTIVE_CELL. DATA: lv_active_column TYPE zexcel_cell_column_alpha, @@ -2987,12 +3000,12 @@ endmethod. endmethod. - - - - - - + + + + + + method GET_CELL. DATA: lv_column TYPE zexcel_cell_column, @@ -3023,9 +3036,9 @@ endmethod. ENDIF. endmethod. - - - + + + method GET_COLUMN_DIMENSION. FIELD-SYMBOLS: <fs_column_dimension> LIKE LINE OF column_dimensions. @@ -3045,40 +3058,40 @@ endmethod. endmethod. - - + + method GET_COLUMN_DIMENSIONS. r_column_dimension[] = me->column_dimensions[]. endmethod. - - + + method GET_COND_STYLES_ITERATOR. eo_iterator = me->conditional_styles->get_iterator( ). endmethod. - - + + method GET_DATA_VALIDATIONS_ITERATOR. eo_iterator = me->data_validations->get_iterator( ). endmethod. - - + + method GET_DATA_VALIDATIONS_SIZE. ep_size = me->data_validations->size( ). endmethod. - - + + method GET_DEFAULT_COLUMN_DIMENSION. r_column_dimension = me->default_column_dimension. endmethod. - - + + method GET_DEFAULT_EXCEL_DATE_FORMAT. CONSTANTS: c_lang_e TYPE lang VALUE 'E'. @@ -3103,14 +3116,14 @@ endmethod. ep_default_excel_date_format = default_excel_date_format. endmethod. - - + + method GET_DEFAULT_ROW_DIMENSION. r_row_dimension = me->default_row_dimension. endmethod. - - + + method GET_DIMENSION_RANGE. me->update_dimension_range( ). @@ -3127,62 +3140,62 @@ endmethod. endmethod. - - + + method GET_DRAWINGS. r_drawings = drawings. endmethod. - - + + method GET_DRAWINGS_ITERATOR. eo_iterator = drawings->get_iterator( ). endmethod. - - - + + + method GET_FREEZE_CELL. ep_row = me->freeze_pane_cell_row. ep_column = me->freeze_pane_cell_column. endmethod. - - + + method GET_GUID. ep_guid = me->guid. endmethod. - - + + method GET_HIGHEST_COLUMN. me->update_dimension_range( ). r_highest_column = me->lower_cell-cell_column. endmethod. - - + + method GET_HIGHEST_ROW. me->update_dimension_range( ). r_highest_row = me->lower_cell-cell_row. endmethod. - - + + method GET_HYPERLINKS_ITERATOR. eo_iterator = hyperlinks->get_iterator( ). endmethod. - - + + method GET_HYPERLINKS_SIZE. ep_size = hyperlinks->size( ). endmethod. - - + + method GET_MERGE. DATA: lv_column_start TYPE string, @@ -3256,9 +3269,9 @@ endmethod. endmethod. - - - + + + method GET_ROW_DIMENSION. FIELD-SYMBOLS: <fs_row_dimension> LIKE LINE OF row_dimensions. @@ -3278,27 +3291,27 @@ endmethod. endmethod. - - + + method GET_ROW_DIMENSIONS. r_row_dimension[] = me->row_dimensions[]. endmethod. - - + + method GET_TABLES_ITERATOR. eo_iterator = tables->if_object_collection~get_iterator( ). endmethod. - - + + method GET_TABLES_SIZE. ep_size = tables->if_object_collection~size( ). endmethod. - - - + + + method GET_TITLE. DATA lv_value TYPE string. IF ip_escaped EQ abap_true. @@ -3313,10 +3326,11 @@ endmethod. - method GET_VALUE_TYPE. - DATA: lo_addit TYPE REF TO cl_abap_elemdescr, - ls_dfies TYPE dfies, - l_function TYPE funcname. + METHOD get_value_type. + DATA: lo_addit TYPE REF TO cl_abap_elemdescr, + ls_dfies TYPE dfies, + l_function TYPE funcname, + l_value(50) TYPE c. ep_value = ip_value. ep_value_type = cl_abap_typedescr=>typekind_string. " Thats our default if something goes wrong. @@ -3327,46 +3341,52 @@ endmethod. CLEAR lo_addit. ENDTRY. IF lo_addit IS BOUND. - ls_dfies = lo_addit->get_ddic_field( ) . + lo_addit->get_ddic_field( RECEIVING p_flddescr = ls_dfies + EXCEPTIONS not_found = 1 + no_ddic_type = 2 + others = 3 ) . + IF sy-subrc = 0. + ep_value_type = ls_dfies-inttype. - ep_value_type = ls_dfies-inttype. - - IF ls_dfies-convexit IS NOT INITIAL. + IF ls_dfies-convexit IS NOT INITIAL. * We need to convert with output conversion function - CONCATENATE 'CONVERSION_EXIT_' ls_dfies-convexit '_OUTPUT' INTO l_function. - SELECT SINGLE funcname INTO l_function - FROM tfdir - WHERE funcname = l_function. - IF sy-subrc = 0. - CALL FUNCTION l_function - EXPORTING - input = ip_value - IMPORTING + CONCATENATE 'CONVERSION_EXIT_' ls_dfies-convexit '_OUTPUT' INTO l_function. + SELECT SINGLE funcname INTO l_function + FROM tfdir + WHERE funcname = l_function. + IF sy-subrc = 0. + CALL FUNCTION l_function + EXPORTING + input = ip_value + IMPORTING * LONG_TEXT = - output = ep_value + output = l_value * SHORT_TEXT = - EXCEPTIONS - OTHERS = 1 - . - IF sy-subrc <> 0. + EXCEPTIONS + OTHERS = 1 + . + IF sy-subrc <> 0. * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4. + ELSE. + ep_value = l_value. + ENDIF. ENDIF. ENDIF. ENDIF. ENDIF. -endmethod. +ENDMETHOD. - - - - - - - - - + + + + + + + + + METHOD set_cell. @@ -3485,10 +3505,10 @@ endmethod. ENDMETHOD. - - - - + + + + method SET_CELL_STYLE. @@ -3515,8 +3535,8 @@ ENDMETHOD. endmethod. - - + + method SET_DEFAULT_EXCEL_DATE_FORMAT. IF ip_default_excel_date_format IS INITIAL. @@ -3528,11 +3548,11 @@ endmethod. default_excel_date_format = ip_default_excel_date_format. endmethod. - - - - - + + + + + method SET_MERGE. DATA: lv_column_start TYPE zexcel_cell_column, @@ -3569,31 +3589,31 @@ endmethod. endmethod. - - + + method SET_PRINT_GRIDLINES. me->print_gridlines = i_print_gridlines. endmethod. - - + + method SET_SHOW_GRIDLINES. me->show_gridlines = i_show_gridlines. endmethod. - - + + method SET_SHOW_ROWCOLHEADERS. me->show_rowcolheaders = i_show_rowcolheaders. endmethod. - - - - - - - + + + + + + + method SET_TABLE. DATA: lo_tabdescr TYPE REF TO cl_abap_structdescr, @@ -3650,8 +3670,8 @@ endmethod. endmethod. - - + + method SET_TITLE. me->title = ip_title. endmethod.