Executing a Job and Exporting PDF Output via API

I can't seem to execute a job and export the PDF output via the API. I use the following code snippet and nothing is exported: jobAction.setAction(jobAction.ACTION_EXPORT_SECTION); jobAction.setFormat(jobAction.FORMAT_PDF); If use the snippet below, HMTL is exported: jobAction.setAction(jobAction.ACTION_EXPORT_AS_JOB_OUTPUT); jobAction.setFormat(jobAction.FORMAT_PDF); The javadoc for JobActionEnum says to use the former method. However, this doesn't seem to work. Is this an API bug or something obvious that I am not doing? -Eric D. Hill

Joe
Here is the where you can change the server group/job server.
- After you add the Batch/real Time job as a webservice.
- Go to the Webservice Batch Job Attribute and from the drop down choose the "Enable job Attributes" and hit apply.
- After this if you use the WSDL URL http://<Data Services Web Server>:<Web server Port>/DataServices/servlet/webservices?ver=2.0&wsdlxml
- You will see the job attributes that you can change based on the allowed parameters mentioned in the documentation.
The batch job or real time job is published without the job parameters by default. Once you enable the job attributes, remove and re publish the batch job as a web service. The application making the call to this webservice should be able to read the WSDL generated by Data services and pickup all the input and output parameters of the method.
Refer to the Data Services Integrator guide (Chapter 3 : pages 25 - 33 ) to get the exact parameter values permitted via Data Services jobs called via web services.
Hope this helps!
Thanks & Regards
Tiji

Similar Messages

Report is executing in background and need data(output) in excel format

Report is executing in background and need data(output) to get downloaded in excel format in my PC from an internal table;;in any drive i.e. C: or D: .When executing in backround it prompt to user with which location excel file to be saved and the name of file.How to download in background in excel format?
Edited by: PRASHANT BHATNAGAR on Aug 26, 2008 6:24 AM

Hi
Download a report to excel with format (border, color cell, etc)
Try this program...it may help you to change the font ..etc.
Code:
REPORT ZSIRI NO STANDARD PAGE HEADING.
this report demonstrates how to send some ABAP data to an
EXCEL sheet using OLE automation.
INCLUDE OLE2INCL.
handles for OLE objects
DATA: H_EXCEL TYPE OLE2_OBJECT, " Excel object
 H_MAPL TYPE OLE2_OBJECT, " list of workbooks
 H_MAP TYPE OLE2_OBJECT, " workbook
 H_ZL TYPE OLE2_OBJECT, " cell
 H_F TYPE OLE2_OBJECT. " font
TABLES: SPFLI.
DATA H TYPE I.
table of flights
DATA: IT_SPFLI LIKE SPFLI OCCURS 10 WITH HEADER LINE.
*& Event START-OF-SELECTION
START-OF-SELECTION.
read flights
SELECT * FROM SPFLI INTO TABLE IT_SPFLI UP TO 10 ROWS.
display header
ULINE (61).
WRITE: / SY-VLINE NO-GAP,
 (3) 'Flg'(001) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
 (4) 'Nr'(002) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
 (20) 'Von'(003) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
 (20) 'Nach'(004) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
 (8) 'Zeit'(005) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP.
ULINE /(61).
display flights
LOOP AT IT_SPFLI.
WRITE: / SY-VLINE NO-GAP,
 IT_SPFLI-CARRID COLOR COL_KEY NO-GAP, SY-VLINE NO-GAP,
 IT_SPFLI-CONNID COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP,
 IT_SPFLI-CITYFROM COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP,
 IT_SPFLI-CITYTO COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP,
 IT_SPFLI-DEPTIME COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP.
ENDLOOP.
ULINE /(61).
tell user what is going on
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
 EXPORTING
 PERCENTAGE = 0
 TEXT = TEXT-007
 EXCEPTIONS
 OTHERS = 1.
start Excel
CREATE OBJECT H_EXCEL 'EXCEL.APPLICATION'.
PERFORM ERR_HDL.
SET PROPERTY OF H_EXCEL 'Visible' = 1.
CALL METHOD OF H_EXCEL 'FILESAVEAS' EXPORTING #1 = 'c:\kis_excel.xls'
PERFORM ERR_HDL.
tell user what is going on
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
 EXPORTING
 PERCENTAGE = 0
 TEXT = TEXT-008
 EXCEPTIONS
 OTHERS = 1.
get list of workbooks, initially empty
CALL METHOD OF H_EXCEL 'Workbooks' = H_MAPL.
PERFORM ERR_HDL.
add a new workbook
CALL METHOD OF H_MAPL 'Add' = H_MAP.
PERFORM ERR_HDL.
tell user what is going on
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
 EXPORTING
 PERCENTAGE = 0
 TEXT = TEXT-009
 EXCEPTIONS
 OTHERS = 1.
output column headings to active Excel sheet
PERFORM FILL_CELL USING 1 1 1 'Flug'(001).
PERFORM FILL_CELL USING 1 2 0 'Nr'(002).
PERFORM FILL_CELL USING 1 3 1 'Von'(003).
PERFORM FILL_CELL USING 1 4 1 'Nach'(004).
PERFORM FILL_CELL USING 1 5 1 'Zeit'(005).
LOOP AT IT_SPFLI.
copy flights to active EXCEL sheet
 H = SY-TABIX + 1.
 PERFORM FILL_CELL USING H 1 0 IT_SPFLI-CARRID.
 PERFORM FILL_CELL USING H 2 0 IT_SPFLI-CONNID.
 PERFORM FILL_CELL USING H 3 0 IT_SPFLI-CITYFROM.
 PERFORM FILL_CELL USING H 4 0 IT_SPFLI-CITYTO.
 PERFORM FILL_CELL USING H 5 0 IT_SPFLI-DEPTIME.
ENDLOOP.
changes by Kishore - start
CALL METHOD OF H_EXCEL 'Workbooks' = H_MAPL.
CALL METHOD OF H_EXCEL 'Worksheets' = H_MAPL." EXPORTING #1 = 2.
PERFORM ERR_HDL.
add a new workbook
CALL METHOD OF H_MAPL 'Add' = H_MAP EXPORTING #1 = 2.
PERFORM ERR_HDL.
tell user what is going on
SET PROPERTY OF H_MAP 'NAME' = 'COPY'.
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
 EXPORTING
 PERCENTAGE = 0
 TEXT = TEXT-009
 EXCEPTIONS
 OTHERS = 1.
output column headings to active Excel sheet
PERFORM FILL_CELL USING 1 1 1 'Flug'(001).
PERFORM FILL_CELL USING 1 2 0 'Nr'(002).
PERFORM FILL_CELL USING 1 3 1 'Von'(003).
PERFORM FILL_CELL USING 1 4 1 'Nach'(004).
PERFORM FILL_CELL USING 1 5 1 'Zeit'(005).
LOOP AT IT_SPFLI.
copy flights to active EXCEL sheet
 H = SY-TABIX + 1.
 PERFORM FILL_CELL USING H 1 0 IT_SPFLI-CARRID.
 PERFORM FILL_CELL USING H 2 0 IT_SPFLI-CONNID.
 PERFORM FILL_CELL USING H 3 0 IT_SPFLI-CITYFROM.
 PERFORM FILL_CELL USING H 4 0 IT_SPFLI-CITYTO.
 PERFORM FILL_CELL USING H 5 0 IT_SPFLI-DEPTIME.
ENDLOOP.
changes by Kishore - end
disconnect from Excel
 CALL METHOD OF H_EXCEL 'FILESAVEAS' EXPORTING #1 = 'C:\SKV.XLS'.
FREE OBJECT H_EXCEL.
PERFORM ERR_HDL.
 FORM FILL_CELL *
 sets cell at coordinates i,j to value val boldtype bold *
