• Header row has bold white text on a blue background

• Data rows have standard black font

• Salary column is formatted as currency
  

CLASS zcl_create_excel_xco DEFINITION
PUBLIC
FINAL
CREATE PUBLIC.

PUBLIC SECTION.
METHODS create_employee_excel.
ENDCLASS.

CLASS zcl_create_excel_xco IMPLEMENTATION.

METHOD create_employee_excel.

“————————————————-
” Step 1: Define data
“————————————————-
TYPES: BEGIN OF ty_employee,
empid TYPE string,
name TYPE string,
department TYPE string,
salary TYPE p DECIMALS 2,
END OF ty_employee.

DATA(lt_employees) = VALUE STANDARD TABLE OF ty_employee(
( empid = ‘E001’ name = ‘Alice’ department = ‘IT’ salary = ‘65000’ )
( empid = ‘E002’ name = ‘Bob’ department = ‘HR’ salary = ‘55000’ )
( empid = ‘E003’ name = ‘Carol’ department = ‘Finance’ salary = ‘72000’ )
).

“————————————————-
” Step 2: Create Excel document
“————————————————-
DATA(lo_doc) = xco_cp_xlsx=>document->create( ).

” Add sheet
DATA(lo_sheet) = lo_doc->sheets->add( ‘Employees’ ).

“————————————————-
” Step 3: Define styles
“————————————————-
DATA(lo_styles) = lo_doc->styles.

” Header style: bold + white text + blue background
DATA(lo_style_header) = lo_styles->add( ).
lo_style_header->font->name->set( ‘Calibri’ ).
lo_style_header->font->bold->set( abap_true ).
lo_style_header->font->color->set_rgb( ‘FFFFFF’ ).
lo_style_header->fill->color->set_rgb( ‘4472C4’ ). ” Blue background
lo_style_header->alignment->horizontal->set( xco_cp_xlsx_alignment=>horizontal->center ).

” Normal cell style
DATA(lo_style_normal) = lo_styles->add( ).
lo_style_normal->font->name->set( ‘Calibri’ ).
lo_style_normal->font->size->set( 11 ).

” Salary style (number format)
DATA(lo_style_salary) = lo_styles->add( ).
lo_style_salary->font->name->set( ‘Calibri’ ).
lo_style_salary->number_format->set( xco_cp_xlsx_number_format=>builtin->currency_2 ).

“————————————————-
” Step 4: Write header row
“————————————————-
DATA(lo_header_row) = lo_sheet->rows->add( 1 ).

lo_header_row->cells->add( 1 )->value->set( ‘EmpID’ )->style->set( lo_style_header ).
lo_header_row->cells->add( 2 )->value->set( ‘Name’ )->style->set( lo_style_header ).
lo_header_row->cells->add( 3 )->value->set( ‘Department’ )->style->set( lo_style_header ).
lo_header_row->cells->add( 4 )->value->set( ‘Salary’ )->style->set( lo_style_header ).

“————————————————-
” Step 5: Fill data rows
“————————————————-
DATA(lv_row_index) = 2.

LOOP AT lt_employees INTO DATA(ls_emp).
DATA(lo_row) = lo_sheet->rows->add( lv_row_index ).

lo_row->cells->add( 1 )->value->set( ls_emp-empid )->style->set( lo_style_normal ).
lo_row->cells->add( 2 )->value->set( ls_emp-name )->style->set( lo_style_normal ).
lo_row->cells->add( 3 )->value->set( ls_emp-department )->style->set( lo_style_normal ).
lo_row->cells->add( 4 )->value->set( ls_emp-salary )->style->set( lo_style_salary ).

lv_row_index += 1.
ENDLOOP.

” Auto-fit columns
lo_sheet->columns->auto_fit( ).

“————————————————-
” Step 6: Export as XSTRING and save to frontend
“————————————————-
DATA(lv_xstring) = lo_doc->to_binary( ).

” Save file to frontend
DATA(lv_file_name) = ‘C:\Temp\employees.xlsx’.

TRY.
cl_gui_frontend_services=>gui_download(
EXPORTING
bin_filesize = xstrlen( lv_xstring )
filename = lv_file_name
filetype = ‘BIN’
CHANGING
data_tab = cl_bcs_convert=>xstring_to_solix( lv_xstring )
).
WRITE: / ‘Excel file created successfully:’, lv_file_name.
CATCH cx_root INTO DATA(lx_err).
WRITE: / ‘Error saving file:’, lx_err->get_text( ).
ENDTRY.

ENDMETHOD.

ENDCLASS.

CLASS zcl_create_xsl_demo DEFINITION
PUBLIC
FINAL
CREATE PUBLIC.

PUBLIC SECTION.
METHODS create_xsl.
ENDCLASS.

CLASS zcl_create_xsl_demo IMPLEMENTATION.

METHOD create_xsl.
” Get the package where the object will be created
DATA(lo_package) = xco_cp_abap_repository=>package->for( ‘Z_MY_PACKAGE’ ).

” Define the transformation name
DATA(lo_xsl_name) = xco_cp_abap_repository=>object_name->for( ‘Z_MY_XSLT’ ).

” Define the transformation source code
DATA(lv_xsl_source) = |<?xml version=”1.0″ encoding=”UTF-8″?>| &&
|\n<xsl:stylesheet version=”1.0″ xmlns:xsl=”http://www.w3.org/1999/XSL/Transform”>| &&
|\n <xsl:template match=”/”>| &&
|\n <output>| &&
|\n <xsl:value-of select=”/root/value”/>| &&
|\n </output>| &&
|\n </xsl:template>| &&
|\n</xsl:stylesheet>|.

” Create a new transformation object
DATA(lo_xsl_object) =
xco_cp_abap_repository=>object->transformation->create(
object_name = lo_xsl_name
package = lo_package
).

” Set the source code of the transformation
lo_xsl_object->source->set( lv_xsl_source ).

” Persist (activate) the transformation in the repository
lo_xsl_object->save( xco_cp_abap_repository=>activation_mode->active ).

WRITE: / ‘XSL Transformation Z_MY_XSLT created and activated successfully.’.
ENDMETHOD.

ENDCLASS.