Download Spool in list Format

Dear Friends,
While downloading the spool job into the GUI,i want to download it into list format as appearing in sap,rather than excel pdf or txt.Please suggest.Also when using downloading to PDF format,the width is not getting adjusted.Please Help.
Thanks in Advance

Hello Susan.
When you perform the download to PDF, SAP uses the SAPWIN printer driver. When you print with a defined SAP printer, uses PCL driver. Maybe that's why you have different width comparing both printings. This is for SAP forms (Sapscript, Smartfomrs). It could be the same for list format. Please, refer to note 183948.
I don't know how to download to list format. Sorry.
Hope this would help you.
Regards,
Andrés Sarcevic.

Similar Messages

Problems downloading spool lists to spreadsheet format

Hi,
When downloading spool lists to spreadsheet format, individual columns
are not separated like lists created online.
How can we solve this problem?
(Notes 118692 and 650491 don't give any solution)
Thanks in advance.
Eduard

Your subject header says you own CS5 but your message says CS5.5 so I assume you really want CS5.5.
Download CS5.5 from http://prodesigntools.com/adobe-cs5-5-direct-download-links.html
Follow the Very Important Instructions on that page first BEFORE you click the download links.
Install then enter your serial number to license it.

How to download a Block List based ALV report to PDF file?

Hi Everyone,
I need to display a report in block list alv format using REUSE_ALV_BLOCK_LIST_DISPLAY... I have done this. But my problem comes next.
1. I need to download this report to a pdf file in the user given directory - in presentation server. How can I download this in PDF format.
2. My report has TOP_OF_LIST and END_OF_LIST events. The body of the report contains a table with some material data. There should be 1 table for each material no. There are around 50 records for each material no. So I am looping at the material no. and calling REUSE_ALV_BLOCK_LIST_APPEND.
Now my problem is that I should have only 20 records in each page. How can I determine this? How do I put a page-break?
Please anyone help me.

Hi Anwesha
You can send the report output to spool using the IS_PRINT parameter of REUSE_ALV_BLOCK_LIST_DISPLAY FM. Then read the spool number generated and pass it to CONVERT_ABAPSPOOLJOB_2_PDF to get the pdf content which could be downloaded to presentation server.
The splitting of records on count could be done by calling above method with different internal table filtered as per your requirement.
Regards
Ranganath

Error in converting Spool to HTML format.

Hi Gurus,
I am reading SPool and converting that into HTML formt. Please do find below code for the same.
Submit report to convert the spool to HTML format
SUBMIT rspolst2 EXPORTING LIST TO MEMORY AND RETURN
WITH rqident = p_spoolno.
CALL FUNCTION 'LIST_FROM_MEMORY'
 TABLES
 listobject = gt_listobj
 EXCEPTIONS
 not_found = 1
 OTHERS = 2.
IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
Convert the spool to HTML format
CALL FUNCTION 'WWW_HTML_FROM_LISTOBJECT'
 EXPORTING
 REPORT_NAME =
 template_name = 'WEBREPORTING_REPORT'
 TABLES
 html = p_html_tab
 listobject = gt_listobj.
>>>>>>>>>>>>>>>>>>>
And i send p_html_tab as attachement to email.
When I opened the attachement, i can view only half page in htm.
How can i get the full page in htm.

First convert the spool to internal table by using FM
RSPO_RETURN_ABAP_SPOOLJOB
Next from internal table to HTML....
Link: /people/rammanohar.tiwari/blog/2006/01/29/abap-utility-print-screen-to-html
or try the following
Please try the follwoing:
1. define HTML internal table with ref to type W3HTML
2. download it as BIN type and give total lenght of the strings as a parameter in the down load.
See the code extract below:
describe table html lines entries.
read table html into w_html index entries.
size = ( entries - 1 ) * 255 + strlen( w_html ).
concatenate p_path file into file.
call function 'WS_DOWNLOAD'
exporting
bin_filesize = size
filename = file
filetype = 'BIN'
tables
data_tab = html

Problem concerting spool to PDF format

Hi all,
I am trying a small program to write ABAP list to spool, and within the same program I am trying to convert the spool into PDF format. I am including all the code , please can any one check and tell me where I am going wrong. I am getting a message saying 0 bytes transferred.
Even the contents of the table pdf_table is empty.
REPORT ZWRITE_SPOOL .
tables tsp01.
DATA: val(1) TYPE c,
 pripar TYPE pri_params,
 arcpar TYPE arc_params,
 lay TYPE pri_params-paart,
 lines TYPE pri_params-linct value 60,
 rows TYPE pri_params-linsz value 80.
data : w_spoolnumber like tsp01-RQIDENT.
data : w_device like tsp03-PADEST value 'H278' .
data begin of pdf_table occurs 0.
 include structure tline.
data end of pdf_table.
data : MI_BYTECOUNT type i ,
 MC_FILENAME LIKE RLGRAP-FILENAME.
DATA: MTAB_PDF LIKE TLINE OCCURS 0 WITH HEADER LINE .
data pdf_fsize type i.
DATA: MSTR_PRINT_PARMS LIKE PRI_PARAMS ,
 MC_VALID(1) TYPE C .
CONCATENATE 'C:\TEMP\' sy-repid '.PDF' INTO MC_FILENAME.
*---- Code added
pripar-pdest = 'H278'.
pripar-prcop = 001.
pripar-plist = sy-repid.
pripar-prnew = 'X'.
pripar-pexpi = 8.
pripar-linct = 65.
pripar-linsz = 80.
pripar-paart = 'X_65_80'.
pripar-prsap = 'D'.
pripar-prrec = sy-uname.
pripar-prdsn = 'LIST1S'.
pripar-ptype = 'TEXT'.
pripar-armod = 1.
*---- End of code
perform format.
select single RQIDENT from tsp01 into w_spoolnumber
where RQ2NAME = sy-repid .
NEW-PAGE PRINT OFF.
write w_spoolnumber.
perform spool_to_pdf.
 Form format
FORM format.
CALL FUNCTION 'GET_PRINT_PARAMETERS'
 EXPORTING
 in_archive_parameters = arcpar
 in_parameters = pripar
 layout = lay
 line_count = lines
 line_size = rows
 no_dialog = 'X'
 IMPORTING
 out_archive_parameters = arcpar
 out_parameters = pripar
 valid = val
 EXCEPTIONS
 archive_info_not_found = 1
 invalid_print_params = 2
 invalid_archive_params = 3
 OTHERS = 4.
IF val <> space AND sy-subrc = 0.
 PERFORM list.
ENDIF.
endform. " format
FORM list.
NEW-PAGE PRINT ON
 NEW-SECTION
 PARAMETERS pripar
 ARCHIVE PARAMETERS arcpar
 NO DIALOG.
write 'SAP PROGRAMMING USING ABAP'.
ENDFORM.
 Form spool_to_pdf
form spool_to_pdf.
call function 'CONVERT_ABAPSPOOLJOB_2_PDF'
 exporting
 src_spoolid = w_spoolnumber
 no_dialog = 'X'
 DST_DEVICE = w_device
 importing
 pdf_bytecount = pdf_fsize
 tables
 pdf = pdf_table
 exceptions
 others = 0.
CALL FUNCTION 'DOWNLOAD'
EXPORTING
BIN_FILESIZE = MI_BYTECOUNT
FILENAME = MC_FILENAME
FILETYPE = 'BIN'
IMPORTING
ACT_FILENAME = MC_FILENAME
TABLES
DATA_TAB = MTAB_PDF
EXCEPTIONS
INVALID_FILESIZE = 1
INVALID_TABLE_WIDTH = 2
INVALID_TYPE = 3
NO_BATCH = 4
UNKNOWN_ERROR = 5
GUI_REFUSE_FILETRANSFER = 6
CUSTOMER_ERROR = 7
OTHERS = 8.
endform. " spool_to_pdf
Thanks,
Varun.

hi Varun,
 Check for the internal Table data/work area as whether data is getting populated in to that or not.
i.e,
CALL FUNCTION 'DOWNLOAD'
EXPORTING
BIN_FILESIZE = MI_BYTECOUNT
FILENAME = MC_FILENAME
FILETYPE = 'BIN'
IMPORTING
ACT_FILENAME = MC_FILENAME
TABLES
DATA_TAB = MTAB_PDF
EXCEPTIONS
INVALID_FILESIZE = 1
INVALID_TABLE_WIDTH = 2
INVALID_TYPE = 3
NO_BATCH = 4
UNKNOWN_ERROR = 5
GUI_REFUSE_FILETRANSFER = 6
CUSTOMER_ERROR = 7
OTHERS = 8.
check whether data is getting populated in MATAB_PDF in debug mode.
Regards,
Santosh

Convert the spool to xls format and email through attachment to the user

Hi all,
When I execute a report in background, I get spool. I need to convert the spool to xls format and email through attachment to the user.The xls file should not be saved on local system.
If I use the Spool Recepient tab in SM37 it mails the spool list as .txt file to the mail receipient. But I need to send it as an .xls file.
Can any one help me on this

Did you get the solution? i have the same problem.

Print preview in abap list format (OMLV) - Need preview in graphical format

Dear All
I am facing a problem with the print preview. (transaction code OMLV)
When i am clicking on print preview button the system is displaying the output in a ABAP list format.
and also the printout shows only the ABAP content.
Pl. advise on how to view the print preview in a graphical format and not in the ABAP list format and pl. let me know the setting to print the spool in the graphical format.
Thanks,
Maxx

Hi,
this problem is not only related to warehouse. even the print preview spool for GR/GI slip in t-code SP01 shows as ABAP list and not as graphical screen.
my question is why does the system shows the print preview for spool as an ABAP list instead of graphical view.
pl. advise
Thanks,
Maxx

List format output to excel sheet

Hi,
I have a report output in list format. I need to download that into excel sheet. Is it possible to download a list format output to excel sheet or shall I need to convert that into grid format?
Thanks Barnita.

HI,
Use Menu path
List->Save/Send->File path

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

Downloading spool to PDF background

Hi friends
How can i downlaod spool to PDF format in back gorund.
i know we cna download background into server as we required in PDf format.
i am able to downlaod but when i go to AL11 tcode and open i am not able to see in PDF format..
is there any way to downlaod to front end PC through back ground ..
if the file store in application server how user can view the PDF document.
Please help

Hi Ramesh,
Check the Sample programs:
RSTXPDFT4
RSTXPDFT5
The FM is: CONVERT_ABAPSPOOLJOB_2_PDF
check this link as well.
http://help.sap.com/saphelp_47x200/helpdata/en/85/54c73cee4fb55be10000000a114084/frameset.htm
Reward points if this helps.
Manish

DOWNLOAD SMARTFORM IN TXT FORMAT

NORMALLY WE DOWNLOAD SMARTFORM IN PDF FORMAT BUT I HAVE REQUIREMENT TO DOWNLOAD IN TEXT FORMAT.
PLEASE HELP.
<MOVED BY MODERATOR TO THE CORRECT FORUM>
Edited by: Alvaro Tejada Galindo on Jul 24, 2008 6:24 PM

when you generate the spool you can down load that in txt format
Function is used RSPO_DOWNLOAD_SPOOLJOB when you want to do that programatically.
Using the spool number, and provide the path where you want to down load that time mention the name
C:\smart.txt
it will be downloaded .

Convert SPOOL to BIN format

Is there any function module to convert spool to BIN format
Thanks,
V

Hi ,
Try this link:
https://wiki.sdn.sap.com/wiki/display/Snippets/ABAP-GettingPDFfilefromspooling+list
This is a good example of saving files from splooing list.
May it helps you.
Regards.
DS

Download files in excel format

Hi,
Can anyone help me for downloading file in excel format? I have scheduled a job repeated everyday at a particular time, but it dumps a text file, NOT in excel format. My programme is an ALV.
Code snippet would be verymuch helpfull.
Thank,
Thushara.

Hello Thushara,
here is a code i am giving you . It will take the data from a database , and download it into the excel format..
You just can customize this program to download the data from an ALV ....
Here is the sample code...
REPORT ZKUN_FILE4 .
TABLES: USR03,DD02L.
DATA: ZX030L LIKE X030L.
DATA BEGIN OF ZDFIES OCCURS 0.
 INCLUDE STRUCTURE DFIES.
DATA END OF ZDFIES.
DATA: BEGIN OF FLDITAB OCCURS 0,
 FLDNAME(11) TYPE C,
 END OF FLDITAB.
DATA ITABUSR03 LIKE USR03 OCCURS 0 WITH HEADER LINE.
DATA TNAME LIKE DD02L-TABNAME.
SELECT * FROM USR03 INTO TABLE ITABUSR03.
TNAME = 'USR03'.
PERFORM GETFIELEDS.
PERFORM SHOW123.
FORM GETFIELEDS.
 CALL FUNCTION 'GET_FIELDTAB'
 EXPORTING
 LANGU = SY-LANGU
 ONLY = SPACE
 TABNAME = TNAME
 WITHTEXT = 'X'
 IMPORTING
 HEADER = ZX030L
 TABLES
 FIELDTAB = ZDFIES
 EXCEPTIONS
 INTERNAL_ERROR = 01
 NO_TEXTS_FOUND = 02
 TABLE_HAS_NO_FIELDS = 03
 TABLE_NOT_ACTIV = 04.
 CASE SY-SUBRC.
 WHEN 0.
 LOOP AT ZDFIES.
 FLDITAB-FLDNAME = ZDFIES-FIELDNAME.
 APPEND FLDITAB.
 ENDLOOP.
 WHEN OTHERS.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 with SY-SUBRC.
 ENDCASE.
ENDFORM.
FORM SHOW123.
CALL FUNCTION 'EXCEL_OLE_STANDARD_DAT'
 EXPORTING
 FILE_NAME = 'C:\USR03.XLS'
 DATA_SHEET_NAME = 'USER LIST'
 TABLES
 DATA_TAB = ITABUSR03
 FIELDNAMES = FLDITAB
 EXCEPTIONS
 FILE_NOT_EXIST = 1
 FILENAME_EXPECTED = 2
 COMMUNICATION_ERROR = 3
 OLE_OBJECT_METHOD_ERROR = 4
 OLE_OBJECT_PROPERTY_ERROR = 5
 INVALID_FILENAME = 6
 INVALID_PIVOT_FIELDS = 7
 DOWNLOAD_PROBLEM = 8
 OTHERS = 9.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.
Hope this solves your problem.
Regards,
Kunal.
Note : Reward points if found useful.

User request to explore the possibility of downloading the distribution lists into excel for maintenance in t-code SO23.

Hi Experts,
There is a requirement from user that "To explore the possibility of downloading the distribution lists
into excel for maintenance in t-code SO23 ".
Kindly provide your valuable informations/assistance in this regard.
Madhavan K

This Applesctipt will add comma's to the file count:
(Copy into Applescript Editor, and Save as File Format: App, then just click the App to run)
set x to choose folder with prompt "Choose Folder to Count Files" default location alias (the path to pictures folder as text)
set filecount to do shell script "find " & POSIX path of x & " ! -type d ! \\( -name \".*\" -or -name \"Icon*\" \\) | wc -l"
display dialog "File Count: " & comma_delimit(trim(filecount))
on trim(someText)
          repeat until someText does not start with " "
                    set someText to text 2 thru -1 of someText
          end repeat
          repeat until someText does not end with " "
                    set someText to text 1 thru -2 of someText
          end repeat
          return someText
end trim
on comma_delimit(this_number)
          set this_number to this_number as string
          if this_number contains "E" then set this_number to number_to_text(this_number)
          set the num_length to the length of this_number
          set the this_number to (the reverse of every character of this_number) as string
          set the new_num to ""
          repeat with i from 1 to the num_length
                    if i is the num_length or (i mod 3) is not 0 then
                              set the new_num to (character i of this_number & the new_num) as string
                    else
                              set the new_num to ("," & character i of this_number & the new_num) as string
                    end if
          end repeat
          return the new_num
end comma_delimit

My song titles do not show up in the list format. What can I do to fix this?

I'm trying to manage my iPod music and my song titles are not showing inthe list format. Does anyone know how I can fix this?

VLC

Download Spool in list Format

Similar Messages

Maybe you are looking for