Export Reports 3.0 output to excel?

Any one please... is it possible to export reports 3.0 output to excel?
I dont want to upgrade to 10g or 11i now as my current version(forms 5.0 and reports3.0) is running smooth even on windows 7.
thanks!

I think that even Reports 3.0 has an option desformat=delimited (which is the "excel" format).

Similar Messages

Moan about Reports ability to output to Excel

Hi there
This is more of a general moan on this topic, but am I the only person who thinks that Oracle Reports' ability to output to excel should be WAY better than it is at the moment?
I've just looked at the 9i demo, showing how to get report output into excel. It was horrific - grubbing round in raw html code and setting up an Excel template with dummy data doesn't make Reports the slick reporting tool that we'd all like.
Guys @ Oracle - have a look at Cognos Impromptu - I'm definitely no fan of Cognos, as I prefer to be able to define exactly what I want in SQL. However, one thing they have got right is the facility to save report output into formatted Excel - Oracle Reports should have this too!!
At the moment, if I'm asked to produce a report in Excel format, I have to either use PL/SQL to generate a CSV file with the results I want, or Oracle Reports to produce a similar CSV file. I then have to open the CSV file in Excel and format it, change column widths etc, so that it looks presentable. If it's a regular-running report, I have to manually intervene every time the report is produced. Producing a similar report in Cognos (for all its faults) would require no manual intervention once it's set up, and the whole process can be controlled with macro language and the Cognos Scheduler.
So please, improve this feature of Reports!
Andrew Woodward
UK

