add basic unit test for style changer

This commit is contained in:
larshp 2023-07-26 17:03:00 +00:00
parent 1fe298d5be
commit 9f2812758f
2 changed files with 44 additions and 4 deletions

View File

@ -9,12 +9,11 @@ CLASS zcl_excel_style_changer DEFINITION
CLASS-METHODS create CLASS-METHODS create
IMPORTING IMPORTING
excel TYPE REF TO zcl_excel !excel TYPE REF TO zcl_excel
RETURNING RETURNING
VALUE(result) TYPE REF TO zif_excel_style_changer VALUE(result) TYPE REF TO zif_excel_style_changer
RAISING RAISING
zcx_excel . zcx_excel .
PROTECTED SECTION. PROTECTED SECTION.
PRIVATE SECTION. PRIVATE SECTION.

View File

@ -0,0 +1,41 @@
CLASS ltcl_test DEFINITION FOR TESTING DURATION SHORT RISK LEVEL HARMLESS FINAL.
PRIVATE SECTION.
DATA mi_cut TYPE REF TO zif_excel_style_changer.
DATA mo_excel TYPE REF TO zcl_excel.
DATA mo_worksheet TYPE REF TO zcl_excel_worksheet.
METHODS setup RAISING cx_static_check.
METHODS apply FOR TESTING RAISING cx_static_check.
ENDCLASS.
CLASS ltcl_test IMPLEMENTATION.
METHOD setup.
CREATE OBJECT mo_excel.
mo_worksheet = mo_excel->get_active_worksheet( ).
mi_cut = zcl_excel_style_changer=>create( mo_excel ).
ENDMETHOD.
METHOD apply.
DATA lv_guid TYPE zexcel_cell_style.
mo_worksheet->set_cell(
ip_column = 'B'
ip_row = 2
ip_value = 'Hello' ).
mi_cut->set_font_bold( abap_true ).
lv_guid = mi_cut->apply(
ip_worksheet = mo_worksheet
ip_column = 'B'
ip_row = 2 ).
mo_excel->get_style_to_guid( lv_guid ).
ENDMETHOD.
ENDCLASS.