FORM FILL_CELL USING I J BOLD VAL.
CALL METHOD OF H_EXCEL 'Cells' = H_ZL EXPORTING #1 = I #2 = J.
PERFORM ERR_HDL.
SET PROPERTY OF H_ZL 'Value' = VAL .
PERFORM ERR_HDL.
GET PROPERTY OF H_ZL 'Font' = H_F.
PERFORM ERR_HDL.
SET PROPERTY OF H_F 'Bold' = BOLD .
PERFORM ERR_HDL.
ENDFORM.
*& Form ERR_HDL
 outputs OLE error if any *
--> p1 text
<-- p2 text
FORM ERR_HDL.
IF SY-SUBRC <> 0.
WRITE: / 'Fehler bei OLE-Automation:'(010), SY-SUBRC.
STOP.
ENDIF.
ENDFORM. " ERR_HDL
Regards
Murali Papana

How do I import and export PDF's from Ibooks

How do I import and export PDF files from Ibooks on the IMAC running Mavericks?
How do I sync my PDF files in IBooks to the IPAD when they were not purchased from the bookstore?
I noticed that I could email the PDF and then add it to IBOOKS on the IPAD.
Is there a 3rd party IBOOK type reader that will address this issue?
When I upgraded Mavericks it moved all of my PDF files in ITUNES application to IBOOKS and removed all reference to those
books in ITUNES. When I purchase a book from IBOOKS store on the IMAC, the books shows up in IBOOKS on the IPAD.
All of my PDF files will not sync up with the IPAD.
I do hope this is a problem that Apple will address and would like to know when the fix will be available.

Hello,
Thank you. I found that option you pointed out. I can now change it from 1080i to 1080p and I can chance the resolution. However I still can't change the frame rate. It still stays at 29.97.
Could this be due to the camera? I am using a Canon VIXIA HF S100 with 30p and 24p frame rate options. I suspect that it does not really shoot at true 24p and only does 24p within 60i.
Frankly, I don't really care about getting 24p support too much but it would be very nice to have the option.
I'll keep toying with the program. Still, anymore ideas or thoughts would be greatly appreciated.
Thank you Wild Giles.

Whats the difference between PS and Export pdf

Hi all,
I need the difference beween PS and Export Pdf. Which one is better for printing. I need the reason as well.
Thanks in advance

Distilling is archaic.
http://indesignsecrets.com/creating-pdf-export-or-use-distiller.php
Bob

Send spool list ceated by Job (SM36) as pdf-file via email

We are running the report RM06EFLB (Transaktion ME84 - "Create Releases") in the background.
The Job is creating a spool list with 17 pages.
I want to send this 17 pages (in a readable form) to a number of persons.
This did I try so far:
- Distribution list with Recipient type "via Internet" as Spool list recipients in the Job. (Tried different formats for ABAP List in Transaction SCOT)
=> Email is send to recipients, attachment is readable depending on format.
 Problem: attachment is not complete, it contains only about 15 pages (985 rows).
- Distribution list with Recipient type "Internal User - SAP-Office" as Spool list recipients in the Job.
=> Document is sent to Business Workplace
 Problem: attachment is not complete, it contains only about 15 pages
Any ideas how to get the complete spool list?
Is there mayby a report around that is sending a spool list as pdf-file via email to a number of recipients?
(Would like to maintain this Report as an additional step in the job. The spool-number should be selected from the previous step.)
Thank you for your help.
Jens

Oh sorry - here is the coding which is used in that program:
First use function module 'CONVERT_ABAPSPOOLJOB_2_PDF' to convert the spool entry into pdf.
Loop at output table PDF and concatenate all lines into a string. Convert string to xstring.
Then call mail class:
DATA: lv_pdf_x TYPE xstring,
 lv_subject TYPE string,
 lv_doc_desc TYPE so_obj_des,
 lv_mail_body TYPE soli_tab.
DATA: ls_atta TYPE rcf_s_att4mail_hex,
 lt_atta TYPE rcf_t_att4mail_hex.
* -- Fill parameter
lv_subject = 'Requested Report'."#EC NOTEXT
lv_doc_desc = 'Report XXL'."#EC NOTEXT
* lv_mail_body = ?
ls_atta-name = lv_doc_desc.
ls_atta-extension = 'PDF'.
ls_atta-content = p_pdf_x. <- This is your xstring
APPEND ls_atta TO lt_atta.
TRY.
 CALL METHOD cl_hrrcf_services_mail=>send_web_mail
 EXPORTING
 p_subject = lv_subject
 p_receiver = p_receiver->email_address
 pt_atta_hex = lt_atta
 p_sender = p_sender->email_address
 p_body_c = lv_mail_body.
 CATCH cx_hrrcf.
ENDTRY.
I hope that you have the above mentioned class in your system but it should work with other email functions as well.
Regards
Nicola

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.

Indesign CS3 text frame parameters and export PDF

could use some help with the following:
I need to edit and export a large number (7000) Indesign documents (one page)
1. check for locked text frames and unlock
2. group all text frames
3. set grouped text frames at x=8 millimeters, y 10 milimeters
4. export the documents to PDF in a subfolder called "Out"
5. save and close the documents in the same subfolder as an Indesign CS3 document (orig is CS2)
This is what I've been trying soo far:
Now only checking one text frame - should be all text frames
"close document 1 saving yes" doesn't work because the originals are from CS2
I get a PDF called "Adobe Indesign SC3"
set processFolder to choose folder with prompt "Choose a folder that contains Innd Docs to process"
tell application "Finder"
if not (exists folder "OUT" of processFolder) then
make new folder at processFolder with properties {name:"OUT"}
end if
set the destination_folder to folder "OUT" of processFolder as alias
end tell
tell application "Finder"
try
set listFiles to (files of contents of processFolder) as alias list
on error
set listFiles to (files of contents of processFolder) as alias as list
end try
repeat with thisFile in listFiles
tell application "Adobe InDesign CS3"
with timeout of 120 seconds
activate
set properties of view preferences to {horizontal measurement units:millimeters, vertical measurement units:millimeters, ruler origin:page origin}
open thisFile
set myDoc to document 1
set docName to name
tell myDoc
set transform reference point of layout window 1 to top left anchor
set myBox to text frame 1 of page 1
set properties of myBox to {locked:false}
move myBox to {8, 10}
end tell
export document 1 format PDF type to (destination_folder as string) & docName & ".pdf" using PDF export preset "[Drukwerkkwaliteit]" without showing options
close document 1 saving yes
tell application "Finder" to move thisFile to destination_folder with replacing
end timeout
end tell
end repeat
end tell
end
end
Any help is greatly appreciated - Doing this manually is a lot of work!!!!!
Peter

You're asking for the name of the application, not the document -- you need to do it after your "tell myDoc". You could also get the name from the alias you open, rather than the open document, something like: repeat with thisFile in listFiles set oldDelims to AppleScript's text item delimiters set AppleScript's text item delimiters to {":"} set docName to text item -1 of (thisFile as Unicode text) set AppleScript's text item delimiters to oldDelims You should also move your "set properties of view preferences" line to after your "tell myDoc". -- Shane Stanley <[email protected]>

PDF Export: PDF output reported as being non-conforming to Adobe's specs.

One of our customers is reporting errors with the PDF files generated using the ReportDocument.Export() method. They are using GhostScript to parse the PDF file (here is the error that they are reporting):
cscsoveraprod(amssw)/usr/amssw/prod/ctl/bin> 19391790_CARTER_ICUA_Nursing_Flowsheet_201004241845228256298. <
cscsoveraprod(amssw)/usr/amssw/prod/ctl/bin> 19391790_CARTER_ICUA_Nursing_Flowsheet_201004241845228256298.pdf <
Warning: File has a corrupted %%EOF marker, or garbage after %%EOF.
Warning: Encoding not present.
Warning: Embedded symbolic TT fonts must contain a cmap for Platform=1 Encoding=0.
Warning: Encoding not present.
Warning: Embedded symbolic TT fonts must contain a cmap for Platform=1 Encoding=0.
This file had errors that were repaired or ignored.
The file was produced by:
>>>> Powered By Crystal <<<<
Please notify the author of the software that produced this
file that it does not conform to Adobe's published PDF
specification.
cscsoveraprod(amssw)/usr/amssw/prod/ctl/bin> Error: /undefinedfilename in (/usr/amssw/prod/interlink/data/1369021_619391790_CARTER_ICUA_Nursing_Flowsheet_201004241845
228256298)
Operand stack:
Execution stack:
 %interp_exit .runexec2 nostringval nostringval nostringval 2 %stopped_push nostringval nostringval nostringval false
