git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@391 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
This commit is contained in:
Alessandro Iannacci 2012-12-05 16:31:44 +00:00
parent 359be03cf5
commit 8779be0adf

View File

@ -33,7 +33,6 @@ DATA: ls_upper TYPE zexcel_drawing_location,
DATA lo_bar TYPE REF TO zcl_excel_graph_bars.
DATA lo_bar2 TYPE REF TO zcl_excel_graph_bars.
DATA lo_pie TYPE REF TO zcl_excel_graph_pie.
DATA lv_media TYPE xstring.
CONSTANTS: gc_save_file_name TYPE string VALUE '39_Charts.xlsx'.
INCLUDE zdemo_excel_outputopt_incl.
@ -81,142 +80,138 @@ START-OF-SELECTION.
CREATE OBJECT lo_pie.
CALL METHOD lo_pie->create_serie
EXPORTING
ip_idx = 0
ip_order = 0
ip_lbl = 'Sheet1!$B$1:$B$3'
ip_REF = 'Sheet1!$A$1:$A$3'
ip_sername = 'My serie 1'
.
EXPORTING
ip_order = 0
ip_sheet = 'Sheet1'
ip_lbl_from_col = 'B'
ip_lbl_from_row = '1'
ip_lbl_to_col = 'B'
ip_lbl_to_row = '3'
ip_ref_from_col = 'A'
ip_ref_from_row = '1'
ip_ref_to_col = 'A'
ip_ref_to_row = '3'
ip_sername = 'My serie 1'.
CALL METHOD lo_pie->create_serie
EXPORTING
ip_idx = 1
ip_order = 1
ip_lbl = 'Sheet1!$D$1:$D$3'
ip_REF = 'Sheet1!$C$1:$C$3'
ip_sername = 'My serie 2'
.
" Set style
lo_pie->set_style( zcl_excel_graph=>c_style_15 ).
" Create a bar chart, series and axes
CREATE OBJECT lo_bar.
CALL METHOD lo_bar->create_serie
EXPORTING
ip_idx = 0
ip_order = 0
ip_invertIfNegative = '0'
ip_lbl = 'Sheet1!$D$1:$D$3'
ip_REF = 'Sheet1!$C$1:$C$3'
ip_sername = 'My serie 1'
.
EXPORTING
ip_order = 0
ip_invertifnegative = zcl_excel_graph_bars=>c_invertifnegative_no
ip_lbl = 'Sheet1!$D$1:$D$3'
ip_ref = 'Sheet1!$C$1:$C$3'
ip_sername = 'My serie 1'.
CALL METHOD lo_bar->create_serie
EXPORTING
ip_idx = 1
ip_order = 1
ip_invertIfNegative = '0'
ip_lbl = 'Sheet1!$B$1:$B$3'
ip_REF = 'Sheet1!$A$1:$A$3'
ip_sername = 'My serie 2'
.
EXPORTING
ip_order = 1
ip_invertifnegative = zcl_excel_graph_bars=>c_invertifnegative_no
ip_lbl = 'Sheet1!$B$1:$B$3'
ip_ref = 'Sheet1!$A$1:$A$3'
ip_sername = 'My serie 2'.
CALL METHOD lo_bar->create_ax
EXPORTING
* ip_axid =
* ip_axid =
ip_type = zcl_excel_graph_bars=>c_catax
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
CALL METHOD lo_bar->create_ax
EXPORTING
* ip_axid =
* ip_axid =
ip_type = zcl_excel_graph_bars=>c_valax
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
" Set style
lo_bar->set_style( zcl_excel_graph=>c_style_16 ).
" Create a bar chart, series and axes
CREATE OBJECT lo_bar2.
CALL METHOD lo_bar2->create_serie
EXPORTING
ip_idx = 0
ip_order = 0
ip_invertIfNegative = '0'
ip_lbl = 'Sheet1!$D$1:$D$3'
ip_REF = 'Sheet1!$C$1:$C$3'
ip_sername = 'My serie 1'
.
EXPORTING
ip_order = 0
ip_invertifnegative = zcl_excel_graph_bars=>c_invertifnegative_no
ip_lbl = 'Sheet1!$D$1:$D$3'
ip_ref = 'Sheet1!$C$1:$C$3'
ip_sername = 'My serie 1'.
CALL METHOD lo_bar2->create_ax
EXPORTING
* ip_axid =
* ip_axid =
ip_type = zcl_excel_graph_bars=>c_catax
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
CALL METHOD lo_bar2->create_ax
EXPORTING
* ip_axid =
* ip_axid =
ip_type = zcl_excel_graph_bars=>c_valax
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
* ip_orientation =
* ip_delete =
* ip_axpos =
* ip_formatcode =
* ip_sourcelinked =
* ip_majortickmark =
* ip_minortickmark =
* ip_ticklblpos =
* ip_crossax =
* ip_crosses =
* ip_auto =
* ip_lblalgn =
* ip_lbloffset =
* ip_nomultilvllbl =
* ip_crossbetween =
.
" Create global drawing, set type as pie chart, assign chart, set position and media type
@ -236,10 +231,7 @@ START-OF-SELECTION.
lo_drawing->set_media(
EXPORTING
ip_media = lv_media "used for template (binary content)
ip_media_type = 'xml'
ip_width = 0 "used only for image types, not for charts
ip_height = 0 ). "used only for image types, not for charts
ip_media_type = zcl_excel_drawing=>c_media_type_xml ).
lo_worksheet->add_drawing( lo_drawing ).
@ -263,11 +255,7 @@ START-OF-SELECTION.
lo_drawing->set_media(
EXPORTING
ip_media = lv_media "used for template (binary content)
ip_media_type = 'xml'
ip_width = 0 "used only for image types, not for charts
ip_height = 0 ). "used only for image types, not for charts
ip_media_type = zcl_excel_drawing=>c_media_type_xml ).
lo_worksheet->add_drawing( lo_drawing ).
@ -290,11 +278,7 @@ START-OF-SELECTION.
lo_drawing->set_media(
EXPORTING
ip_media = lv_media "used for template (binary content)
ip_media_type = 'xml'
ip_width = 0 "used only for image types, not for charts
ip_height = 0 ). "used only for image types, not for charts
ip_media_type = zcl_excel_drawing=>c_media_type_xml ).
lo_worksheet->add_drawing( lo_drawing ).