Hello again
All I'd like to be able to do is to write an Oracle Report and have the figures from the report delivered in an Excel spreadsheet. (A number of report users here specify that they want their reports delivered in this way.)
Oracle Reports (I'm on version 6i) allows me to generate a .csv file which will open in Excel, but there's no formatting present. My point was simply that I have to manually intervene to produce a .xls which is formatted properly. In Cognos Impromptu, after the report has been run, you just select SaveAs->(input filename) and select 'Excel with Format' for SaveAs Type. The output is a pretty good approximation of how the output appears on the screen. You can run reports automatically using a scheduler, and with macro language, you can deliver the report in this format with no further intervention needed. If Cognos can do this, then so can Oracle!!
Incidentally, I've noticed that every post on this forum which mentions Excel receives a plug from Lion Van for his RepExcel product. I had a look at his website and it looks pretty good - perhaps Oracle should approach him with a generous offer?! I'm not sure however that these forums should be used for advertising in this way.
Best regards
Andrew
UK

Problem in exporting data from alv output to excel

Hi,
I had developed a report which has ALV report output.It is working fine and i am facing problem that when i am exporting it to the data to excel,it is not displaying the whole data in it. I am using reuse_alv_grid_display function module.
Waiting for a positive response.
Thanks & Regards,
Rickky
Moderator Message: FAQ. Please search for available information before posting.
Edited by: kishan P on Nov 8, 2010 12:34 PM

It is highly likely that the way you have built your field catalog is causing some data to drop on the export to excel. I have had this problem before. Check the fields in your fieldcat that are not working vs the ones that are working.

Oracle Reports 9I generate output in excel

Report Builder 9.0.4.0.33
I tried generating output to Excel using 10GR2 Report builder using SPREADSHEET for destype on the web and it works.
The requirement is for this one customer who is on 9I and they are asking for excel output functiuonality on thier existing reports.
Does oracle has a patch or any other way to generate the exisitng reports on 91 where we can give them a selection like SPREADSHEET in the parameter screen and it would generate the report in excel.
Thanks
I tried by appending below to the url in the before report trigger.
&mimetype=application/vnd.ms-excel
which works but, we give other selections to the user too where they can change the desformat to PDF or HTMLCSS...and they all try to open the report output in excel.
Edited by: Forms_Reports_Beginner on Oct 6, 2009 3:17 PM

Thank you Lalitk and Dennis,
My team mate wrote a javascript function on before report trigger that checks the paramter selection for desformat and append the mimetype accordingly.Hence, able to achieve the functionality.
Thanks.

Avoid splitting of columns ALV report while download output to Excel sheet

Hi friends,
I have 170 columns in my ALV report
while downloading the report to Excel sheet
the column descriptions and values are splitting in two lines.
How can i avoid the problem.
before calling REUSE_ALV_GRID_DISPLAY function module in my code
for the Layout i assigned LS_LAYOUT-MAX_SIZE = 1023.
but still the problem is not solved.
Please help me in this Issue.
Thanks in Advance,
Ganesh

Hi friends,
I dont want to use and Keyboard shiftcntrl....
or dont want to change any code in ALV report
by simply assigning some value to any of the export parameter in ALV function module
can we achieve the functionality
Thanks in Advance,
Ganesh

Reg. J1INEMIS report (problem with output in excel)

Dear Experts ,
In J1INEMIS report , when i save the output data in Excel file , last digit of vendor codes are missing in vendor code column even i optimized the width of column.
Kindly provide some guidance.
Regards
shailesh

The report is J1INMIS right.
If yes, please try the below way
1. Menu bar -> System -> List -> Save -> Local File -> Excel file
This helps you
Thanks

Exporting reports form SAP to MS Excel file

Dear All
Our material number logic is like that having 18 digits "801062004767100001".
1. When we are exporting any std report or zreports to excel through Export to excel all the numbers are converting in to text and saving in excel file as it is displaying SAP screen.
But in SAP for all transaction not having export to excel file.
2. We have the option export to local file from there we choose "spread sheet" by this way if we export to excel the material number is displaying as "8.01062E+17"
if i convert this column as numbers excel showing " 801062004767100000" the last digit " 1" is changing as alway zero. if we manually change it to "1" excel converting it to "0"
Especially we are facing problem in SM37 after back ground job, transport in excel we have only one option point no 2.
I tried to use encode page during transport , i am not getting proper result for the material no.
Please help me , if any setting available in SAP or in EXcel.
Thanks & Regards
Vinoth

Hi,
Not in front of the system at the moment, but when you click on Local File, there is an option called Unformatted if i am right (the first one) select that & then save it in .txt format & later open in Excel, it should maintain the formatting.
Check & revert if it solves the issue.
Regards,
Vivek

I need to get SSIS Data profiler output in Excel.

Hi,
I need to get SSIS Data profiler output in Excel. Tried importing XML generated by SSIS Profiler in Excel but data is getting lost. Can anybody please help on this.
Thanks,
Manoj

Hi Manoj,
The Data Profiling task outputs the selected profiles into XML file. We can specify the result to any extensions of file, the generated file is valid for the built-in Profile Viewer but invalid for other file viewer applications. So when we specify the output
to Excel file, we can export the excel file and make analyzing without any problems through the Profile Viewer. But when we use Microsoft Excel open it, it says ‘The file format and extension of’’ don’t match’, then it needs us select one option to open the
XML file. So we cannot directly export Data Profiling task outputs to Excel file.
If we still want to export Data profiling task outputs to Excel, we can use the XML Source to extract data from the generated XML file, and then export it to Excel destination in a Data Flow Task.
Thanks,
Katherine Xiong
Katherine Xiong
TechNet Community Support

Alligning output in Excel output and missing logo

Hi All,
My BI publisher report gives an output in Excel but the alignment specified in RTF are not reflected in the output.
The required alignments are:
Numbers(eg: Voucher Number, Invoice Amount etc) - Left Align
Varchar2 (eg: Invoice Number, Vendor Name) - Right Align
Date: Center Align
Also my RTF contains a logo, but when my output in Excel is not displaying the logo. What can be done for the same.
Thanks
Arun

Hi Arun,
Is your image displayed in any other output say PDF?
If that is the case then you need to set 2 properties for them to appear.
Have a look at the blog:
http://blogs.oracle.com/xmlpublisher/2006/10/31/
For alignment try using
<fo:bidi-override direction="ltr" unicode-bidi="bidi-override"><?YOUR_TAG?></fo:bidi-override>

How to export report output into excel.

Hi all
how to export report output into excel sheet can any on give me answer step by step please as soon as possible
kk

Hi Prashanth,
If you are executing Query from WAD ---> Right click on Table (only on Characteristics Data) --> Enhanced Menu ---> Export as --> CSV file or MS Excel
assign points if this helps,
Thanks,
Sudhakar

Issue while exporting report in Excel Format

Hello,
I am facing problem while exporting the report in Excel Format. After analysis, I think that it could be due to two reasons, either we are using wrong versions of Jars, or we are using wrong API. Here is the code, approaches and problems we are facing. Please help.
First approach we are using is:
// using basic API
import com.crystaldecisions.reports.sdk.ReportClientDocument;
// get client document from crystal report API and open the report by specifying the report name, with path
 ReportClientDocument reportClientDoc = new ReportClientDocument();
 reportClientDoc.open( reportPath, 0 );
 // give chance to extending classes to configure the report document by POJO or by sql parameter etc, just adding the parameters infromation using ParameterFieldController
 configureReportDocument( reportClientDoc, reportMetadata, reportData, reportContext );
 // get data source of crystal report
 Object reportSource = reportClientDoc.getReportSource();
 // export the data - we have also tried with MSExcel format
 ReportExportFormat exportFormat = ReportExportFormat.recordToMSExcel;
 LOGGER.debug( "exportFormat[" + exportFormat + "]" );
 ByteArrayInputStream byteArray = (ByteArrayInputStream) reportClientDoc.getPrintOutputController().export(
 exportFormat );
Problem Faced: Specified Excel format is not supported.
Second Approach: We come to know that excel format is supported with new releases and with occa package.
Then we tried with import com.crystaldecisions.sdk.occa.report.application.ReportClientDocument; It ask to set the ReportServer. When we are trying to set the server as
 reportClientDoc.setReportAppServer(ReportClientDocument.inprocConnectionString);
Application is unable to find 'ReportClientDocument.inprocConnectionString' property. It seems like we are using some old jars. However we have downloaded the latest released jars for eclipse 2.
Please help for it. Issue is to export the report in excel format, which is currently working fine for PDF. If this problem is related to Jars, please suggest the path to download the latest jars. We also looking for the latest jars like rasapp and rascore etc. But these are not available with Crystal Report for Eclipse 2 release.
Waiting for urgent help. Thanks you..
Regards,
Mohit

Hi,
Send me Environment Details .
Here is the code snippet for exporting report to excel format:
<%@ page import="com.crystaldecisions.sdk.occa.report.application.*" %>
<%@ page import="com.crystaldecisions.sdk.occa.report.definition.*" %>
<%@ page import="com.crystaldecisions.sdk.occa.report.data.*" %>
<%@ page import="com.crystaldecisions.sdk.occa.report.lib.*" %>
<%@ page import="com.crystaldecisions.sdk.framework.*" %>
<%@ page import="com.crystaldecisions.sdk.occa.managedreports.*" %>
<%@ page import="com.crystaldecisions.sdk.occa.infostore.*" %>
<%@ page import="com.crystaldecisions.sdk.occa.report.exportoptions.*" %>
<%@ page import="java.util.*" %>
<%@ page import="java.io.*" %>
<%
String username ="Administrator";
String password ="";
String cmsname ="localhost:6400";
String Authen ="secEnterprise";
 //connecting to Enterprise
 IEnterpriseSession es = CrystalEnterprise.getSessionMgr().logon(username,password,cmsname,Authen);
 //get the report App Factory form the Crystal Enterprise
 IReportAppFactory appFactory = (IReportAppFactory) es.getService("","RASReportService");
 //get the infostore service form the Crystal Enterprise
 IInfoStore istore = (IInfoStore) es.getService("","InfoStore");
 //get the report by name from crystal Enterprise
 IInfoObjects iobjects = istore.query("Select * From CI_INFOOBJECTS Where SI_NAME = 'sampleramz2.rpt' and SI_INSTANCE = 0 ");
 //open the report in the report doc object.
 ReportClientDocument Doc = appFactory.openDocument((IInfoObject)iobjects.get(0), 0, Locale.ENGLISH);
 // WORKING WITH THE PRINT OUTPUT CONTROLLER
 //Use the report documents PrintOutputController to export the report to a ByteArrayInputStream
 ByteArrayInputStream byteIS = (ByteArrayInputStream)Doc.getPrintOutputController().export(ReportExportFormat.recordToMSExcel);
 // EXPORTING THE REPORT
 //Create a byte[] (same size as the exported ByteArrayInputStream)
 byte[] buf = new byte[2000 * 1024];
 int nRead = 0;
 //Set response headers to indicate pdf MIME type and inline file
 response.reset();
 response.setHeader("Content-disposition", "inline;filename=ramz");
 response.setContentType("application/xls");
 //Send the Byte Array to the Client
 while ((nRead = byteIS.read(buf)) != -1)
 response.getOutputStream().write(buf, 0, nRead);
 //Flush the output stream
 response.getOutputStream().flush();
 //Close the output stream
 response.getOutputStream().close();
%>
Let me know any information is needed,
Regards,
Rameez

Run the Report as a Background job and Get the Output in Excel in Local PC

Hello Gurus,
I have one following requirement.
One should be able to run the report as a background job and it should be possible to get the report in Excel format, also when running the report in background. The excel report should have the same information and look as the current SAPreport.
Please provide some solution.
Any helpful answer get surely awarded.
Thanks a lot,
Varlanir

GUI_* WS_* Function In Background, CSV Upload
GUI_* and WS_* function modules do not work in background
When scheduling a job in the background the appropriate statement to read in your file is OPEN DATASET, and the file must be on the file system that the SAP server can see.
At anytime, a user can switch of the Personal Computers even though the job is still running in the background. Therefore GUI_* and WS_* function modules are not designed to work in that way, as they need to access your personal computer file.
To choose the correct download method to used, you can check the value of SY-BATCH in your code,
if it is 'X' use OPEN DATASET and if it is ' ' use WS_UPLOAD.
*-- Open dataset for reading
DATA:
dsn(20) VALUE '/usr/test.dat',
rec(80).
OPEN DATASET dsn FOR INPUT IN TEXT MODE.
IF sy-subrc = 0.
DO.
 READ DATASET dsn INTO rec.
 IF sy-subrc <> 0.
 EXIT.
 ELSE.
 WRITE / rec.
 ENDIF.
ENDDO.
ENDIF.
CLOSE DATASET dsn.
*-- Open dataset for writing
DATA rec(80).
OPEN DATASET dsn FOR OUTPUT IN TEXT MODE.
TRANSFER rec TO '/usr/test.dat'.
CLOSE DATASET dsn.
What is the difference when we use upload, ws_upload, gui_upload function modules?
UPLOAD, WS_UPLOAD, GUI_UPLOAD, are used in BDC concepts. ie., Batch Data Communication.
Batch Data Conversion is a concept where user can transfer the Data from non SAP to SAP R/3. So , in these various Function Modules are used.
UPLOAD--- upload a file to the presentation server (PC)
WS_UPLOAD---- Load Files from the Presentation Server to Internal ABAP Tables.
WS means Work Station.
This is used upto SAP 4.6 version.
GUI_UPLOAD------- Replaces WS_UPLOAD. Upoad file from presentation server to the app server. From 4.7 SAP version it is replaced.
How to Upload csv file to SAP?
Common File Download Upload Questions:
How you upload the data from text file to sap internal table? From my knowledge its by upload or gui_upload.
How you download the data from sap internal table to text file?
How you upload the data from xls (excel) file to sap internal table how you download the data from sap internal table to xls(excel) file.
You can upload data from presentation server to an internal table using gui_upload. Use gui_download to download from internal table to flat file.
Use fm ALSM_EXCEL_TO_INTERNAL_TABLE to upload data frm excel.
Use function module GUI_UPLOAD
The FILETYPE refer to the type of file format you need: For e.g 'WK1' - Excel format , 'ASC' - Text Format etc.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
 FILENAME = 'C:\test.csv'
 FILETYPE = 'ASC'
TABLES
 DATA_TAB = itab
EXCEPTIONS
 FILE_OPEN_ERROR = 1
 FILE_READ_ERROR = 2
 NO_BATCH = 3
 GUI_REFUSE_FILETRANSFER = 4
 INVALID_TYPE = 5
 NO_AUTHORITY = 6
 UNKNOWN_ERROR = 7
 BAD_DATA_FORMAT = 8
 HEADER_NOT_ALLOWED = 9
 SEPARATOR_NOT_ALLOWED = 10
 HEADER_TOO_LONG = 11
 UNKNOWN_DP_ERROR = 12
 ACCESS_DENIED = 13
 DP_OUT_OF_MEMORY = 14
 DISK_FULL = 15
 DP_TIMEOUT = 16
 OTHERS = 17.

Download alv report output to excel format with out header line

Hi experts,
i want to download a alv report output into excel formatt with out the header line but it has to download including field description. as this output will fed into another transaction, the downloaded excel file should be with out header line.
fro eg:
Report : Zabc ABAP Development Page : 1
Run Date : 12/14/06 System: UD400
Run Time : 08:45:37
this header details should not be downloaded into the excel file.
could somebody help me please.
thanks
deepu

hi jayanti,
thanks for your response.
i have delclared all the field types as character but still it is not downloading and it 's sy-subrc is 4... the code is as below.
*field names
lt_fieldnames-value = 'Material Number'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Plant'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Material Group'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Material Description'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'UOM'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Price Unit'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Material Type'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'X-Plant Status'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Valuation Class'.
APPEND lt_fieldnames.
lt_fieldnames-value = lw_avmng.
APPEND lt_fieldnames.
lt_fieldnames-value = lw_avntp.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Latest PO Qty'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Latest PO Cost'.
APPEND lt_fieldnames.
lt_fieldnames-value = 'PO Creation Date'.
APPEND lt_fieldnames.
lt_fieldnames-value = lw_fcaqt.
APPEND lt_fieldnames.
lt_fieldnames-value = 'Prev. Yr. Std. Cost'.
APPEND lt_fieldnames.
lt_fieldnames-value = lw_stcst.
APPEND lt_fieldnames.
CALL FUNCTION 'MS_EXCEL_OLE_STANDARD_DAT'
 EXPORTING
 file_name = 'XLSHEET'
 CREATE_PIVOT = 0
 DATA_SHEET_NAME = ' '
 PIVOT_SHEET_NAME = ' '
 PASSWORD = ' '
 PASSWORD_OPTION = 0
 TABLES
 PIVOT_FIELD_TAB =
 data_tab = t_output1
 fieldnames = lt_fieldnames
 EXCEPTIONS
 file_not_exist = 1
 filename_expected = 2
 communication_error = 3
 ole_object_method_error = 4
 ole_object_property_error = 5
 invalid_pivot_fields = 6
 download_problem = 7
 OTHERS = 8
IF sy-subrc <> 0.
 MESSAGE e001 WITH 'Data could not be downloaded'.
ENDIF.
ENDFORM. " z_dwn_xl
thanks
deepu

SAP WEBGUI - How to download the report output to Excel ?

Hi Folks ,
We have generated a report in standard SAP GUI 7.1 . But our requirement is to view the report in SAP WEBGUI and download as EXCEL .
We can view the report output in SAP WEBGUI , but could find an option to download as excel !
Is there any option in webgui ?
Please provide you valuable inputs !
Thanks.,
V.Rangarajan

Hi V.Ranjarajan,
Have you created an ALV report?
If yes, there are many ways to download the output to excel:
Go to Menu -> Export - > Local File... , local file button, etc.
In SAP CRM 7.0 there is a std functionality to even download search result list to excel.
Hope this helps!
Regards,
Saumya

Regarding Downloading of Report[List] output into Excel Sheet

Hi All,
Hi i have written one Classical report. I got the output Correctly.
Now i want to download that data into Excel Sheet in excatly the way it displayed in List[Report] output.
I had followed the path System->List->Save->LocalFile->Spread Sheet and tried to download the same.
Though it is downloaded it has not come in exact format.
Now what i want is to add a button above that report & write a program in that to download that data into Excel Sheet.
Can anybody tell me how can solve this issue. If i follow above procedure will the data[List Output] be downloaded into exact format into excel.
If anybody knows other way please sujjest.
Thanks in advance.
Thanks & Regards,
Prasad.

Hi Prasad,
I have done a program which downloads the output in the excel sheet in the correct format.
Just check the program. The code given in bold is what you have to use.
REPORT zexp MESSAGE-ID f4 LINE-SIZE 195.
 Tables Used ***********************************
TABLES : bseg, bkpf, bsak, lfa1, payr .
Declaring Internal Tables **************************
DATA :
Internal table to hold header data *************
BEGIN OF header OCCURS 0,
 ext_date(10) TYPE c,
 delimit(1) TYPE c,
 ext_time(8) TYPE c,
END OF header,
Internal table to hold detail info **************
BEGIN OF i_data OCCURS 0,
 belnr LIKE bsak-belnr,
 gjahr LIKE bsak-gjahr,
 bukrs LIKE bsak-bukrs,
 bldat LIKE bsak-bldat,
 xblnr LIKE bsak-xblnr,
 blart LIKE bsak-blart,
 augdt LIKE bsak-augdt,
 augbl LIKE bsak-augbl,
 wrbtr LIKE bsak-wrbtr,
 shkzg LIKE bsak-shkzg,
 lifnr LIKE bsak-lifnr,
 name1 LIKE lfa1-name1,
 chect LIKE payr-chect,
 status(1) TYPE c,
END OF i_data,
Internal table to to collect *****************
BEGIN OF i_data1 OCCURS 0,
 belnr LIKE bsak-belnr,
 gjahr LIKE bsak-gjahr,
 bukrs LIKE bsak-bukrs,
 bldat LIKE bsak-bldat,
 xblnr LIKE bsak-xblnr,
 blart LIKE bsak-blart,
 augdt LIKE bsak-augdt,
 augbl LIKE bsak-augbl,
 wrbtr LIKE bsak-wrbtr,
 shkzg LIKE bsak-shkzg,
 lifnr LIKE bsak-lifnr,
 name1 LIKE lfa1-name1,
 sortl LIKE lfa1-sortl,
 chect LIKE payr-chect,
 status(1) TYPE c,
END OF i_data1,
String variables for formatting file data *************
 fidoc_year TYPE string,
 comp_code TYPE string,
 check_numbr TYPE string,
 vendor TYPE string,
 inv_date TYPE string,
 inv_nbr TYPE string,
 paid_dat TYPE string,
 inv_amt TYPE string,
 status TYPE string,
 ref_doc TYPE string,
************Internal table to store the file contents **************
BEGIN OF i_final_file OCCURS 0,
 record(300) TYPE c,
END OF i_final_file,
Internal table to store the list of allowed document types ****
BEGIN OF i_doctype OCCURS 0,
 blart LIKE bsak-blart,
END OF i_doctype,
Internal table to hold vendor information ************
BEGIN OF i_lfa1 OCCURS 0,
 lifnr LIKE lfa1-lifnr,
 name1 LIKE lfa1-name1,
 sortl LIKE lfa1-sortl,
END OF i_lfa1,
Internal table to hold check information *************
BEGIN OF i_payr OCCURS 0,
 chect LIKE payr-chect,
 vblnr LIKE payr-vblnr,
 gjahr LIKE payr-gjahr,
 zbukr LIKE payr-zbukr,
END OF i_payr.
Data declarations **************************
DATA : ws_stblg TYPE bkpf-stblg,
 todate TYPE bsak-augdt,
 fromdate TYPE bsak-augdt,
 w_day LIKE dtresr-weekday,
 day LIKE scal-indicator,
 d TYPE n,
 e_date LIKE sy-datum,
 e_time LIKE sy-uzeit,
 dd(2) TYPE c,
 mm(2) TYPE c,
 yy(4) TYPE c,
 hh(2) TYPE c,
 min(2) TYPE c,
 sec(2) TYPE c.
DATA : wa_filepath(50) TYPE c,
 wa_filename(50) TYPE c,
 wa_c_filename(100) TYPE c,
 arch_path(50) TYPE c.
* Data for downloading to list
DATA : list LIKE TABLE OF abaplist WITH HEADER LINE.
DATA : BEGIN OF list_asc OCCURS 0,
msg(300) TYPE c,
END OF list_asc.
DATA: BEGIN OF i_invoiceheader OCCURS 0,
name(30) TYPE c,
END OF i_invoiceheader.
RANGES dates FOR bkpf-budat.
Selection Screen ************************
SELECTION-SCREEN SKIP 2.
SELECT-OPTIONS:
 s_bukrs FOR bkpf-bukrs ,
 s_blart FOR bkpf-blart ,
 s_augdt FOR bsak-augdt. " memory id todat TO fromdat.
PARAMETERS :submit AS CHECKBOX DEFAULT ' ' .
* Download list to file.
AT USER-COMMAND.
CASE sy-ucomm.
 WHEN 'LIST'.
 PERFORM download.
 WHEN 'BACK'.
 EXIT.
ENDCASE.
----
 FORM download *
FORM download.
if s_augdt is initial.
dates-sign = 'I'.
dates-option = 'BT'.
dates-low = '20050901'.
dates-high = '20050920'.
APPEND dates.
else.
dates = s_augdt.
append dates.
endif.
/* Submit the same program .
SUBMIT zexp WITH s_augdt IN dates
 EXPORTING LIST TO MEMORY
 AND RETURN.
CALL FUNCTION 'LIST_FROM_MEMORY'
 TABLES
 listobject = list
 EXCEPTIONS
 not_found = 1.
CALL FUNCTION 'LIST_TO_ASCI'
EXPORTING
LIST_INDEX = -1 "LIST_INDEX SY-LSIND.
TABLES
listasci = list_asc
listobject = list.
PERFORM download_file.
ENDFORM.
 FORM download_file *
FORM download_file.
DATA fname TYPE rlgrap-filename VALUE 'c:\audit_report.xls'.
DATA ftype TYPE rlgrap-filetype VALUE 'DAT'.
DATA numeric_data(10) TYPE c VALUE '0123456789'.
*Table structure should match with list output.
DATA : BEGIN OF i_data1 OCCURS 0,
 belnr(12) TYPE c,
 gjahr(6) TYPE c,
 bukrs(8) TYPE c,
 chect(13) TYPE c,
 lifnr(12) TYPE c,
 name1(37) TYPE c,
 bldat(14) TYPE c,
 xblnr(18) TYPE c,
 augdt(14) TYPE c,
 wrbtr(17) TYPE c,
 status(4) TYPE c,
 augbl(18) TYPE c,
 sortl(17) TYPE c,
 END OF i_data1.
Header record of the excel sheet.
PERFORM fill_header.
LOOP AT list_asc.
Reads lines starting from the first record in the report. All informatory statements in the report are not read.
 IF list_asc+1(10) CO numeric_data.
 i_data1 = list_asc .
 APPEND i_data1.
 ENDIF.
ENDLOOP.
Call the download function.
CALL FUNCTION 'DOWNLOAD'
 EXPORTING
 filename = fname
 filetype = ftype
 TABLES
 data_tab = i_data1
 FIELDNAMES = i_invoiceheader.
ENDFORM.
 FORM fill_header *
FORM fill_header.
i_invoiceheader-name = 'Doc Number'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Fsc Year'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Cmp Code'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Check No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Vendor No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Entered by'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Doc Date'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Ref Doc No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Clearing Date'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Amount'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Status'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Clearing Doc No'.
APPEND i_invoiceheader.
i_invoiceheader-name = 'Sort field'.
APPEND i_invoiceheader.
ENDFORM. " fill_header
 Initialization *************************
INITIALIZATION.
To initialize the date parameter on the selection screen.
The date by default ranges from previous Monday to Sunday.
todate = sy-datum.
CALL FUNCTION 'DATE_COMPUTE_DAY'
 EXPORTING
 date = todate
 IMPORTING
 day = day.
d = day.
if d < 4.
 todate = sy-datum - d - 4 .
else.
 todate = sy-datum - d + 3 .
endif.
fromdate = todate - 6.
MOVE: 'BT' TO s_augdt-option,
 fromdate TO s_augdt-low,
 todate TO s_augdt-high.
APPEND s_augdt.
Start of Selection **************************
START-OF-SELECTION.
Checking the validity of the inputted dates ****************
IF s_augdt-low > sy-datum OR s_augdt-high > sy-datum.
 MESSAGE i999 WITH 'You cannot input future date'.
 EXIT.
ENDIF.
IF NOT s_bukrs IS INITIAL.
MESSAGE i999 WITH 'Program will run with input parameters in screen!!'.
ENDIF.
Initialize the header data ***********************
e_time = sy-uzeit.
MOVE e_time+0(2) TO hh.
MOVE e_time+2(2) TO min.
MOVE e_time+4(2) TO sec.
CONCATENATE hh min sec INTO header-ext_time SEPARATED BY ':'.
e_date = sy-datum.
MOVE e_date+0(4) TO yy.
MOVE e_date+4(2) TO mm.
MOVE e_date+6(2) TO dd.
CONCATENATE mm dd yy INTO header-ext_date SEPARATED BY '/'.
header-delimit = '~'.
APPEND header.
List allowed document types **********************
PERFORM fill_doc_types.
**To select the documents within the range of week or as inputted **
IF s_augdt IS INITIAL.
 MOVE: 'I' TO s_augdt-sign,
 'BT' TO s_augdt-option,
 fromdate TO s_augdt-low,
 todate TO s_augdt-high.
 APPEND s_augdt.
ENDIF.
Selecting the records from the database ****************
IF s_bukrs IS INITIAL AND s_blart IS INITIAL.
Select all documents of company code 1000, *********
4200 and 8000, and allowed document types *********
 SELECT belnr gjahr augdt augbl bukrs
 blart bldat xblnr lifnr wrbtr shkzg
 FROM bsak INTO CORRESPONDING FIELDS OF TABLE i_data
 FOR ALL ENTRIES IN i_doctype
 WHERE blart EQ i_doctype-blart
 AND augdt IN s_augdt
 AND ( bukrs = '1000' OR bukrs ='4200' OR
 ( bukrs = '8000' AND blart NE 'ZP' ) ).
 loop at i_data.
Exclude reversed documents
 select single stblg into ws_stblg
 from bkpf
 where bukrs = i_data-bukrs
 and gjahr = i_data-gjahr
 and belnr = i_data-belnr.
 if not ws_stblg is initial.
 delete i_data.
 endif.
 endloop.
ELSEIF s_blart IS INITIAL.
Select all documents of allowed document types ******
 and inputted company code ************
 SELECT belnr gjahr augdt augbl bukrs
 blart bldat xblnr lifnr wrbtr shkzg
 FROM bsak INTO CORRESPONDING FIELDS OF TABLE i_data
 FOR ALL ENTRIES IN i_doctype
 WHERE blart EQ i_doctype-blart
 AND augdt IN s_augdt
 AND bukrs IN s_bukrs .
 LOOP AT i_data.
Exclude documents of type ZP
for company code 8000.
 IF i_data-bukrs = '8000' AND i_data-blart = 'ZP'.
 DELETE i_data.
 continue.
 ENDIF.
Exclude reversed documents
 select single stblg into ws_stblg
 from bkpf
 where bukrs = i_data-bukrs
 and gjahr = i_data-gjahr
 and belnr = i_data-belnr.
 if not ws_stblg is initial.
 delete i_data.
 continue.
 endif.
 ENDLOOP.
 READ TABLE i_data INDEX 1.
 IF sy-subrc NE 0.
 MESSAGE i999 WITH 'No records have been selected'.
 EXIT.
 ENDIF.
ELSE.
Select the documents matching the company codes *****
and document types inputted in the selection screen ****
 SELECT belnr gjahr augdt augbl bukrs bldat xblnr
 blart lifnr wrbtr shkzg
 FROM bsak INTO CORRESPONDING FIELDS OF TABLE i_data
 WHERE bukrs IN s_bukrs AND blart IN s_blart
 AND augdt IN s_augdt.
 SORT i_data BY blart.
 LOOP AT i_data.
Filtering the records selected
based on the document type
 READ TABLE i_doctype WITH KEY blart = i_data-blart.
 IF sy-subrc NE 0.
 DELETE i_data.
 continue.
 ENDIF.
Exclude documents of type ZP
for company code 8000.
 IF i_data-bukrs = '8000' AND i_data-blart = 'ZP'.
 DELETE i_data.
 continue.
 ENDIF.
Exclude reversed documents.
 select single stblg into ws_stblg
 from bkpf
 where bukrs = i_data-bukrs
 and gjahr = i_data-gjahr
 and belnr = i_data-belnr.
 if not ws_stblg is initial.
 delete i_data.
 continue.
 endif.
 ENDLOOP.
 READ TABLE i_data INDEX 1.
 IF sy-subrc NE 0.
 MESSAGE i999 WITH 'No records have been selected'.
 EXIT.
 ENDIF.
ENDIF.
IF sy-subrc NE 0.
 MESSAGE i999 WITH 'No records have been selected'.
 EXIT.
ENDIF.
credit/debit identification ***********************
LOOP AT i_data.
 IF i_data-shkzg EQ 'H'.
 i_data-wrbtr = i_data-wrbtr * 1.
 ELSEIF i_data-shkzg EQ 'S'.
 i_data-wrbtr = i_data-wrbtr * -1.
 ENDIF.
 MODIFY i_data.
ENDLOOP.
for summarizing ******************************
LOOP AT i_data.
 MOVE-CORRESPONDING i_data TO i_data1.
 COLLECT i_data1.
ENDLOOP.
Vendor informations and Check Informations *****************
SELECT lifnr name1 sortl
 FROM lfa1
 APPENDING CORRESPONDING FIELDS OF TABLE i_lfa1
 FOR ALL ENTRIES IN i_data1
 WHERE lifnr = i_data1-lifnr.
SELECT chect vblnr gjahr zbukr FROM payr APPENDING CORRESPONDING
 FIELDS OF TABLE i_payr FOR ALL ENTRIES
 IN i_data1 WHERE vblnr = i_data1-augbl
 AND gjahr = i_data1-augdt(4)
 AND zbukr = i_data1-bukrs.
SORT i_data1 BY augbl gjahr bukrs lifnr.
SORT i_payr BY vblnr gjahr zbukr.
SORT i_lfa1 BY lifnr.
LOOP AT i_data1.
 READ TABLE i_payr WITH KEY vblnr = i_data1-augbl
 gjahr = i_data1-gjahr
 zbukr = i_data1-bukrs.
 IF sy-subrc EQ 0.
 i_data1-chect = i_payr-chect.
 ENDIF.
 READ TABLE i_lfa1 WITH KEY lifnr = i_data1-lifnr.
 IF sy-subrc EQ 0.
 i_data1-name1 = i_lfa1-name1.
 i_data1-sortl = i_lfa1-sortl.
 ENDIF.
 i_data1-status = 'X'.
 MODIFY i_data1.
ENDLOOP.
**The records are sorted by clearing date, check number and doc type**
SORT i_data1 BY augdt chect blart.
**********The header record is outputted on the screen****************
PERFORM write_header.
********Data is moved to internal table in the file format *************
PERFORM move_data.
Line items are outputted on the screen *********************
PERFORM write_output.
*& Form write_header &*
*& This outputs the header information to screen &*
FORM write_header.
SKIP.
 SET PF-STATUS 'LIST'.
Outputting the header information *********************
WRITE : / 'Extraction Date : ' , header-ext_date.
WRITE : / 'Extraction Time : ' , header-ext_time.
FORMAT COLOR 1." INTENSIFIED.
SKIP.
ULINE AT 0(190) NO-GAP.
Outputting line level information **********************
WRITE:/ sy-vline NO-GAP,
 (10) 'DOC NUMBER',
 sy-vline NO-GAP,
 (4) 'F-YR',
 sy-vline NO-GAP,
 (6) 'C-CODE',
 sy-vline NO-GAP,
 (10) 'CHECK NUM',
 sy-vline NO-GAP,
 (10) 'VENDOR NUM',
 sy-vline NO-GAP,
 (35) 'VENDOR NAME',
 sy-vline NO-GAP,
 (12) 'INVOICE DATE',
 sy-vline NO-GAP,
 (16) 'INVOICE NUMBER',
 sy-vline NO-GAP,
 (12) 'PAID DATE',
 sy-vline NO-GAP,
 (15) 'INVOICE AMOUNT',
 sy-vline NO-GAP,
 (2) 'SC',
 sy-vline NO-GAP,
 (16) 'REFERENCE FI DOC',
 sy-vline NO-GAP,
 (15) 'SORT FIELD',
 sy-vline NO-GAP.
ULINE AT 0(190) NO-GAP.
ENDFORM. " write_header
*& FORM MOVE_DATA &*
*& Formats data in internal table as is required in the file &*
FORM move_data.
LOOP AT i_data1.
Document number and fiscal year should be separted by '|' *****
 CONCATENATE i_data1-belnr i_data1-gjahr INTO fidoc_year
 SEPARATED BY '|'.
 MOVE i_data1-bukrs TO comp_code.
 MOVE i_data1-chect TO check_numbr.
Vendor number and vendor name should be separted by '|' *****
 CONCATENATE i_data1-lifnr i_data1-name1 INTO vendor
 SEPARATED BY '|'.
 SHIFT vendor LEFT DELETING LEADING '0'.
 SHIFT vendor RIGHT DELETING TRAILING space.
Date fields converted to MM/DD/YYYY format ****************
 MOVE i_data1-bldat+0(4) TO yy.
 MOVE i_data1-bldat+4(2) TO mm.
 MOVE i_data1-bldat+6(2) TO dd.
 CONCATENATE mm dd yy INTO inv_date SEPARATED BY '/'.
 MOVE i_data1-xblnr TO inv_nbr.
 SHIFT inv_nbr RIGHT DELETING TRAILING space.
 MOVE i_data1-augdt+0(4) TO yy.
 MOVE i_data1-augdt+4(2) TO mm.
 MOVE i_data1-augdt+6(2) TO dd.
 CONCATENATE mm dd yy INTO paid_dat SEPARATED BY '/'.
 MOVE i_data1-wrbtr TO inv_amt.
 CONDENSE inv_amt.
 SHIFT inv_amt RIGHT DELETING TRAILING space.
 MOVE i_data1-status TO status.
 MOVE i_data1-augbl TO ref_doc.
 CONCATENATE fidoc_year
 comp_code
 check_numbr
 vendor
 inv_date
 inv_nbr
 paid_dat
 inv_amt
 status
 ref_doc
 INTO i_final_file-record SEPARATED BY '~'.
 APPEND i_final_file.
ENDLOOP.
ENDFORM. " MOVE_DATA
*& Form write_output &*
*& Outputs all data to screen &*
FORM write_output.
LOOP AT i_data1.
 FORMAT COLOR 2 INTENSIFIED.
Outputting line level information *******************
 WRITE : / sy-vline NO-GAP,
 (10) i_data1-belnr,
 sy-vline NO-GAP,
 (4) i_data1-gjahr,
 sy-vline NO-GAP,
 (6) i_data1-bukrs,
 sy-vline NO-GAP,
 (10) i_data1-chect,
 sy-vline NO-GAP,
 (10) i_data1-lifnr,
 sy-vline NO-GAP,
 (35) i_data1-name1,
 sy-vline NO-GAP,
 (12) i_data1-bldat MM/DD/YYYY,
 sy-vline NO-GAP,
 (16) i_data1-xblnr,
 sy-vline NO-GAP,
 (12) i_data1-augdt MM/DD/YYYY,
 sy-vline NO-GAP,
 (15) i_data1-wrbtr,
 sy-vline NO-GAP,
 (2) i_data1-status,
 sy-vline NO-GAP,
 (16) i_data1-augbl,
 sy-vline NO-GAP,
 (15) i_data1-sortl,
 sy-vline NO-GAP.
ENDLOOP.
ULINE AT 0(190) NO-GAP.
ENDFORM. " write_output
In the program, I am downloading only the list.. The description of report outputted in the beginning of the report is not downloaded to excel.
What has to be taken into consideration is that, the structure of the table i_data1 which contains the data to be downloaded to the table.
I hope that this will help you.
Regards,
Susmitha

Export Reports 3.0 output to excel?

Similar Messages

Maybe you are looking for