1 %stopped_push
Dictionary stack:
 dict:1080/1123(ro)(G) dict:0/20(G) dict:69/200(L)
Current allocation mode is local
Last OS error: 2
GPL Ghostscript 8.56: Unrecoverable error, exit code 1
:wq!
:wq!
According to this error message, it looks like the PDF files generated by Crystal are not compliant with Adobe's PDF specification. I've searched the knowledge base / forums for PDF information but didn't see anything along these lines. The PDF files are viewable through the Acrobat reader.
Thank you for any assistance you can provide.

First place to start with is the designer. Export from there and see if you get the same issue. If you do, create a forum post in the Report Design forum:
SAP Crystal Reports
Also, make sure you have SP 6 for CR 10:
https://smpdl.sap-ag.de/~sapidp/012002523100005985482008E/cr10win_en_sp6.zip
You will need SP 6 runtime also. Search here for the runtime;
http://service.sap.com/sap/bc/bsp/spn/bobj_download/main.htm
Kbase [1218365 - Exported PDFs cannot be edited using the Adobe TouchUp Text Tool|http://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/oss_notes_boj/sdn_oss_boj_erq/sap(bD1lbiZjPTAwMQ==)/bc/bsp/spn/scn_bosap/notes.do] may be related to the issue you are experiencing.
If none of the above helps, you will have to try this with CR 2008 (12.x) as CR 10 has been out of support for a number of years and no fixes will be released. If you want, you can share a report with saved data with me and I can do the export using CR 2008. You will then have to try to duplicate the issue in Adobe. Alternatively, you can download CR 2008 eval copy from here;
http://www.sap.com/solutions/sapbusinessobjects/sme/freetrials/index.epx
and try the export your self.
Ludek
Follow us on Twitter
http://twitter.com/SAPCRNetSup

Upgraded to Adobe Reader XI - Docusign and Export PDF tools are missing. How do I get them back? Docusign through my company is current, and Export PDF through my personal account is current as well.

As usual, I blindly updated my PDF and now all of my tools are gone... I used to have a tools menu on the right side where my document signing and export commands were available, and I cannot figure out how to get them back.

Gee, Pat, this is a real big help.
Nobody could possibly think anyone would ask for help without first trying to fix the issue oneself. Or maybe you do. I have opened the file and looked under security. I have changed it to owner-notebook (which is what the techs called me) and clicked accept but geepers it didn't work.
Maybe someone else has an idea.
Take Ownership of a File or Folder
The above should be a link. At least I copied and pasted the link. I did what was stated in there. It isn't like brain surgery. But it is not working. I ended up being able to open some pdf files after transferring them from one partition category to another. I wish it was that easy as you seem to think.
Thanks for the help. Have a great year.

I started and Export PDF over two and half hours ago, and it is still going. How can I stop it?

I started an export PDF over two and a half hours ago and it is still going. I can't stop, and I can't upload export anything else.

I have the same problem - updates are stuck on loading, and the app store is now also doing the same. I've tried resetting, but it hasn't made any difference.
I haven't been able to load iTunes onto my computer - 2 hours on the phone with Apple, as well as 4 hours of my IT guy's time (which I paid for) and no one could help. So going through iTunes on the computer is not an option for me.
Is there any way of cancelling or resetting the apps just with the phone?
Have had the phone for 6 months and this is the first time it's happened, but it's been stuck like that for about a week. Now I can't update or load any apps.

How can I store and share PDF files via iCloud?

I am trying to use iCloud to store and share PDF files from my PC, iPad2 and iPhone 4S... They are supposedly supported. I can share .docs, .xls, etc.... However, I cannot figure out how to share a pdf!

Welcome to the Apple Community.
You can download an iWork document from iCloud as a PDF, but you can't share a PDF document with iWork apps on iOS devices.

Empty sqaures[] in exported pdf stream - crystal api

Hello,
Web application using - CR4E version 2.0.16
Reports design using Crystal Reports 2013
I am exporting crystal report into pdf file format using crystal java api that gets shipped with Crystal reports for eclipse. The exported pdf stream returned by the api is saved in db as blob so that it can be viewed/sent to printer later. If I view the pdf blob saved in db using acrobat reader I can see the pdf is correct.
But when I stream blob data directly to printer using java print service for print jobs and PDFRenderer.jar for PDF print pages, the output is empty sqaure blocks []. All the formatting is intact. I can also see number of rows.
This seems to be the problem for exported pdf's from crystal api's or even if you manually export the pdf from crystal report and save the pdf file from file system in the db.
Other PDF files work fine but not the ones exported from Crystal report.
The font properties of the rpt exported pdf shows the encoding as 'Built-in' while the other pdf files has ANSI or other such encodings. That is the only difference I find between pdfs exported from Crystal and other pdf files.
Can you please tell me how to resolve this?
Best Regards,
Bharat

Hi Manas,
I am also working on Exporting Crystal report to PDF in java but facing some problem in accessing the database.
The .rpt files are published in Crystal Report Server with DB info like server, database, user, password.
When i am calling from java (Similar to your code), its giving error like JNDI name not found. But i am not using any JNDI binding.
Do i need to configure database details in any configuration files such as CRConfig.xml etc. If yes, can you pass me some sample code.
Your help highly appreciated.
Thanks
VK

Changing layout at runtime, executing background job and sending mail inXLS

Hi
When i execute my program in foregroung by manually changing value of s_job = 'X' in debugging mode it is sending the correct XLS file via mail with all the data , whereas when i execute my program in backgroud mode it sends incomlete XLS file via mail, it has only first 2 records in any layout........can anybody please help in this regard....
program is as follows...
REPORT ZPMACR01_MD_MRP_100.
*& Report : ZPMACR01_MD_MRP_100
TABLES : MARA, MARC, MAKT, MBEW,MARD.
MAIL data declarations
TABLES : adr6 , sscrfields.
DATA: BEGIN OF mbody OCCURS 0,
 message(100),
 END OF mbody.
DATA: BEGIN OF addresses OCCURS 0,
 addresses(100),
 END Of addresses.
FIELD-SYMBOLS: <f> type ANY,
 <tab> TYPE STANDARD TABLE,
 <wa> type ANY.
DATA: count TYPE i value 0,
 col_1 TYPE i.
DATA: new_table TYPE REF TO data, "pointer to dynamic table
 new_line TYPE REF TO data. "pointer to work area of dynamic table
DATA: s_job TYPE c.
DATA: i_data_out_text TYPE string OCCURS 0 WITH HEADER LINE.
DATA: message TYPE string OCCURS 0 WITH HEADER LINE.
DATA: it_message TYPE STANDARD TABLE OF solisti1 INITIAL SIZE 0
 WITH HEADER LINE.
DATA: BEGIN OF it_attach OCCURS 0,
 line(2650) TYPE c,
 END OF it_attach.
DATA: t_packing_list LIKE sopcklsti1 OCCURS 0 WITH HEADER LINE,
 t_hex LIKE solix OCCURS 0 WITH HEADER LINE,
 t_receivers LIKE somlreci1 OCCURS 0 WITH HEADER LINE,
 w_cnt TYPE i,
 w_sent_all(1) TYPE c,
 w_doc_data LIKE sodocchgi1,
 gd_error TYPE sy-subrc,
 gd_reciever TYPE sy-subrc.
ALV data declarations
TYPE-POOLS: SLIS.
DATA : IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
 IT_FIELDCAT2 TYPE LVC_T_FCAT,
 IT_FIELDCAT_FIN TYPE LVC_T_FCAT,
 IT_FIELDCAT3 TYPE SLIS_T_FIELDCAT_ALV,
 itab1 TYPE SLIS_T_FIELDCAT_ALV,
 W_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
 W_REPID TYPE SY-REPID,
 IT_LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA: is_fieldcat LIKE LINE OF it_fieldcat.
DATA: is_fieldcat2 LIKE LINE OF it_fieldcat2,
Is_FIELDCAT3 LIKE LINE OF it_fieldcat3.
Data: variant type DISVARIANT,
 v_size LIKE sy-tabix.
ALV Data
DATA:
 i_sort TYPE slis_t_sortinfo_alv,
 v_lvc_title TYPE lvc_title,
 v_repid LIKE sy-repid,
 c_user_command TYPE slis_formname VALUE 'ALV_USER_COMMAND',
 gt_list_top_of_page TYPE slis_t_listheader,
 gt_list_end_of_list TYPE slis_t_listheader,
 gs_layout TYPE slis_layout_alv,
 gt_events TYPE slis_t_event,
 gs_events type slis_alv_event,
 gt_print TYPE slis_print_alv,
 g_top_of_page TYPE slis_formname VALUE 'TOP_OF_PAGE'.
Selection Parameters
SELECTION-SCREEN BEGIN OF BLOCK B1.
SELECT-OPTIONS : SO_MATNR FOR MARA-MATNR OBLIGATORY.
SELECT-OPTIONS : SO_WERKS FOR MARC-WERKS.
SELECT-OPTIONS : SO_SPRAS FOR MAKT-SPRAS.
SELECT-OPTIONS : SO_BWKEY FOR MBEW-BWKEY.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-001.
PARAMETERS: p_email TYPE somlreci1-receiver
 default '[email protected]'.
SELECTION-SCREEN END OF BLOCK B2.
SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-002.
PARAMETERS : SO_LAY TYPE DISVARIANT-VARIANT DEFAULT '/DEFAULT'.
SELECTION-SCREEN END OF BLOCK B3.
DATA Declarations.
Data : BEGIN OF ITab OCCURS 0,
 manr type mara-matnr,
 end of ITAB.
data : BEGIN OF IT_TABLE OCCURS 0,
 MATNR TYPE MARA-MATNR,
 MATKL TYPE MARA-MATKL,
 MEINS TYPE MARA-MEINS,
 MTART TYPE MARA-MTART,
 AHDIS TYPE MARC-AHDIS,
 AUSDT TYPE MARC-AUSDT,
 AUTRU TYPE MARC-AUTRU,
 BESKZ TYPE MARC-BESKZ,
 BSTFE TYPE MARC-BSTFE,
 BSTMA TYPE MARC-BSTMA,
 BSTMI TYPE MARC-BSTMI,
 BSTRF TYPE MARC-BSTRF,
 BWSCL TYPE MARC-BWSCL,
 DIBER TYPE MARC-DIBER,
 DISGR TYPE MARC-DISGR,
 DISLS TYPE MARC-DISLS,
 DISMM TYPE MARC-DISMM,
 DISPO TYPE MARC-DISPO,
 DISPR TYPE MARC-DISPR,
 DZEIT TYPE MARC-DZEIT,
 EISBE TYPE MARC-EISBE,
 EISLO TYPE MARC-EISLO,
 EKGRP TYPE MARC-EKGRP,
 FHORI TYPE MARC-FHORI,
 FXHOR TYPE MARC-FXHOR,
 KAUTB TYPE MARC-KAUTB,
 KORDB TYPE MARC-KORDB,
 KZAUS TYPE MARC-KZAUS,
 LFGJA TYPE MARC-LFGJA,
 LFMON TYPE MARC-LFMON,
 LGRAD TYPE MARC-LGRAD,
 LVORM TYPE MARC-LVORM,
 MABST TYPE MARC-MABST,
 MINBE TYPE MARC-MINBE,
 MMSTA TYPE MARC-MMSTA,
 MMSTD TYPE MARC-MMSTD,
 MRPPP TYPE MARC-MRPPP,
 MTVFP TYPE MARC-MTVFP,
 NFMAT TYPE MARC-NFMAT,
 PERKZ TYPE MARC-PERKZ,
 PLIFZ TYPE MARC-PLIFZ,
 PLVAR TYPE MARC-PLVAR,
 PSTAT TYPE MARC-PSTAT,
 QZGTP TYPE MARC-QZGTP,
 RGEKZ TYPE MARC-RGEKZ,
 RWPRO TYPE MARC-RWPRO,
 SBDKZ TYPE MARC-SBDKZ,
 SCHGT TYPE MARC-SCHGT,
 SHFLG TYPE MARC-SHFLG,
 SHPRO TYPE MARC-SHPRO,
 SHZET TYPE MARC-SHZET,
 SOBSL TYPE MARC-SOBSL,
 STRGR TYPE MARC-STRGR,
 TRAME TYPE MARC-TRAME,
 UEETK TYPE MARC-UEETK,
 UEETO TYPE MARC-UEETO,
 UMLMC TYPE MARC-UMLMC,
 UNETO TYPE MARC-UNETO,
 USEQU TYPE MARC-USEQU,
 VINT1 TYPE MARC-VINT1,
 VINT2 TYPE MARC-VINT2,
 VRBDT TYPE MARC-VRBDT,
 VRBFK TYPE MARC-VRBFK,
 VRBMT TYPE MARC-VRBMT,
 VRBWK TYPE MARC-VRBWK,
 VRMOD TYPE MARC-VRMOD,
 WEBAZ TYPE MARC-WEBAZ,
 WERKS TYPE MARC-WERKS,
 WZEIT TYPE MARC-WZEIT,
 DISKZ TYPE MARD-DISKZ,
 LBSTF TYPE MARD-LBSTF,
 LGORT TYPE MARD-LGORT,
 LMINB TYPE MARD-LMINB,
 LSOBS TYPE MARD-LSOBS,
 MAKTX TYPE MAKT-MAKTX,
 END OF IT_TABLE.
DATA: BEGIN OF IT_MARD OCCURS 0,
 MATNR TYPE MARA-MATNR,
 MATKL TYPE MARA-MATKL,
 MEINS TYPE MARA-MEINS,
 MTART TYPE MARA-MTART,
 DISKZ TYPE MARD-DISKZ,
 LBSTF TYPE MARD-LBSTF,
 LGORT TYPE MARD-LGORT,
 LMINB TYPE MARD-LMINB,
 LSOBS TYPE MARD-LSOBS,
 MAKTX TYPE MAKT-MAKTX,
 END OF IT_MARD.
DATA: BEGIN OF IT_MBEW OCCURS 0,
 MATNR TYPE MBEW-MATNR,
 BKLAS TYPE MBEW-BKLAS,
 SALK3 TYPE MBEW-SALK3,
 PEINH TYPE MBEW-PEINH,
 STPRS TYPE MBEW-STPRS,
 VERPR TYPE MBEW-VERPR,
 VPRSV TYPE MBEW-VPRSV,
 END OF IT_MBEW.
data : BEGIN OF IT_FINAL0 occurs 0,
 MATNR LIKE MARA-MATNR,
 MATKL LIKE MARA-MATKL,
 MEINS LIKE MARA-MEINS,
 MTART LIKE MARA-MTART,
 AHDIS LIKE MARC-AHDIS,
 AUSDT LIKE MARC-AUSDT,
 AUTRU LIKE MARC-AUTRU,
 BESKZ LIKE MARC-BESKZ,
 BSTFE LIKE MARC-BSTFE,
 BSTMA LIKE MARC-BSTMA,
 BSTMI LIKE MARC-BSTMI,
 BSTRF LIKE MARC-BSTRF,
 BWSCL LIKE MARC-BWSCL,
 DIBER LIKE MARC-DIBER,
 DISGR LIKE MARC-DISGR,
 DISLS LIKE MARC-DISLS,
 DISMM LIKE MARC-DISMM,
 DISPO LIKE MARC-DISPO,
 DISPR LIKE MARC-DISPR,
 DZEIT LIKE MARC-DZEIT,
 EISBE LIKE MARC-EISBE,
 EISLO LIKE MARC-EISLO,
 EKGRP LIKE MARC-EKGRP,
 FHORI LIKE MARC-FHORI,
 FXHOR LIKE MARC-FXHOR,
 KAUTB LIKE MARC-KAUTB,
 KORDB LIKE MARC-KORDB,
 KZAUS LIKE MARC-KZAUS,
 LFGJA LIKE MARC-LFGJA,
 LFMON LIKE MARC-LFMON,
 LGRAD LIKE MARC-LGRAD,
 LVORM LIKE MARC-LVORM,
 MABST LIKE MARC-MABST,
 MINBE LIKE MARC-MINBE,
 MMSTA LIKE MARC-MMSTA,
 MMSTD LIKE MARC-MMSTD,
 MRPPP LIKE MARC-MRPPP,
 MTVFP LIKE MARC-MTVFP,
 NFMAT LIKE MARC-NFMAT,
 PERKZ LIKE MARC-PERKZ,
 PLIFZ LIKE MARC-PLIFZ,
 PLVAR LIKE MARC-PLVAR,
 PSTAT LIKE MARC-PSTAT,
 QZGTP LIKE MARC-QZGTP,
 RGEKZ LIKE MARC-RGEKZ,
 RWPRO LIKE MARC-RWPRO,
 SBDKZ LIKE MARC-SBDKZ,
 SCHGT LIKE MARC-SCHGT,
 SHFLG LIKE MARC-SHFLG,
 SHPRO LIKE MARC-SHPRO,
 SHZET LIKE MARC-SHZET,
 SOBSL LIKE MARC-SOBSL,
 STRGR LIKE MARC-STRGR,
 TRAME LIKE MARC-TRAME,
 UEETK LIKE MARC-UEETK,
 UEETO LIKE MARC-UEETO,
 UMLMC LIKE MARC-UMLMC,
 UNETO LIKE MARC-UNETO,
 USEQU LIKE MARC-USEQU,
 VINT1 LIKE MARC-VINT1,
 VINT2 LIKE MARC-VINT2,
 VRBDT LIKE MARC-VRBDT,
 VRBFK LIKE MARC-VRBFK,
 VRBMT LIKE MARC-VRBMT,
 VRBWK LIKE MARC-VRBWK,
 VRMOD LIKE MARC-VRMOD,
 WEBAZ LIKE MARC-WEBAZ,
 WERKS LIKE MARC-WERKS,
 WZEIT LIKE MARC-WZEIT,
 DISKZ LIKE MARD-DISKZ,
 LBSTF LIKE MARD-LBSTF,
 LGORT LIKE MARD-LGORT,
 LMINB LIKE MARD-LMINB,
 LSOBS LIKE MARD-LSOBS,
 MAKTX LIKE MAKT-MAKTX,
 END OF IT_FINAL0.
data : BEGIN OF IT_FINAL occurs 0,
 MATNR LIKE MARA-MATNR,
 MATKL LIKE MARA-MATKL,
 MEINS LIKE MARA-MEINS,
 MTART LIKE MARA-MTART,
 AHDIS LIKE MARC-AHDIS,
 AUSDT LIKE MARC-AUSDT,
 AUTRU LIKE MARC-AUTRU,
 BESKZ LIKE MARC-BESKZ,
 BSTFE LIKE MARC-BSTFE,
 BSTMA LIKE MARC-BSTMA,
 BSTMI LIKE MARC-BSTMI,
 BSTRF LIKE MARC-BSTRF,
 BWSCL LIKE MARC-BWSCL,
 DIBER LIKE MARC-DIBER,
 DISGR LIKE MARC-DISGR,
 DISLS LIKE MARC-DISLS,
 DISMM LIKE MARC-DISMM,
 DISPO LIKE MARC-DISPO,
 DISPR LIKE MARC-DISPR,
 DZEIT LIKE MARC-DZEIT,
 EISBE LIKE MARC-EISBE,
 EISLO LIKE MARC-EISLO,
 EKGRP LIKE MARC-EKGRP,
 FHORI LIKE MARC-FHORI,
 FXHOR LIKE MARC-FXHOR,
 KAUTB LIKE MARC-KAUTB,
 KORDB LIKE MARC-KORDB,
 KZAUS LIKE MARC-KZAUS,
 LFGJA LIKE MARC-LFGJA,
 LFMON LIKE MARC-LFMON,
 LGRAD LIKE MARC-LGRAD,
 LVORM LIKE MARC-LVORM,
 MABST LIKE MARC-MABST,
 MINBE LIKE MARC-MINBE,
 MMSTA LIKE MARC-MMSTA,
 MMSTD LIKE MARC-MMSTD,
 MRPPP LIKE MARC-MRPPP,
 MTVFP LIKE MARC-MTVFP,
 NFMAT LIKE MARC-NFMAT,
 PERKZ LIKE MARC-PERKZ,
 PLIFZ LIKE MARC-PLIFZ,
 PLVAR LIKE MARC-PLVAR,
 PSTAT LIKE MARC-PSTAT,
 QZGTP LIKE MARC-QZGTP,
 RGEKZ LIKE MARC-RGEKZ,
 RWPRO LIKE MARC-RWPRO,
 SBDKZ LIKE MARC-SBDKZ,
 SCHGT LIKE MARC-SCHGT,
 SHFLG LIKE MARC-SHFLG,
 SHPRO LIKE MARC-SHPRO,
 SHZET LIKE MARC-SHZET,
 SOBSL LIKE MARC-SOBSL,
 STRGR LIKE MARC-STRGR,
 TRAME LIKE MARC-TRAME,
 UEETK LIKE MARC-UEETK,
 UEETO LIKE MARC-UEETO,
 UMLMC LIKE MARC-UMLMC,
 UNETO LIKE MARC-UNETO,
 USEQU LIKE MARC-USEQU,
 VINT1 LIKE MARC-VINT1,
 VINT2 LIKE MARC-VINT2,
 VRBDT LIKE MARC-VRBDT,
 VRBFK LIKE MARC-VRBFK,
 VRBMT LIKE MARC-VRBMT,
 VRBWK LIKE MARC-VRBWK,
 VRMOD LIKE MARC-VRMOD,
 WEBAZ LIKE MARC-WEBAZ,
 WERKS LIKE MARC-WERKS,
 WZEIT LIKE MARC-WZEIT,
 DISKZ LIKE MARD-DISKZ,
 LBSTF LIKE MARD-LBSTF,
 LGORT LIKE MARD-LGORT,
 LMINB LIKE MARD-LMINB,
 LSOBS LIKE MARD-LSOBS,
 MAKTX LIKE MAKT-MAKTX,
 BKLAS LIKE MBEW-BKLAS,
 SALK3 LIKE MBEW-SALK3,
 PEINH LIKE MBEW-PEINH,
 STPRS LIKE MBEW-STPRS,
 VERPR LIKE MBEW-VERPR,
 VPRSV LIKE MBEW-VPRSV,
 ZXPRS LIKE MBEW-STPRS,
 END OF IT_FINAL.
data : BEGIN OF IT_display occurs 0,
 matnr LIKE MARA-MATNR,
 maktx LIKE MAKT-MAKTX,
 meins LIKE MARA-MEINS,
 werks LIKE MARC-WERKS,
 dispo LIKE MARC-DISPO,
 dismm LIKE MARC-DISMM,
 plifz LIKE MARC-PLIFZ,
 webaz LIKE MARC-WEBAZ,
 minbe LIKE MARC-MINBE,
 shzet LIKE MARC-SHZET,
 eisbe LIKE MARC-EISBE,
 disls LIKE MARC-DISLS,
 bstmi LIKE MARC-BSTMI,
 bstma LIKE MARC-BSTMA,
 bstfe LIKE MARC-BSTFE,
 ZXPRS LIKE MBEW-STPRS,
 peinh LIKE MBEW-PEINH,
 salk3 LIKE MBEW-SALK3,
 end of it_display.
ALV Layout Variant
AT SELECTION-SCREEN ON VALUE-REQUEST FOR so_lay.
PERFORM get_alv_layout_values.
SELECTION SCREEN.
AT SELECTION-SCREEN.
IF ( sscrfields-ucomm = 'SJOB' OR
sy-batch = 'X' ).
 s_job = 'X'.
ENDIF.
select single matnr into itab from mara where matnr in so_matnr.
if sy-subrc <> 0.
message e001(zpal).
endif.
START-OF-SELECTION.
IF SO_LAY <> ' '.
 VARIANT-REPORT = 'ZPMACR01_MD_MRP_100'.
 VARIANT-VARIANT = SO_LAY.
else.
VARIANT-VARIANT = '/DEFAULT'.
ENDIF.
INITIALIZATION.
W_REPID = SY-REPID.
START-OF-SELECTION.
IF SO_LAY <> ' '.
 VARIANT-REPORT = w_repid.
 VARIANT-VARIANT = SO_LAY.
else.
VARIANT-VARIANT = '/DEFAULT'.
ENDIF.
SELECT
MARA~MATNR
MARA~MATKL
MARA~MEINS
MARA~MTART
MARC~AHDIS
MARC~AUSDT
MARC~AUTRU
MARC~BESKZ
MARC~BSTFE
MARC~BSTMA
MARC~BSTMI
MARC~BSTRF
MARC~BWSCL
MARC~DIBER
MARC~DISGR
MARC~DISLS
MARC~DISMM
MARC~DISPO
MARC~DISPR
MARC~DZEIT
MARC~EISBE
MARC~EISLO
MARC~EKGRP
MARC~FHORI
MARC~FXHOR
MARC~KAUTB
MARC~KORDB
MARC~KZAUS
MARC~LFGJA
MARC~LFMON
MARC~LGRAD
MARC~LVORM
MARC~MABST
MARC~MINBE
MARC~MMSTA
MARC~MMSTD
MARC~MRPPP
MARC~MTVFP
MARC~NFMAT
MARC~PERKZ
MARC~PLIFZ
MARC~PLVAR
MARC~PSTAT
MARC~QZGTP
MARC~RGEKZ
MARC~RWPRO
MARC~SBDKZ
MARC~SCHGT
MARC~SHFLG
MARC~SHPRO
MARC~SHZET
MARC~SOBSL
MARC~STRGR
MARC~TRAME
MARC~UEETK
MARC~UEETO
MARC~UMLMC
MARC~UNETO
MARC~USEQU
MARC~VINT1
MARC~VINT2
MARC~VRBDT
MARC~VRBFK
MARC~VRBMT
MARC~VRBWK
MARC~VRMOD
MARC~WEBAZ
MARC~WERKS
MARC~WZEIT
MARD~DISKZ
MARD~LBSTF
MARD~LGORT
MARD~LMINB
MARD~LSOBS
MAKT~MAKTX
INTO TABLE IT_TABLE
FROM MARA INNER JOIN MARC ON MARAMATNR = MARCMATNR
INNER JOIN MAKT ON MARAMATNR = MAKTMATNR
WHERE MARA~MATNR IN SO_MATNR
 AND MARC~WERKS IN SO_WERKS
 AND MAKT~SPRAS IN SO_SPRAS.
SELECT
MARA~MATNR
MARA~MATKL
MARA~MEINS
MARA~MTART
MARD~DISKZ
MARD~LBSTF
MARD~LGORT
MARD~LMINB
MARD~LSOBS
INTO TABLE IT_mard
 FROM MARA INNER JOIN MARD ON MARAMATNR = MARDMATNR
 WHERE MARA~MATNR IN SO_MATNR
 and mard~werks in SO_WERKS.
SELECT MATNR BKLAS SALK3 PEINH STPRS VERPR VPRSV
INTO TABLE IT_MBEW FROM MBEW FOR ALL ENTRIES IN IT_TABLE WHERE MATNR =
IT_TABLE-MATNR AND BWKEY IN SO_BWKEY.
LOOP AT IT_TABLE.
 MOVE-CORRESPONDING IT_TABLE TO IT_FINAL0.
 READ TABLE IT_MARD WITH KEY MATNR = IT_TABLE-MATNR.
 IF SY-SUBRC = 0 .
 MOVE-CORRESPONDING IT_MARD TO IT_FINAL0.
 ENDIF.
 APPEND IT_FINAL0.
 CLEAR IT_FINAL0.
ENDLOOP.
LOOP AT IT_FINAL0.
 READ TABLE IT_MBEW WITH KEY MATNR = IT_final0-MATNR.
 IF SY-SUBRC = 0 .
 MOVE-CORRESPONDING IT_MBEW TO IT_FINAL.
 IF IT_MBEW-VPRSV = 'S'.
 MOVE IT_MBEW-STPRS TO IT_FINAL-ZXPRS.
 ELSE.
 MOVE IT_MBEW-VERPR TO IT_FINAL-ZXPRS.
 ENDIF.
 ENDIF.
 MOVE-CORRESPONDING IT_FINAL0 TO IT_FINAL.
 APPEND IT_FINAL.
 CLEAR IT_FINAL.
ENDLOOP.
Default Layout
LOOP AT IT_FINAL.
 Read table it_final with key matnr = SO_matnr.
 Move it_final-MATNR to it_display-MATNR.
 Move it_final-MAKTX to it_display-MAKTX.
 Move it_final-MEINS to it_display-MEINS.
 Move it_final-WERKS to it_display-WERKS.
 Move it_final-DISPO to it_display-DISPO.
 Move it_final-DISMM to it_display-DISMM.
 Move it_final-PLIFZ to it_display-PLIFZ.
 Move it_final-WEBAZ to it_display-WEBAZ.
 Move it_final-MINBE to it_display-MINBE.
 Move it_final-SHZET to it_display-SHZET.
 Move it_final-EISBE to it_display-EISBE.
 Move it_final-DISLS to it_display-DISLS.
 Move it_final-BSTMI to it_display-BSTMI.
 Move it_final-BSTMA to it_display-BSTMA.
 Move it_final-BSTFE to it_display-BSTFE.
 MOVE it_final-ZXPRS to it_display-ZXPRS.
 Move it_final-PEINH to it_display-PEINH.
 Move it_final-SALK3 to it_display-SALK3.
 Append it_display.
endloop.
data: v_data type c value ' '.
if it_display is initial.
 v_data = ' '.
else.
 v_data = 'X'.
endif.
END-OF-SELECTION.
END-OF-SELECTION.
if s_job = 'X'.
 perform execute_back.
else.
 perform execute_fore.
endif.
 FORM execute_fore *
Form execute_fore.
*& Form REUSE_ALV_FIELDCATALOG_MERGE
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 I_PROGRAM_NAME = W_REPID
 I_INTERNAL_TABNAME = 'IT_FINAL'
I_STRUCTURE_NAME =
I_CLIENT_NEVER_DISPLAY = 'X'
 I_INCLNAME = W_REPID
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE =
 CHANGING
 CT_FIELDCAT = IT_FIELDCAT
 EXCEPTIONS
 INCONSISTENT_INTERFACE = 1
 PROGRAM_ERROR = 2
 OTHERS = 3
IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*& Form DISPLAY_ALV_REPORT
 Display report using ALV grid
*IF SO_LAY <> ' '.
VARIANT-VARIANT = SO_LAY.
*endif.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_INTERFACE_CHECK = ' '
 I_BYPASSING_BUFFER =
 I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = W_REPID
 I_CALLBACK_PF_STATUS_SET = ' '
 I_CALLBACK_USER_COMMAND = ' '
 I_CALLBACK_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_END_OF_LIST = ' '
 I_STRUCTURE_NAME =
 I_BACKGROUND_ID = ' '
 I_GRID_TITLE =
 I_GRID_SETTINGS =
 IS_LAYOUT = IT_LAYOUT
 IT_FIELDCAT = IT_FIELDCAT[]
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = 'X'
 IS_VARIANT = VARIANT
 IT_EVENTS =
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 IT_ALV_GRAPHICS =
 IT_ADD_FIELDCAT =
 IT_HYPERLINK =
 I_HTML_HEIGHT_TOP =
 I_HTML_HEIGHT_END =
 IT_EXCEPT_QINFO =
 IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = IT_FINAL
 EXCEPTIONS
 PROGRAM_ERROR = 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.
endform.
 FORM execute_back *
FORM execute_back.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 I_PROGRAM_NAME = W_REPID
 I_INTERNAL_TABNAME = 'IT_FINAL'
I_STRUCTURE_NAME =
I_CLIENT_NEVER_DISPLAY = 'X'
 I_INCLNAME = W_REPID
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE =
 CHANGING
 CT_FIELDCAT = IT_FIELDCAT
 EXCEPTIONS
 INCONSISTENT_INTERFACE = 1
 PROGRAM_ERROR = 2
 OTHERS = 3
IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER = ' '
I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = W_REPID
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
 I_CALLBACK_TOP_OF_PAGE = 'TOP_OF_PAGE'
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '
I_GRID_TITLE =
I_GRID_SETTINGS =
 IS_LAYOUT =
 IT_FIELDCAT = it_fieldcat[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
 I_SAVE = 'X'
 IS_VARIANT = variant
 IT_EVENTS = gt_events[]
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_HTML_HEIGHT_TOP = 0
I_HTML_HEIGHT_END = 0
IT_ALV_GRAPHICS =
IT_HYPERLINK =
IT_ADD_FIELDCAT =
IT_EXCEPT_QINFO =
IR_SALV_FULLSCREEN_ADAPTER =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
 T_OUTTAB = it_final
EXCEPTIONS
 PROGRAM_ERROR = 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.
endform.
form top_of_page.
CALL FUNCTION 'REUSE_ALV_GRID_LAYOUT_INFO_GET'
 IMPORTING
 ES_LAYOUT =
 ET_FIELDCAT = IT_FIELDCAT3[]
 ET_SORT =
 ET_FILTER =
 ES_GRID_SCROLL =
 ES_VARIANT = VARIANT
 ET_MARKED_COLUMNS =
 ET_FILTERED_ENTRIES =
 ET_FIELDCAT_BACKEND =
 ES_PRINT =
 EXCEPTIONS
 NO_INFOS = 1
 PROGRAM_ERROR = 2
 OTHERS = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
clear count.
LOOP AT IT_FIELDCAT3 into is_fieldcat3 where no_out eq space.
*move-corresponding is_fieldcat3 to is_fieldcat2.
move: is_fieldcat3-fieldname to is_fieldcat2-fieldname,
 is_fieldcat3-ref_fieldname to is_fieldcat2-ref_field,
 is_fieldcat3-ref_tabname to is_fieldcat2-ref_table,
 is_fieldcat3-seltext_l to is_fieldcat2-coltext,
 is_fieldcat3-no_out to is_fieldcat2-no_out,
 is_fieldcat3-col_pos to is_fieldcat2-col_pos.
*move:
 is_fieldcat3-row_pos to is_fieldcat2-row_pos,
 is_fieldcat3-col_pos to is_fieldcat2-col_pos,
 is_fieldcat3-fieldname to is_fieldcat2-fieldname,
 is_fieldcat3-tabname to is_fieldcat2-tabname,
 is_fieldcat3-outputlen to is_fieldcat2-outputlen,
 is_fieldcat3-no_out to is_fieldcat2-no_out,
 is_fieldcat3-seltext_l to is_fieldcat2-coltext,
 is_fieldcat3-ref_fieldname to is_fieldcat2-ref_field,
 is_fieldcat3-ref_tabname to is_fieldcat2-ref_table,
 is_fieldcat3-DDIC_OUTPUTLEN to is_fieldcat2-DD_OUTLEN,
 is_fieldcat3-datatype to is_fieldcat2-datatype,
 is_fieldcat3-inttype to is_fieldcat2-inttype,
 is_fieldcat3-INTLEN to is_fieldcat2-INTLEN.
APPEND IS_FIELDCAT2 TO IT_FIELDCAT2.
*count = count + 1.
ENDLOOP.
loop at it_fieldcat2 into is_fieldcat2.
if is_fieldcat2-no_out = 'X'.
 delete it_fieldcat2 index sy-tabix.
else.
 count = count + 1.
endif.
endloop.
describe table it_fieldcat2 lines count.
CALL METHOD cl_alv_table_create=>create_dynamic_table
 EXPORTING
 it_fieldcatalog = it_fieldcat2[]
 IMPORTING
 ep_table = new_table.
ASSIGN new_table->* TO <tab>.
CREATE DATA new_line LIKE LINE OF <tab>.
ASSIGN new_line->* TO <wa>.
*-- Perform to build table for attachment data
PERFORM build_xls_data_table.
*-- Perform to populate e-mail message
PERFORM populate_email_message_body.
*-- Perform to send mail
PERFORM send_file_as_email_attachment.
*-- Perform to Instruct mail send program for SAPCONNECT to send email.
PERFORM initiate_mail_execute_program.
ENDFORM.
*& Form build_xls_data_table
form build_xls_data_table.
data: char_var(30) type C,
 num_var(10) type n.
CONSTANTS: con_cret TYPE x VALUE '0D', "NEW LINE
 tabchar TYPE x VALUE '09'. "tab
loop at it_fieldcat2 into is_fieldcat2.
 concatenate it_attach is_fieldcat2-coltext
 into it_attach separated by tabchar.
endloop.
CONCATENATE con_cret it_attach INTO it_attach.
APPEND it_attach.
CLEAR it_attach.
 field-symbols: <t> type ANY.
LOOP AT it_final.
col_1 = 1.
 do count times.
 Assign component col_1 of structure <wa> to <f>.
 read table it_fieldcat2 into is_fieldcat2 with key col_pos = col_1.
 loop at it_fieldcat into is_fieldcat.
 if is_fieldcat-fieldname = is_fieldcat2-fieldname.
 assign component is_fieldcat-col_pos of structure it_final to <t>.
 exit.
 endif.
 endloop.
 <f> = <t>.
 clear <t>.
 col_1 = col_1 + 1.
 enddo.
 append <wa> to <tab>.
 endloop.
loop at <tab> into <wa>.
col_1 = 1.
do count times.
 Assign component col_1 of structure <wa> to <f>.
 move <f> to char_var.
 concatenate it_attach char_var
 into it_attach separated by tabchar.
 col_1 = col_1 + 1.
enddo.
 CONCATENATE con_cret it_attach INTO it_attach.
 APPEND it_attach.
 CLEAR it_attach.
endloop.
ENDFORM.
FORM send_file_as_email_attachment.
DATA:
 ld_mtitle LIKE sodocchgi1-obj_descr,
 ld_email LIKE somlreci1-receiver,
 ld_format TYPE so_obj_tp ,
 ld_attdescription TYPE so_obj_nam ,
 ld_attfilename TYPE so_obj_des ,
 ld_sender_address LIKE soextreci1-receiver,
 ld_sender_address_type LIKE soextreci1-adr_typ.
ld_email = p_email.
ld_mtitle = text-003.
ld_format = 'XLS'.
ld_attdescription = ' '.
ld_attfilename = 'DATA'.
ld_sender_address = ' '.
ld_sender_address_type = ' '.
Fill the document data.
w_doc_data-doc_size = 1.
Populate the subject/generic message attributes
w_doc_data-obj_langu = sy-langu.
w_doc_data-obj_name = 'SAPRPT'.
w_doc_data-obj_descr = ld_mtitle .
w_doc_data-sensitivty = 'F'.
Fill the document data and get size of attachment
CLEAR w_doc_data.
READ TABLE it_attach INDEX w_cnt.
w_doc_data-doc_size =
( w_cnt - 1 ) * 255 + STRLEN( it_attach ).
w_doc_data-obj_langu = sy-langu.
w_doc_data-obj_name = 'SAPRPT'.
w_doc_data-obj_descr = ld_mtitle.
w_doc_data-sensitivty = 'F'.
LOOP AT it_attach.
 MOVE it_attach(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+255(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+510(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+765(235) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+765(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+1020(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+1275(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+1530(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+1785(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+2040(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+2295(255) TO t_hex.
 APPEND t_hex.
 MOVE it_attach+2550(100) TO t_hex.
 APPEND t_hex.
ENDLOOP.
Describe the body of the message
CLEAR t_packing_list.
REFRESH t_packing_list.
t_packing_list-transf_bin = space.
t_packing_list-head_start = 1.
t_packing_list-head_num = 0.
t_packing_list-body_start = 1.
DESCRIBE TABLE it_message LINES t_packing_list-body_num.
t_packing_list-doc_type = 'RAW'.
APPEND t_packing_list.
Create attachment notification
t_packing_list-transf_bin = 'X'.
t_packing_list-head_start = 1.
t_packing_list-head_num = 1.
t_packing_list-body_start = 1.
DESCRIBE TABLE t_hex LINES t_packing_list-body_num.
t_packing_list-doc_type = ld_format.
t_packing_list-obj_descr = ld_attdescription.
t_packing_list-obj_name = ld_attfilename.
t_packing_list-doc_size = t_packing_list-body_num * 255.
APPEND t_packing_list.
Add the recipients email address
CLEAR t_receivers.
REFRESH t_receivers.
t_receivers-receiver = ld_email.
t_receivers-rec_type = 'U'.
t_receivers-com_type = 'INT'.
t_receivers-notif_del = 'X'.
t_receivers-notif_ndel = 'X'.
APPEND t_receivers.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
 EXPORTING
 document_data = w_doc_data
 put_in_outbox = 'X'
 sender_address = ld_sender_address
 sender_address_type = ld_sender_address_type
 IMPORTING
 sent_to_all = w_sent_all
 TABLES
 packing_list = t_packing_list
 contents_txt = it_message
 contents_hex = t_hex
 receivers = t_receivers
 EXCEPTIONS
 too_many_receivers = 1
 document_not_sent = 2
 document_type_not_exist = 3
 operation_no_authorization = 4
 parameter_error = 5
 x_error = 6
 enqueue_error = 7
 OTHERS = 8.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ld_error = sy-subrc.
LOOP AT t_receivers.
 ld_receiver = t_receivers-retrn_code.
ENDLOOP.
ENDFORM. "SEND_FILE_AS_EMAIL_ATTACHMENT
*& Form INITIATE_MAIL_EXECUTE_PROGRAM
 Instructs mail send program for SAPCONNECT to send email.
FORM initiate_mail_execute_program.
WAIT UP TO 2 SECONDS.
SUBMIT rsconn01 WITH mode = 'INT'
 WITH output = 'X'
 AND RETURN.
ENDFORM. " INITIATE_MAIL_EXECUTE_PROGRAM
*& Form POPULATE_EMAIL_MESSAGE_BODY
 Populate message body text
FORM populate_email_message_body.
REFRESH it_message.
it_message = text-004.
APPEND it_message.
CONCATENATE SY-DATUM 'to' SY-DATUM INTO it_message SEPARATED BY
space.
APPEND it_message.
ENDFORM. " POPULATE_EMAIL_MESSAGE_BODY
*& Form get_alv_layout_values
FORM get_alv_layout_values.
variant-report = w_repid.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
 EXPORTING
 is_variant = variant
 i_save = 'A'
 IMPORTING
 es_variant = variant
 EXCEPTIONS
 not_found = 1
 program_error = 2
 OTHERS = 3.
CHECK sy-subrc = 0.
so_lay = variant-variant.
ENDFORM. " get_alv_layout_values

Hi Arpit,
Take a look at the documentation of FM 'SO_DOCUMENT_SEND_API1' for parameter PACKING_LIST. I think you should set t_packing_list-head_num to a different value than 0 for the second attachment.
Regards,
John.

Applescript: Packaging and exporting PDFs for multiple files -- need some tweaks

I found and tweaked a droplet script that isn't quite working right. I am hoping for some help with getting it to work the way I want. I tried and failed to learn to do this myself. Your help is greatly appreciated!
Here's an example: I drag two files called "filename.indd" and "filename2.indd" onto the droplet. The script I have right now will output the packages and PDFs into the following folder structure:
export folder
 filename folder
 filename.pdf
 filename folder
 filename.indd
 [Package contents]
 filename2 folder
 filename2.pdf
 filename2 folder
 filename2.indd
 [Package contents]
Here's the folder structure I need (using a dialog box or script that intelligently knows that the directory to save in is the same as the files I dragged on to the droplet would be amazing):
dialog box to choose new directory set to baseFolder
or
baseFolder <---- set to the current directory of the files I dragged onto the droplet
 filename folder
 filename.indd
 [Package contents]
 PDF folder <--------new folder "PDF" created
 filename.pdf
 filename2 folder
 filename2.indd
 [Package contents]
 PDF folder <--------new folder "PDF" created
 filename2.pdf
Here's a script I found and modified:
property baseFolder : (path to desktop as text) & "exports:"
on open mgItems
 repeat with mgThisItem in mgItems
 tell application id "com.adobe.InDesign"
 try
open mgThisItem
 set mgDocName to name of active document
 set text item delimiters of AppleScript to ".indd"
 set mgShortName to text item 1 of mgDocName
 set targetFolderPath to my createFolder(mgShortName)
 set text item delimiters of AppleScript to ""
 set mgPackageFilePath to targetFolderPath & mgShortName as string
 set mgProofFilePath to mgPackageFilePath & ".pdf" as string
 set properties of PDF export preferences to properties of PDF export preset "[Smallest File Size]"
 tell the active document to export format PDF type to mgProofFilePath without showing options
 tell the active document to package to mgPackageFilePath with copying fonts, ignore preflight errors, copying profiles, updating graphics, including hidden layers, copying linked graphics and creating report
close active document saving no
 on error e
display dialog e
 end try
 end tell
 end repeat
 display dialog "PDFs created and InDesign file packaged"
end open
on createFolder(nameString)
 set macFolderPath to baseFolder & nameString
 do shell script "mkdir -p " & quoted form of POSIX path of macFolderPath
 return macFolderPath & ":"
end createFolder
Thanks very much!

...anyone? :\

[JS, CS3] Change text color and export pdfs

Hi there,
I am new to scripting and I am trying to find out if a script exists that will export a PDF, then change all text of a certain color to black, then export another pdf with the same settings as the first, but appending the filename. I've searched the forum and understand about the change color bug, but I haven't seen anything in JavaScript -- It's all been applescript.
Anyone have any brilliant ideas?
Help is GREATLY appreciated!
-Molly

I couldn't get the specific color replacement, I chose the rambo approach... if(app.documents.length!=0) { var doc = app.activeDocument; if(doc.saved==true) { var docFile = doc.fullName; var docFile = doc.fullName; var myFile = File(docFile).fsName; var myPdfPreset = app.pdfExportPresets.item("[PDF/X-1a:2001]"); //Put what you want var myPdfFile = new File(String(myFile).split(".indd")[0]+".pdf"); exportPDF(myPdfFile,myPdfPreset); var myTfs = doc.textFrames.everyItem().getElements(); for(i=0; i<myTfs.length; i++) { //will reset all texts to black, quite drastic but works. myTfs[i].texts[0].fillColor = doc.swatches[2]; //Should be better to use swatches.item("[Black]"); //But can't check on my french system } var myPdfFile = new File(String(myFile).split(".indd")[0]+"_AllTextsToBlack.pdf"); exportPDF(myPdfFile,myPdfPreset); } else { alert("Please save your document first"); } } else { alert("You need to open a doument first !");exportF } function exportPDF(myPdfFile,myPdfPreset) { doc.exportFile (ExportFormat.PDF_TYPE, myPdfFile, false, myPdfPreset, undefined, undefined, false); }

Executing a Job and Exporting PDF Output via API

Similar Messages

Maybe you are looking for