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

Changed Demo 32 now it generates 2 files

Browse Source 
Demo32 and Demo33 included in Demo collection
Fix for issues #143 and #142 included in daily build


git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@268 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
This commit is contained in:
Ivan Femia 2012-03-19 19:29:50 +00:00
parent b0b4abea76
commit c765b00ac0
2 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ZA2X/PROG/ZDEMO_EXCEL.slnk
View File

@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-16"?> <?xml version="1.0" encoding="utf-16"?>
<PROG NAME="ZDEMO_EXCEL" VARCL="X" SUBC="1" CNAM="BCUSER" CDAT="20100817" UNAM="FEMIA" UDAT="20120120" VERN="000057" RSTAT="T" RMAND="000" RLOAD="E" FIXPT="X" SDATE="20120120" STIME="210140" IDATE="20120120" ITIME="210140" UCCHECK="X"> <PROG NAME="ZDEMO_EXCEL" VARCL="X" SUBC="1" CNAM="BCUSER" CDAT="20100817" UNAM="FEMIA" UDAT="20120319" VERN="000058" RSTAT="T" RMAND="000" RLOAD="E" FIXPT="X" SDATE="20120319" STIME="194008" IDATE="20120319" ITIME="194008" UCCHECK="X">
<textPool> <textPool>
<language SPRAS="E"> <language SPRAS="E">
<textElement ID="R" ENTRY="Run all ABAP2XLSX Demo Programs" LENGTH="31 "/> <textElement ID="R" ENTRY="Run all ABAP2XLSX Demo Programs" LENGTH="31 "/>
@ -67,6 +67,8 @@ START-OF-SELECTION.
&quot; SUBMIT zdemo_excel29 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: Macro enabled workbook &quot; SUBMIT zdemo_excel29 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: Macro enabled workbook
SUBMIT zdemo_excel30 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: ABAP Cell data types SUBMIT zdemo_excel30 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: ABAP Cell data types
SUBMIT zdemo_excel31 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: Autosize Column with different Font sizes SUBMIT zdemo_excel31 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: Autosize Column with different Font sizes
&quot; zdemo_excel32 is not added because it uses ALV and cannot be processed (Native)
SUBMIT zdemo_excel33 WITH p_path = p_path AND RETURN. &quot; abap2xlsx Demo: Table autofilter
&quot; &quot;
&quot; Reader/Writer Demo must always run at the end &quot; Reader/Writer Demo must always run at the end
&quot; to make sure all documents where created &quot; to make sure all documents where created

14
ZA2X/PROG/ZDEMO_EXCEL32.slnk
View File

@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-16"?> <?xml version="1.0" encoding="utf-16"?>
<PROG NAME="ZDEMO_EXCEL32" VARCL="X" SUBC="1" CNAM="RTURNHEIM" CDAT="20120212" UNAM="RTURNHEIM" UDAT="20120317" VERN="000025" RMAND="800" RLOAD="E" FIXPT="X" SDATE="20120317" STIME="174011" IDATE="20120317" ITIME="174011" UCCHECK="X"> <PROG NAME="ZDEMO_EXCEL32" VARCL="X" SUBC="1" CNAM="RTURNHEIM" CDAT="20120212" UNAM="FEMIA" UDAT="20120319" VERN="000027" RMAND="800" RLOAD="E" FIXPT="X" SDATE="20120319" STIME="193719" IDATE="20120319" ITIME="193719" UCCHECK="X">
<textPool> <textPool>
<language SPRAS="E"> <language SPRAS="E">
<textElement ID="R" ENTRY="abap2xlsx Demo: Export ALV" LENGTH="26 "/> <textElement ID="R" ENTRY="abap2xlsx Demo: Export ALV" LENGTH="26 "/>
@ -381,7 +381,8 @@ DATA: l_path TYPE string, &quot; local dir
lv_file_separator TYPE c. lv_file_separator TYPE c.
CONSTANTS: CONSTANTS:
lv_default_file_name TYPE string VALUE &apos;32_Export_ALV.xlsx&apos;. lv_default_file_name TYPE string VALUE &apos;32_Export_ALV.xlsx&apos;,
lv_default_file_name2 TYPE string VALUE &apos;32_Export_Convert.xlsx&apos;.
*--------------------------------------------------------------------* *--------------------------------------------------------------------*
*START-OF-SELECTION *START-OF-SELECTION
*--------------------------------------------------------------------* *--------------------------------------------------------------------*
@ -449,18 +450,19 @@ FORM user_command .
cl_gui_frontend_services=&gt;get_file_separator( cl_gui_frontend_services=&gt;get_file_separator(
CHANGING file_separator = lv_file_separator ). CHANGING file_separator = lv_file_separator ).
CONCATENATE l_path lv_file_separator lv_default_file_name
INTO l_path.
* export file to save file path
CASE sy-ucomm. CASE sy-ucomm.
WHEN &apos;EXCELBIND&apos;. WHEN &apos;EXCELBIND&apos;.
* export file to save file path CONCATENATE l_path lv_file_separator lv_default_file_name
INTO l_path.
PERFORM export_to_excel_bind. PERFORM export_to_excel_bind.
WHEN &apos;EXCELCONV&apos;. WHEN &apos;EXCELCONV&apos;.
CONCATENATE l_path lv_file_separator lv_default_file_name2
INTO l_path.
PERFORM export_to_excel_conv. PERFORM export_to_excel_conv.
ENDCASE. ENDCASE.