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

Corrected ZDEMO_EXCEL25 to use logical path to detect the output path so it will run on a Windows and Unix application server.

Browse Source 
git-svn-id: https://subversion.assembla.com/svn/abap2xlsx/trunk@174 b7d68dce-7c3c-4a99-8ce0-9ea847f5d049
This commit is contained in:
Gregor Wolf 2011-05-05 22:44:12 +00:00
parent f5ef7137ad
commit e9092de141
1 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ZA2X/PROG/ZDEMO_EXCEL25.slnk
View File

@ -1,11 +1,12 @@
<?xml version="1.0" encoding="utf-16"?> <?xml version="1.0" encoding="utf-16"?>
<PROG NAME="ZDEMO_EXCEL25" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20110317" UNAM="BCUSER" UDAT="20110410" VERN="000024" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20110410" STIME="230852" IDATE="20110410" ITIME="230852" UCCHECK="X"> <PROG NAME="ZDEMO_EXCEL25" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20110317" UNAM="BCUSER" UDAT="20110506" VERN="000028" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20110506" STIME="004057" IDATE="20110506" ITIME="004057" 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: Write Hello World using Logical Path on the App Server" LENGTH="70 "/>
<textElement ID="S" KEY="P_PATH" ENTRY="D ." LENGTH="9 "/> <textElement ID="S" KEY="P_PATH" ENTRY="D ." LENGTH="9 "/>
</language> </language>
</textPool> </textPool>
<programDocumentation/>
<source>*&amp;---------------------------------------------------------------------* <source>*&amp;---------------------------------------------------------------------*
*&amp; Report ZDEMO_EXCEL25 *&amp; Report ZDEMO_EXCEL25
*&amp; *&amp;
@ -22,8 +23,15 @@ DATA: lo_excel TYPE REF TO zcl_excel,
DATA: lv_file TYPE xstring. DATA: lv_file TYPE xstring.
CONSTANTS: lv_file_name TYPE string VALUE &apos;25_HelloWorld.xlsx&apos;.
DATA: lv_default_file_name TYPE string.
CONSTANTS: lv_default_file_name TYPE string VALUE &apos;/tmp/25_HelloWorld.xlsx&apos;. CALL FUNCTION &apos;FILE_GET_NAME_USING_PATH&apos;
EXPORTING
logical_path = &apos;LOCAL_TEMPORARY_FILES&apos; &quot; Logical path&apos;
file_name = lv_file_name &quot; File name
IMPORTING
file_name_with_path = lv_default_file_name. &quot; File name with path
&quot; Creates active sheet &quot; Creates active sheet
CREATE OBJECT lo_excel. CREATE OBJECT lo_excel.