mirror of
https://github.com/abap2xlsx/abap2xlsx.git
synced 2025-05-05 18:47:20 +08:00
c9fff4fa44
git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@372 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
79 lines
2.5 KiB
XML
79 lines
2.5 KiB
XML
<?xml version="1.0" encoding="utf-8"?>
|
|
<PROG NAME="ZDEMO_EXCEL39" VARCL="X" SUBC="1" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" UCCHECK="X">
|
|
<textPool>
|
|
<language SPRAS="E">
|
|
<textElement ID="R" ENTRY="abap2xlsx Demo: Drawings" LENGTH="25 "/>
|
|
<textElement ID="S" KEY="POBJTYPE" ENTRY="D ." LENGTH="9 "/>
|
|
<textElement ID="S" KEY="P_CLASS" ENTRY="D ." LENGTH="9 "/>
|
|
<textElement ID="S" KEY="P_OBJID" ENTRY="D ." LENGTH="9 "/>
|
|
<textElement ID="S" KEY="P_PATH" ENTRY="D ." LENGTH="9 "/>
|
|
</language>
|
|
</textPool>
|
|
<source>*&---------------------------------------------------------------------*
|
|
*& Report ZDEMO_EXCEL16
|
|
*&
|
|
*&---------------------------------------------------------------------*
|
|
*&
|
|
*&
|
|
*&---------------------------------------------------------------------*
|
|
|
|
REPORT zdemo_excel39.
|
|
|
|
DATA: lo_excel TYPE REF TO zcl_excel,
|
|
lo_worksheet TYPE REF TO zcl_excel_worksheet,
|
|
lo_drawing TYPE REF TO zcl_excel_drawing.
|
|
|
|
|
|
DATA: ls_io TYPE skwf_io.
|
|
|
|
DATA: ls_upper TYPE ZEXCEL_DRAWING_LOCATION,
|
|
ls_lower TYPE ZEXCEL_DRAWING_LOCATION.
|
|
|
|
CONSTANTS: gc_save_file_name TYPE string VALUE '39_Charts.xlsx'.
|
|
INCLUDE zdemo_excel_outputopt_incl.
|
|
|
|
START-OF-SELECTION.
|
|
|
|
" Creates active sheet
|
|
CREATE OBJECT lo_excel.
|
|
|
|
" Get active sheet
|
|
lo_worksheet = lo_excel->get_active_worksheet( ).
|
|
lo_worksheet->set_title( 'Sheet1' ).
|
|
|
|
" create global drawing, set position and media from web repository
|
|
lo_drawing = lo_worksheet->excel->add_new_drawing(
|
|
ip_type = zcl_excel_drawing=>type_chart
|
|
ip_title = 'titolografico' ).
|
|
|
|
data lo_bar type ref to ZCL_EXCEL_GRAPH_BARS.
|
|
|
|
create object lo_bar.
|
|
|
|
lo_bar->REF = ''. "VALUE RANGE FOR CHART
|
|
|
|
lo_drawing->graph = lo_bar.
|
|
|
|
ls_lower-row = 10.
|
|
ls_lower-col = 10.
|
|
|
|
lo_drawing->set_position2(
|
|
EXPORTING
|
|
ip_from = ls_upper
|
|
ip_to = ls_lower ).
|
|
|
|
lo_drawing->set_media(
|
|
EXPORTING
|
|
ip_media = '0' "usato per il template
|
|
ip_media_type = 'xml'
|
|
ip_width = 0 "usati solo per le immagini
|
|
ip_height = 0 ). "usati solo per le immagini
|
|
|
|
|
|
lo_worksheet->add_drawing( lo_drawing ).
|
|
|
|
|
|
*** Create output
|
|
lcl_output=>output( lo_excel ).</source>
|
|
</PROG>
|