Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/antonsikidin/xlsx_template_filler
Best way to generate Microsoft Excel xlsx from template in abap
https://github.com/antonsikidin/xlsx_template_filler
abap excel xlsx
Last synced: about 8 hours ago
JSON representation
Best way to generate Microsoft Excel xlsx from template in abap
- Host: GitHub
- URL: https://github.com/antonsikidin/xlsx_template_filler
- Owner: AntonSikidin
- Created: 2020-05-19T14:24:10.000Z (over 4 years ago)
- Default Branch: master
- Last Pushed: 2020-05-23T09:44:01.000Z (over 4 years ago)
- Last Synced: 2024-11-11T21:28:52.188Z (about 2 months ago)
- Topics: abap, excel, xlsx
- Size: 228 KB
- Stars: 2
- Watchers: 2
- Forks: 2
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
Awesome Lists containing this project
README
# Best way to generate Microsoft Excel xlsx from template in ABAP
This repo contain only instruction, source here https://github.com/AntonSikidin/abap2xlsx
Maybe, this video instruction explain better than me.
[](http://www.youtube.com/watch?v=hU5WWpdt6wQ "Best way to generate Microsoft Excel xlsx from template in ABAPP.")
# Installation
Install package via ABAPGIT https://docs.abapgit.org/guide-install.html
Clone repo https://github.com/AntonSikidin/abap2xlsx
# Make template
For example, something like this:
Each variable - in square bracket [variable]
Variable name is field name in data structure.
For rows which will be multiplied - create a Named Range:
Select whole row or rows, next - go to Formulas, next – go to Define name.
Save and close template.
# Generate data types
- Run program ZDEMO_EXCEL_GET_TYPES.
- Navigate path to your template.
- Run.
- Copy all text.
# Write program
Past selected text.
Define variable for each sheet in your report:
```
data
: gs_sheet1 type t_sheet1
, gs_sheet2 type t_sheet2
, lo_data type ref to ZCL_EXCEL_TEMPLATE_DATA
.
```
Fill it with data.
Create object to hold your data:
```
create object lo_data.
```
Add each sheet to object lo_data:
```
lo_data->add( iv_sheet = 'Sheet1' iv_data = gs_sheet1 ).
lo_data->add( iv_sheet = 'Sheet2' iv_data = gs_sheet2 ).
```
```
create object reader type zcl_excel_reader_2007.
lo_excel = reader->load_file( p_fpath ).
* merge data with template
lo_excel->fill_template( lo_data ).
*** Create output
lcl_output=>output( lo_excel ).
```
Whole program:
```
*&---------------------------------------------------------------------*
*& Report Fill Template
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
report zdemo_excel_fill_template.
TYPES
: begin of t_TABLE1
, PERSON type string
, SALARY type i
, end of t_TABLE1
, tt_TABLE1 type table of t_TABLE1 with empty key
, begin of t_LINE1
, CARRID type string
, CONNID type string
, FLDATE type string
, PRICE type i
, end of t_LINE1
, tt_LINE1 type table of t_LINE1 with empty key
, begin of t_TABLE2
, CARRID type string
, PRICE type i
, LINE1 type tt_LINE1
, end of t_TABLE2
, tt_TABLE2 type table of t_TABLE2 with empty key
, begin of t_Sheet1
, DATE type string
, TIME type string
, USER type string
, TOTAL type i
, PRICE type i
, TABLE1 type tt_TABLE1
, TABLE2 type tt_TABLE2
, end of t_Sheet1
, begin of t_TABLE3
, PERSON type string
, SALARY type i
, end of t_TABLE3
, tt_TABLE3 type table of t_TABLE3 with empty key
, begin of t_Sheet2
, DATE type string
, TIME type string
, USER type string
, TOTAL type i
, TABLE3 type tt_TABLE3
, end of t_Sheet2
.
DATA
: lo_data type ref to ZCL_EXCEL_TEMPLATE_DATA
, gs_sheet1 TYPE t_Sheet1
, gs_sheet2 TYPE t_Sheet2
.
* define variables
data: lo_excel type ref to zcl_excel,
reader type ref to zif_excel_reader.
constants: gc_save_file_name type string value 'fill_template_example.xlsx'.
include zdemo_excel_outputopt_incl.
parameters: p_fpath type string obligatory lower case default 'C:\Users\sadfasdf\Desktop\abap2xlsx\ZABAP2XLSX_EXAMPLE.xlsx'.
parameters: p_file radiobutton group rad1 default 'X'
, p_smw0 radiobutton group rad1
.
at selection-screen on value-request for p_fpath.
perform get_file_path changing p_fpath.
start-of-selection.
create object lo_data.
* generate data
gs_sheet1 = value #(
date = |{ sy-datum date = environment }|
time = |{ sy-uzeit time = environment }|
user = |{ sy-uname }|
table1 = value #(
( person = 'Lurch Schpellchek' salary = '1200' )
( person = 'Russell Sprout' salary = '1300' )
( person = 'Fergus Douchebag' salary = '3000' )
( person = 'Bartholomew Shoe' salary = '100' )
)
total = '5600'
table2 = value #(
( line1 = value #(
( carrid = 'AC' connid = '0820' fldate = '20.12.2002' price = '1222' )
)
carrid ='AC'
price = '1222'
)
( line1 = value #(
( carrid = 'AF' connid = '0820' fldate = '23.12.2002' price = '2222' )
)
carrid ='AF'
price = '2222'
)
( line1 = value #(
( carrid = 'LH' connid = '0400' fldate = '28.02.1995' price = '899' )
( carrid = 'LH' connid = '0454' fldate = '17.11.1995' price = '1499' )
( carrid = 'LH' connid = '0455' fldate = '06.06.1995' price = '1090' )
( carrid = 'LH' connid = '0455' fldate = '28.04.1995' price = '6000' )
( carrid = 'LH' connid = '9981' fldate = '21.12.2002' price = '222' )
)
carrid ='LH'
price = '9488'
)
( line1 = value #(
( carrid = 'SQ' connid = '0026' fldate = '28.02.1995' price = '849' )
)
carrid ='SQ'
price = '849'
)
( line1 = value #(
( carrid = 'LH' connid = '0400' fldate = '28.02.1995' price = '899' )
( carrid = 'LH' connid = '0454' fldate = '17.11.1995' price = '1499' )
( carrid = 'LH' connid = '0455' fldate = '06.06.1995' price = '1090' )
( carrid = 'LH' connid = '0455' fldate = '28.04.1995' price = '6000' )
( carrid = 'LH' connid = '9981' fldate = '21.12.2002' price = '222' )
)
carrid ='LH'
price = '9488'
)
( line1 = value #(
( carrid = 'SQ' connid = '0026' fldate = '28.02.1995' price = '849' )
)
carrid ='SQ'
price = '849'
)
( line1 = value #(
( carrid = 'LH' connid = '0400' fldate = '28.02.1995' price = '899' )
( carrid = 'LH' connid = '0454' fldate = '17.11.1995' price = '1499' )
( carrid = 'LH' connid = '0455' fldate = '06.06.1995' price = '1090' )
( carrid = 'LH' connid = '0455' fldate = '28.04.1995' price = '6000' )
( carrid = 'LH' connid = '9981' fldate = '21.12.2002' price = '222' )
)
carrid ='LH'
price = '9488'
)
( line1 = value #(
( carrid = 'SQ' connid = '0026' fldate = '28.02.1995' price = '849' )
)
carrid ='SQ'
price = '849'
)
( line1 = value #(
( carrid = 'LH' connid = '0400' fldate = '28.02.1995' price = '899' )
( carrid = 'LH' connid = '0454' fldate = '17.11.1995' price = '1499' )
( carrid = 'LH' connid = '0455' fldate = '06.06.1995' price = '1090' )
( carrid = 'LH' connid = '0455' fldate = '28.04.1995' price = '6000' )
( carrid = 'LH' connid = '9981' fldate = '21.12.2002' price = '222' )
)
carrid ='LH'
price = '9488'
)
( line1 = value #(
( carrid = 'SQ' connid = '0026' fldate = '28.02.1995' price = '849' )
)
carrid ='SQ'
price = '849'
)
( line1 = value #(
( carrid = 'LH' connid = '0400' fldate = '28.02.1995' price = '899' )
( carrid = 'LH' connid = '0454' fldate = '17.11.1995' price = '1499' )
( carrid = 'LH' connid = '0455' fldate = '06.06.1995' price = '1090' )
( carrid = 'LH' connid = '0455' fldate = '28.04.1995' price = '6000' )
( carrid = 'LH' connid = '9981' fldate = '21.12.2002' price = '222' )
)
carrid ='LH'
price = '9488'
)
( line1 = value #(
( carrid = 'SQ' connid = '0026' fldate = '28.02.1995' price = '849' )
)
carrid ='SQ'
price = '849'
)
)
price = '14003'
).
gs_sheet2 = value #(
date = |{ sy-datum date = environment }|
time = |{ sy-uzeit time = environment }|
user = |{ sy-uname }|
table3 = value #(
( person = 'Lurch Schpellchek' salary = '1200' )
( person = 'Russell Sprout' salary = '1300' )
( person = 'Fergus Douchebag' salary = '3000' )
( person = 'Bartholomew Shoe' salary = '100' )
)
total = '5600' ).
* add data
lo_data->add( iv_sheet = 'Sheet1' iv_data = gs_sheet1 ).
lo_data->add( iv_sheet = 'Sheet2' iv_data = gs_sheet2 ).
* create reader
create object reader type zcl_excel_reader_2007.
* load template
IF p_file is NOT INITIAL.
lo_excel = reader->load_file( p_fpath ).
else.
lo_excel = reader->load_smw0( 'ZEXCEL_DEMO_TEMPLATE' ).
ENDIF.
* merge data with template
lo_excel->fill_template( lo_data ).
*** Create output
lcl_output=>output( lo_excel ).
*&---------------------------------------------------------------------*
*& Form Get_file_path
*&---------------------------------------------------------------------*
form get_file_path changing cv_path type string.
clear cv_path.
data:
lv_rc type i,
lv_user_action type i,
lt_file_table type filetable,
ls_file_table like line of lt_file_table.
cl_gui_frontend_services=>file_open_dialog(
exporting
window_title = 'select template xlsx'
multiselection = ''
default_extension = '*.xlsx'
file_filter = 'Text file (*.xlsx)|*.xlsx|All (*.*)|*.*'
changing
file_table = lt_file_table
rc = lv_rc
user_action = lv_user_action
exceptions
others = 1
).
if sy-subrc = 0.
if lv_user_action = cl_gui_frontend_services=>action_ok.
if lt_file_table is not initial.
read table lt_file_table into ls_file_table index 1.
if sy-subrc = 0.
cv_path = ls_file_table-filename.
endif.
endif.
endif.
endif.
endform. " Get_file_path
```
# Information for contributor
There is some issues with merged cells and outlines.
My solution handles the simplest options like this:
When merged cells are entirely within or out of range.
But there are a few more cases that are not handled correctly.
They are not processed in any way.
I have no need and time to correct these shortcomings.
If you correct these shortcomings, your name will be immortalized as a contributor to this project.
Correct ZCL_EXCEL_FILL_TEMPLATE->FILL_RANGE( )
If you handle this, then you can apply the same actions to ZCL_EXCEL_WORKSHEET->MT_ROW_OUTLINES