SAP/abap2xlsx
1
0
Fork 0
mirror of https://github.com/abap2xlsx/abap2xlsx.git synced 2025-05-05 16:46:11 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

added http://www.abap2xlsx.org link to demo 1 and angry birds demo

Browse Source 
git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@241 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
This commit is contained in:
Ivan Femia 2012-01-02 23:16:25 +00:00
parent e529d84ff5
commit da8948942f
2 changed files with 24 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
ZA2X/PROG/ZANGRY_BIRDS.slnk
View File

@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-16"?> <?xml version="1.0" encoding="utf-16"?>
<PROG NAME="ZANGRY_BIRDS" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20111120" UNAM="FEMIA" UDAT="20111121" VERN="000044" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20111121" STIME="004451" IDATE="20111121" ITIME="004451" UCCHECK="X"> <PROG NAME="ZANGRY_BIRDS" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20111120" UNAM="FEMIA" UDAT="20120102" VERN="000045" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20120102" STIME="210855" IDATE="20120102" ITIME="210855" UCCHECK="X">
<textPool> <textPool>
<language SPRAS="E"> <language SPRAS="E">
<textElement ID="R" ENTRY="abap2xlsx Demo: Styles" LENGTH="25 "/> <textElement ID="R" ENTRY="abap2xlsx Demo: Styles" LENGTH="25 "/>
@ -29,8 +29,10 @@ DATA: lo_excel TYPE REF TO zcl_excel,
lo_style_color6 TYPE REF TO zcl_excel_style, lo_style_color6 TYPE REF TO zcl_excel_style,
lo_style_color7 TYPE REF TO zcl_excel_style, lo_style_color7 TYPE REF TO zcl_excel_style,
lo_style_credit TYPE REF TO zcl_excel_style, lo_style_credit TYPE REF TO zcl_excel_style,
lo_style_link TYPE REF TO zcl_excel_style,
lo_column_dimension TYPE REF TO zcl_excel_worksheet_columndime, lo_column_dimension TYPE REF TO zcl_excel_worksheet_columndime,
lo_row_dimension TYPE REF TO zcl_excel_worksheet_rowdimensi. lo_row_dimension TYPE REF TO zcl_excel_worksheet_rowdimensi,
lo_hyperlink TYPE REF TO zcl_excel_hyperlink.
DATA: lv_style_color0_guid TYPE zexcel_cell_style, DATA: lv_style_color0_guid TYPE zexcel_cell_style,
lv_style_color1_guid TYPE zexcel_cell_style, lv_style_color1_guid TYPE zexcel_cell_style,
@ -41,6 +43,7 @@ DATA: lv_style_color0_guid TYPE zexcel_cell_style,
lv_style_color6_guid TYPE zexcel_cell_style, lv_style_color6_guid TYPE zexcel_cell_style,
lv_style_color7_guid TYPE zexcel_cell_style, lv_style_color7_guid TYPE zexcel_cell_style,
lv_style_credit_guid TYPE zexcel_cell_style, lv_style_credit_guid TYPE zexcel_cell_style,
lv_style_link_guid TYPE zexcel_cell_style,
lv_style TYPE zexcel_cell_style. lv_style TYPE zexcel_cell_style.
DATA: lv_col_str TYPE zexcel_cell_column_alpha, DATA: lv_col_str TYPE zexcel_cell_column_alpha,
@ -150,6 +153,13 @@ START-OF-SELECTION.
lo_style_credit-&gt;font-&gt;size = 20. lo_style_credit-&gt;font-&gt;size = 20.
lv_style_credit_guid = lo_style_credit-&gt;get_guid( ). lv_style_credit_guid = lo_style_credit-&gt;get_guid( ).
&quot; Link
lo_style_link = lo_excel-&gt;add_new_style( ).
lo_style_link-&gt;alignment-&gt;horizontal = zcl_excel_style_alignment=&gt;c_horizontal_center.
lo_style_link-&gt;alignment-&gt;vertical = zcl_excel_style_alignment=&gt;c_vertical_center.
* lo_style_link-&gt;font-&gt;size = 20.
lv_style_link_guid = lo_style_link-&gt;get_guid( ).
&quot; Create image map &quot; line 2 &quot; Create image map &quot; line 2
DO 30 TIMES. APPEND lv_style_color0_guid TO lt_mapper. ENDDO. DO 30 TIMES. APPEND lv_style_color0_guid TO lt_mapper. ENDDO.
DO 2 TIMES. APPEND lv_style_color1_guid TO lt_mapper. ENDDO. DO 2 TIMES. APPEND lv_style_color1_guid TO lt_mapper. ENDDO.
@ -720,10 +730,18 @@ START-OF-SELECTION.
ip_row = 15 ip_row = 15
ip_value = &apos;Created with abap2xlsx&apos; ip_value = &apos;Created with abap2xlsx&apos;
ip_style = lv_style_credit_guid ). ip_style = lv_style_credit_guid ).
lo_hyperlink = zcl_excel_hyperlink=&gt;create_external_link( iv_url = &apos;http://www.abap2xlsx.org&apos; ).
lo_worksheet-&gt;set_cell( ip_column = &apos;AP&apos;
ip_row = 24
ip_value = &apos;http://www.abap2xlsx.org&apos;
ip_style = lv_style_link_guid
ip_hyperlink = lo_hyperlink ).
lo_column_dimension = lo_worksheet-&gt;get_column_dimension( ip_column = &apos;AP&apos; ). lo_column_dimension = lo_worksheet-&gt;get_column_dimension( ip_column = &apos;AP&apos; ).
lo_column_dimension-&gt;set_auto_size( ip_auto_size = abap_true ). lo_column_dimension-&gt;set_auto_size( ip_auto_size = abap_true ).
lo_worksheet-&gt;set_merge( ip_row = 15 ip_column_start = &apos;AP&apos; ip_row_to = 22 ip_column_end = &apos;AR&apos; ). lo_worksheet-&gt;set_merge( ip_row = 15 ip_column_start = &apos;AP&apos; ip_row_to = 22 ip_column_end = &apos;AR&apos; ).
lo_worksheet-&gt;set_merge( ip_row = 24 ip_column_start = &apos;AP&apos; ip_row_to = 26 ip_column_end = &apos;AR&apos; ).
CREATE OBJECT lo_excel_writer TYPE zcl_excel_writer_2007. CREATE OBJECT lo_excel_writer TYPE zcl_excel_writer_2007.
lv_file = lo_excel_writer-&gt;write_file( lo_excel ). lv_file = lo_excel_writer-&gt;write_file( lo_excel ).

5
ZA2X/PROG/ZDEMO_EXCEL1.slnk
View File

@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-16"?> <?xml version="1.0" encoding="utf-16"?>
<PROG NAME="ZDEMO_EXCEL1" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20100711" UNAM="FEMIA" UDAT="20110528" VERN="000059" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20110530" STIME="095303" IDATE="20110528" ITIME="181954" UCCHECK="X"> <PROG NAME="ZDEMO_EXCEL1" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20100711" UNAM="FEMIA" UDAT="20120103" VERN="000063" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20120103" STIME="001528" IDATE="20120103" ITIME="001528" UCCHECK="X">
<textPool> <textPool>
<language SPRAS="E"> <language SPRAS="E">
<textElement ID="R" ENTRY="abap2xlsx Demo: Hello World" LENGTH="27 "/> <textElement ID="R" ENTRY="abap2xlsx Demo: Hello World" LENGTH="27 "/>
@ -16,6 +16,7 @@
REPORT zdemo_excel1. REPORT zdemo_excel1.
DATA: lo_excel TYPE REF TO zcl_excel, DATA: lo_excel TYPE REF TO zcl_excel,
lo_excel_writer TYPE REF TO zif_excel_writer, lo_excel_writer TYPE REF TO zif_excel_writer,
lo_worksheet TYPE REF TO zcl_excel_worksheet, lo_worksheet TYPE REF TO zcl_excel_worksheet,
@ -62,7 +63,7 @@ START-OF-SELECTION.
lo_worksheet-&gt;set_cell( ip_column = &apos;B&apos; ip_row = 2 ip_value = &apos;Hello world&apos; ). lo_worksheet-&gt;set_cell( ip_column = &apos;B&apos; ip_row = 2 ip_value = &apos;Hello world&apos; ).
lo_worksheet-&gt;set_cell( ip_column = &apos;B&apos; ip_row = 3 ip_value = sy-datum ). lo_worksheet-&gt;set_cell( ip_column = &apos;B&apos; ip_row = 3 ip_value = sy-datum ).
lo_worksheet-&gt;set_cell( ip_column = &apos;C&apos; ip_row = 3 ip_value = sy-uzeit ). lo_worksheet-&gt;set_cell( ip_column = &apos;C&apos; ip_row = 3 ip_value = sy-uzeit ).
lo_hyperlink = zcl_excel_hyperlink=&gt;create_external_link( iv_url = &apos;https://cw.sdn.sap.com/cw/groups/abap2xlsx&apos; ). lo_hyperlink = zcl_excel_hyperlink=&gt;create_external_link( iv_url = &apos;http://www.abap2xlsx.org&apos; ).
lo_worksheet-&gt;set_cell( ip_column = &apos;B&apos; ip_row = 4 ip_value = &apos;Click here to visit abap2xlsx homepage&apos; ip_hyperlink = lo_hyperlink ). lo_worksheet-&gt;set_cell( ip_column = &apos;B&apos; ip_row = 4 ip_value = &apos;Click here to visit abap2xlsx homepage&apos; ip_hyperlink = lo_hyperlink ).
column_dimension = lo_worksheet-&gt;get_column_dimension( ip_column = &apos;B&apos; ). column_dimension = lo_worksheet-&gt;get_column_dimension( ip_column = &apos;B&apos; ).