Converting Programs- Free and Reliable

I've tried Videora and Xilisoft but neither makes par! Videora has sound bugs and Xilisoft doesn't transcode but 5 minutes! Anyone got any ideas on free, simple, and reliable converters!

its not reliable of course but thers this
To use Videora iPod Convertor to convert movies for use on your iPod, consult these helpful links:
To get started: http://www.videora.com/en-us/Converter/iPod/
If you have questions: http://www.videora.com/en-us/Converter/guides.html
If you have more questions, post them here: http://www.pspvideo9.com/forums/index.php?c=8
Note that Videora iPod Convertor is a 3rd party program. If you need help with it, post your question there.
GFF

Similar Messages

Which video converter is fast and reliable for iPhone?

Many video converter software can be found through the web. It is difficult to decide which one to choose. Which is fast and reliable for iPhone?

I searched the same question several days before.
I find "iFunia Media-Converter [Mac App store] Promotion Code for official"
You may mail to [email protected],they will send the promo codes for you to try out the application.
I tried this converter and felt good.
Hope this can help you!

I have downloaded the converter program and the conversion from PDF to Word is terrible. Is there a better solution or setting?

I am trying to convert a PDF to Word without re-typing. I downloaded the converter program onto my MAC but the conversion was terrible. Unusable. Is there a better way. I also have a PC so I could try that as well if would make any difference.

"Scanned" Scanned anything starts you with an image / picture of the page content that was on the source paper.
There is no "renderable" text. OCR can provide an output of text that can be exported. Without that all that is exported is the image.
As to OCR, Acrobat's ClearScan lends itself to repurpose via the export process.
Regardless, anything sourced from a scanner output is the "pig's ear" and that'll not yield the "silk purse".
Export is dictated by the input (GIGO). Export output identifies input quality.
As a C Student stated a Word file (being well-built helps) that sourced the PDF will yield workable export back to Word.
PDF's sourced for FrameMaker export rather nicely.
For optimal export always start with a well-formed Tagged PDF (ISO 14289-1, PDF/UA-1 compliant).
Two core design considerations of tagged PDF are (1) support Accessible PDF and (2) support export (repurpose) of PDF content.
Be well...

Hello! I have the Acrobat XI test version installed, got the registration Mail and confirmed it. When i have the program opened and try to convert the file from a pdf to a word and press the convert button, it shows a the message "application failed" (in

Hello! I have the Acrobat XI test version installed, got the registration Mail and confirmed it. When i have the program opened and try to convert the file from a pdf to a word and press the convert button, it shows a the message "application failed" (in german "Fehler bei der Anmeldung"). I hope have explained the issue on the right way with my bad english. Do you have a solution for it?? Best regards, Marcus Wenk

yes, you are right. it is the adobe reader via exportPDF. but it should be the acrobat. it was written on the internetpage...

Is there one converter program that will convert these three formats: cda, wma, and midi to mp3?, Is there one converter program tha t will convert these three formats: cda, wma, and midi to mp3?

Is there one converter program that will convert these three audio formats: cda, wma, and midi to mp3?

Hi Illaass, Oh yes for days and I even called and email some asking this question and no one I could find did all three so I only have to buy one program. The one I was going to download because it did two of them I read the reviews and 2 people said that a hacker was attached to the download and they changed all his search features amoung other things. So I got out of there and that was the end of that. That's why I decided to try this in case someone knows the answer. Thanks for responding though. Sandi

I need a RAW converter program and the adovbe system has been recommended. how shall I proceed?

I need a RAW converter program and the Adobe system has been recommended. How do I proceed?

Seems you are looking for DNG Convertor, If so, here is the download link
Adobe Camera Raw and DNG Converter for Windows : http://www.adobe.com/support/downloads/product.jsp?product=106&platform=Windows
Adobe Camera Raw and DNG Converter for Macintosh : http://www.adobe.com/support/downloads/product.jsp?product=106&platform=Macintosh

I purchased the adobe pdf converter program, however, I am now using a new computer and I need to know how to retrieve it so that it can work on my new computer.

I purchased the adobe pdf converter program, however, I am now using a new computer and I need to know how to retrieve it so that it can work on my new computer.

What exactly did you purchase: Acrobat, or the ExportPDF / PDF Pack online service?

Using Lightroom 4 w/ Windows 7. Recently started shooting w/ Sony camera .arw files. Lightroom cannot read the files. Loaded Adobe converter program onto the computer and this program cannot read the files either. Any suggestions?

Using Lightroom 4 w/ Windows 7. Recently started shooting w/ Sony camera that shoots .arw files. Lightroom cannot read the files. Loaded Adobe converter program onto the computer and this program cannot read the files either. Any suggestions?

Thnx again for the reply. The version of Lightroom I have is 4.0 (working w/Windows 7) This computer and all media files are kept off-line After doing more research, I downloaded DNG Converter 7.1This loaded into a .zip folder, which I am planning to install into the off-line computer andrun. Where does this folder go?
And will this set up work with my version of Lightroom?
What a pain. Makes me wanna go back to shooting .nef files for all stills
Thnx

Must I use a converter program to import movie files from Canon powershot s95?

Must I use a converter program to import movie files from Canon powershot s95?

Camera Raw plug-in | Supported cameras
Camera Raw-compatible Adobe applications
With Elements 11 you cannot.
The SX60 HS was first supported in Camera Raw 8.7 which is only compatible with Elements 13 and later.
Options:
Pay to upgrade to Elements 13
Free option: download the Adobe DNG converter, convert all SX60 HS Raw files to DNG format then edit the DNGs in Elements 11
Photoshop Help | Digital Negative (DNG)

Converting program for videos

I know how to convert my videos/movies and such but I want to use a new program.. Im using Cucusoftware or something like that, and I just don't like how it has "free trial" on all my videos.. Well, you catch my drift. Anyone know of any good free video converter programs for my iPod?

Hey thanks man
Here's the link that I downloaded it from.. Maybe it's a different one from you tryed and may work for you.. that is if you're interest:
http://www.videora.com/en-us/Converter/iPod/download.php

Report output to convert to pdf and mail it to recepient

Hi
I'm using the below coding for converting the output of the program to pdf and then mail it to the recepient.The coding works for background processsing only can i do the same for online.In the write statement i'm using the sy-repid my program name and when i get the pdf mail i'm getting the name of the program but instead i need to get the output of my program.Can any one help me in correcting the coding to get the output in pdf format.I know where i'm going wrong but this is the first time i'm working with this so new to this....It would be better if i could run the program and get the convertions into pdf through mail instead of background processing.....Please change the coding below to get the same.....
DATA: gd_recsize TYPE i.
Spool IDs
TYPES: BEGIN OF t_tbtcp.
 INCLUDE STRUCTURE tbtcp.
TYPES: END OF t_tbtcp.
DATA: it_tbtcp TYPE STANDARD TABLE OF t_tbtcp INITIAL SIZE 0,
 wa_tbtcp TYPE t_tbtcp.
Job Runtime Parameters
DATA: gd_eventid LIKE tbtcm-eventid,
 gd_eventparm LIKE tbtcm-eventparm,
 gd_external_program_active LIKE tbtcm-xpgactive,
 gd_jobcount LIKE tbtcm-jobcount,
 gd_jobname LIKE tbtcm-jobname,
 gd_stepcount LIKE tbtcm-stepcount,
 gd_error TYPE sy-subrc,
 gd_reciever TYPE sy-subrc.
DATA: w_recsize TYPE i.
DATA: gd_subject LIKE sodocchgi1-obj_descr,
 it_mess_bod LIKE solisti1 OCCURS 0 WITH HEADER LINE,
 it_mess_att LIKE solisti1 OCCURS 0 WITH HEADER LINE,
 gd_sender_type LIKE soextreci1-adr_typ,
 gd_attachment_desc TYPE so_obj_nam,
 gd_attachment_name TYPE so_obj_des.
Spool to PDF conversions
DATA: gd_spool_nr LIKE tsp01-rqident,
 gd_destination LIKE rlgrap-filename,
 gd_bytecount LIKE tst01-dsize,
 gd_buffer TYPE string.
Binary store for PDF
DATA: BEGIN OF it_pdf_output OCCURS 0.
 INCLUDE STRUCTURE tline.
DATA: END OF it_pdf_output.
CONSTANTS: c_dev LIKE sy-sysid VALUE 'DEV',
 c_no(1) TYPE c VALUE ' ',
 c_device(4) TYPE c VALUE 'LOCL'.
*START-OF-SELECTION.
START-OF-SELECTION.
Write statement to represent report output. Spool request is created
if write statement is executed in background. This could also be an
ALV grid which would be converted to PDF without any extra effort
WRITE sy-repid.
new-page.
commit work.
new-page print off.
IF sy-batch EQ 'X'.
 PERFORM get_job_details.
 PERFORM obtain_spool_id.
Alternative way could be to submit another program and store spool
id into memory, will be stored in sy-spono.
*submit ZSPOOLTOPDF2
 to sap-spool
 spool parameters %_print
 archive parameters %_print
 without spool dynpro
 and return.
Get spool id from program called above
IMPORT w_spool_nr FROM MEMORY ID 'SPOOLTOPDF'.
 PERFORM convert_spool_to_pdf.
 PERFORM process_email.
 if p_delspl EQ 'X'.
 PERFORM delete_spool.
 endif.
 IF sy-sysid = c_dev.
 wait up to 5 seconds.
 SUBMIT rsconn01 WITH mode = 'INT'
 WITH output = 'X'
 AND RETURN.
 ENDIF.
ELSE.
 SKIP.
 WRITE:/ 'Program must be executed in background in-order for spool'
 'request to be created.'.
ENDIF.
 FORM obtain_spool_id *
FORM obtain_spool_id.
CHECK NOT ( gd_jobname IS INITIAL ).
CHECK NOT ( gd_jobcount IS INITIAL ).
SELECT * FROM tbtcp
 INTO TABLE it_tbtcp
 WHERE jobname = gd_jobname
 AND jobcount = gd_jobcount
 AND stepcount = gd_stepcount
 AND listident <> '0000000000'
 ORDER BY jobname
 jobcount
 stepcount.
READ TABLE it_tbtcp INTO wa_tbtcp INDEX 1.
IF sy-subrc = 0.
 message s004(zdd) with gd_spool_nr.
 gd_spool_nr = wa_tbtcp-listident.
 MESSAGE s004(zdd) WITH gd_spool_nr.
ELSE.
 MESSAGE s005(zdd).
ENDIF.
ENDFORM.
 FORM get_job_details *
FORM get_job_details.
Get current job details
CALL FUNCTION 'GET_JOB_RUNTIME_INFO'
 IMPORTING
 eventid = gd_eventid
 eventparm = gd_eventparm
 external_program_active = gd_external_program_active
 jobcount = gd_jobcount
 jobname = gd_jobname
 stepcount = gd_stepcount
 EXCEPTIONS
 no_runtime_info = 1
 OTHERS = 2.
ENDFORM.
 FORM convert_spool_to_pdf *
FORM convert_spool_to_pdf.
CALL FUNCTION 'CONVERT_ABAPSPOOLJOB_2_PDF'
 EXPORTING
 src_spoolid = gd_spool_nr
 no_dialog = c_no
 dst_device = c_device
 IMPORTING
 pdf_bytecount = gd_bytecount
 TABLES
 pdf = it_pdf_output
 EXCEPTIONS
 err_no_abap_spooljob = 1
 err_no_spooljob = 2
 err_no_permission = 3
 err_conv_not_possible = 4
 err_bad_destdevice = 5
 user_cancelled = 6
 err_spoolerror = 7
 err_temseerror = 8
 err_btcjob_open_failed = 9
 err_btcjob_submit_failed = 10
 err_btcjob_close_failed = 11
 OTHERS = 12.
CHECK sy-subrc = 0.
Transfer the 132-long strings to 255-long strings
LOOP AT it_pdf_output.
 TRANSLATE it_pdf_output USING ' ~'.
 CONCATENATE gd_buffer it_pdf_output INTO gd_buffer.
ENDLOOP.
TRANSLATE gd_buffer USING '~ '.
DO.
 it_mess_att = gd_buffer.
 APPEND it_mess_att.
 SHIFT gd_buffer LEFT BY 255 PLACES.
 IF gd_buffer IS INITIAL.
 EXIT.
 ENDIF.
ENDDO.
ENDFORM.
 FORM process_email *
FORM process_email.
DESCRIBE TABLE it_mess_att LINES gd_recsize.
CHECK gd_recsize > 0.
PERFORM send_email USING p_email1.
perform send_email using p_email2.
ENDFORM.
 FORM send_email *
--> p_email *
FORM send_email USING p_email.
CHECK NOT ( p_email IS INITIAL ).
REFRESH it_mess_bod.
Default subject matter
gd_subject = 'Branch Revenue'.
gd_attachment_desc = 'Branch Revenue'.
CONCATENATE 'attach_name' ' ' INTO gd_attachment_name.
it_mess_bod = 'Branch Revenue,Profit and Commissions'.
APPEND it_mess_bod.
it_mess_bod = 'Message Body text, line 2...'.
APPEND it_mess_bod.
If no sender specified - default blank
IF p_sender EQ space.
 gd_sender_type = space.
ELSE.
 gd_sender_type = 'INT'.
ENDIF.
Send file by email as .xls speadsheet
PERFORM send_file_as_email_attachment
 tables it_mess_bod
 it_mess_att
 using p_email
 'Branch Revenue'
 'PDF'
 gd_attachment_name
 gd_attachment_desc
 p_sender
 gd_sender_type
 changing gd_error
 gd_reciever.
ENDFORM.
 FORM delete_spool *
FORM delete_spool.
DATA: ld_spool_nr TYPE tsp01_sp0r-rqid_char.
ld_spool_nr = gd_spool_nr.
CHECK p_delspl <> c_no.
CALL FUNCTION 'RSPO_R_RDELETE_SPOOLREQ'
 EXPORTING
 spoolid = ld_spool_nr.
ENDFORM.
*& Form SEND_FILE_AS_EMAIL_ATTACHMENT
 Send email
FORM send_file_as_email_attachment tables it_message
 it_attach
 using p_email
 p_mtitle
 p_format
 p_filename
 p_attdescription
 p_sender_address
 p_sender_addres_type
 changing p_error
 p_reciever.
DATA: ld_error TYPE sy-subrc,
 ld_reciever TYPE sy-subrc,
 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_receiver LIKE sy-subrc.
data: t_packing_list like sopcklsti1 occurs 0 with header line,
 t_contents like solisti1 occurs 0 with header line,
 t_receivers like somlreci1 occurs 0 with header line,
 t_attachment like solisti1 occurs 0 with header line,
 t_object_header like solisti1 occurs 0 with header line,
 w_cnt type i,
 w_sent_all(1) type c,
 w_doc_data like sodocchgi1.
ld_email = p_email.
ld_mtitle = p_mtitle.
ld_format = p_format.
ld_attdescription = p_attdescription.
ld_attfilename = p_filename.
ld_sender_address = p_sender_address.
ld_sender_address_type = p_sender_addres_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'.
CLEAR t_attachment.
REFRESH t_attachment.
t_attachment[] = it_attach[].
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_attachment 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
 commit_work = 'X'
 IMPORTING
 sent_to_all = w_sent_all
 TABLES
 packing_list = t_packing_list
 contents_bin = t_attachment
 contents_txt = it_message
 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.
Populate zerror return code
ld_error = sy-subrc.
Populate zreceiver return code
LOOP AT t_receivers.
 ld_receiver = t_receivers-retrn_code.
ENDLOOP.
ENDFORM.
Thanks in advance.....

Hi
Below is the code I was used to convert the sap script( Sales Order) to convert to PDf and send as an attachment.
Dev/UDD Id : EUR-770416 *
Author : M.Sreeram Kumar *
Date : 08-Apr-07 *
Request : DU1K933766
Description: Send an order confirmation to the multiple user in a *
 PDF format via Email. *
Change Log *
Author : *
Date : *
Description : *
Request : *
 Print of an order confirmation by SAPscript
REPORT zrep_email LINE-COUNT 100 MESSAGE-ID vn.
TABLES: komk, "Communicationarea for conditions
 komp, "Communicationarea for conditions
 komvd, "Communicationarea for conditions
 vbco3, "Communicationarea for view
 vbdka, "Headerview
 vbdpa, "Itemview
 vbdpau, "Subitemnumbers
 conf_out, "Configuration data
 sadr, "Addresses
 tvag, "Reason for rejection
 vedka, "Servicecontract head data
 vedpa, "Servicecontract position data
 vedkn, "Servicecontract head notice data
 vedpn, "Servicecontract pos. notice data
 vbpa, "Sales Document: Partner
 kna1, "General Data in Customer Master
 riserls, "Serialnumbers
 komser, "Serialnumbers for print
 tvbur, "Sales office
 tvko, "Sales organisation
 adrs, "Communicationarea for Address
 fpltdr. "billing schedules
INCLUDE zrep_rvadtabl.
*INCLUDE yzrvadtabl.
*INCLUDE RVADTABL.
INCLUDE zrep_rvdirekt.
*INCLUDE yzrvdirekt.
*INCLUDE RVDIREKT.
INCLUDE zrep_vedadata.
*INCLUDE yzvedadata.
*INCLUDE VEDADATA.
DATA: retcode LIKE sy-subrc. "Returncode
DATA: repeat(1) TYPE c.
DATA: xscreen(1) TYPE c. "Output on printer or screen
DATA: BEGIN OF steu, "Controldata for output
 vdkex(1) TYPE c,
 vdpex(1) TYPE c,
 kbkex(1) TYPE c,
 kbpex(1) TYPE c,
 END OF steu.
DATA: BEGIN OF tvbdpa OCCURS 0. "Internal table for items
 INCLUDE STRUCTURE vbdpa.
DATA: END OF tvbdpa.
DATA: BEGIN OF tkomv OCCURS 50.
 INCLUDE STRUCTURE komv.
DATA: END OF tkomv.
DATA: BEGIN OF tkomvd OCCURS 50.
 INCLUDE STRUCTURE komvd.
DATA: END OF tkomvd.
DATA: BEGIN OF tvbdpau OCCURS 5.
 INCLUDE STRUCTURE vbdpau.
DATA: END OF tvbdpau.
DATA: BEGIN OF tkomcon OCCURS 50.
 INCLUDE STRUCTURE conf_out.
DATA: END OF tkomcon.
DATA: BEGIN OF tkomservh OCCURS 1.
 INCLUDE STRUCTURE vedka.
DATA: END OF tkomservh.
DATA: BEGIN OF tkomservp OCCURS 5.
 INCLUDE STRUCTURE vedpa.
DATA: END OF tkomservp.
DATA: BEGIN OF tkomservhn OCCURS 5.
 INCLUDE STRUCTURE vedkn.
DATA: END OF tkomservhn.
DATA: BEGIN OF tkomservpn OCCURS 5.
 INCLUDE STRUCTURE vedpn.
DATA: END OF tkomservpn.
DATA: BEGIN OF tkomser OCCURS 5.
 INCLUDE STRUCTURE riserls.
DATA: END OF tkomser.
DATA: BEGIN OF tkomser_print OCCURS 5.
 INCLUDE STRUCTURE komser.
DATA: END OF tkomser_print.
DATA: BEGIN OF tfpltdr OCCURS 5.
 INCLUDE STRUCTURE fpltdr.
DATA: END OF tfpltdr.
DATA: pr_kappl(01) TYPE c VALUE 'V'. "Application for pricing
DATA: BEGIN OF char_val OCCURS 0,
 atnam LIKE cabn-atnam,
 atwrt LIKE ausp-atwrt,
 END OF char_val.
FORM entry USING return_code us_screen.
CLEAR retcode.
xscreen = us_screen.
PERFORM processing.
IF retcode NE 0.
 return_code = 1.
ELSE.
 return_code = 0.
ENDIF.
ENDFORM. "ENTRY
 FORM PROCESSING *
FORM processing.
PERFORM get_data.
CHECK retcode = 0.
PERFORM form_open USING xscreen vbdka-land1.
CHECK retcode = 0.
PERFORM logo_selection.
PERFORM form_title_print.
CHECK retcode = 0.
PERFORM write_header_info.
PERFORM validity_print.
CHECK retcode = 0.
PERFORM header_data_print.
CHECK retcode = 0.
PERFORM header_serv_print.
CHECK retcode = 0.
PERFORM header_notice_print.
CHECK retcode = 0.
PERFORM header_inter_print.
CHECK retcode = 0.
PERFORM header_text_print.
CHECK retcode = 0.
PERFORM item_print.
CHECK retcode = 0.
PERFORM end_print.
CHECK retcode = 0.
PERFORM form_close.
CHECK retcode = 0.
PERFORM zemail_process.
ENDFORM. "PROCESSING
 S U B R O U T I N E S *
 FORM ALTERNATIVE_ITEM *
 A text is printed, if the item is an alternative item. *
FORM alternative_item.
CHECK vbdpa-grpos CN '0'.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ALTERNATIVE_ITEM'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "ALTERNATIVE_ITEM
 FORM CHECK_REPEAT *
 A text is printed, if it is a repeat print for the document. *
FORM check_repeat.
CLEAR repeat.
SELECT * INTO *nast FROM nast WHERE kappl = nast-kappl
 AND objky = nast-objky
 AND kschl = nast-kschl
 AND spras = nast-spras
 AND parnr = nast-parnr
 AND parvw = nast-parvw
 AND nacha BETWEEN '1' AND '4'.
 CHECK *nast-vstat = '1'.
 repeat = 'X'.
 EXIT.
ENDSELECT.
ENDFORM. "CHECK_REPEAT
 FORM DELIVERY_DATE *
 If the delivery date in the item is different to the header *
 date and there are no scheduled quantities, the delivery date *
 is printed in the item block. *
FORM delivery_date.
IF vbdka-lfdat = space AND
 vbdpa-lfdat NE space AND
 vbdpa-etenr_da = space.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_DELIVERY_DATE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDIF.
ENDFORM. "DELIVERY_DATE
 FORM DIFFERENT_CONSIGNEE *
 If the consignee in the item is different to the header con- *
 signee, it is printed by this routine. *
FORM different_consignee.
CHECK vbdka-name1_we NE vbdpa-name1_we
 OR vbdka-name2_we NE vbdpa-name2_we
 OR vbdka-name3_we NE vbdpa-name3_we
 OR vbdka-name4_we NE vbdpa-name4_we.
CHECK vbdpa-name1_we NE space
 OR vbdpa-name2_we NE space
 OR vbdpa-name3_we NE space
 OR vbdpa-name4_we NE space.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_CONSIGNEE'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "DIFFERENT_CONSIGNEE
 FORM DIFFERENT_REFERENCE_NO *
 If the reference number in the item is different to the header*
 reference number, it is printed by this routine. *
FORM different_reference_no.
CHECK vbdpa-vbeln_vang NE vbdka-vbeln_vang
 OR vbdpa-vbtyp_vang NE vbdka-vbtyp_vang.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_REFERENCE_NO'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "DIFFERENT_REFERENCE_NO
 FORM DIFFERENT_TERMS *
 If the terms in the item are different to the header terms, *
 they are printed by this routine. *
FORM different_terms.
DATA: us_vposn LIKE vedpa-vposn.
DATA: us_text(1) TYPE c. "Flag for Noticetext was printed
IF vbdpa-zterm NE vbdka-zterm AND
 vbdpa-zterm NE space.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_PAYMENT'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDIF.
IF vbdpa-inco1 NE space.
 IF vbdpa-inco1 NE vbdka-inco1 OR
 vbdpa-inco2 NE vbdka-inco2.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_DELIVERY'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ENDIF.
ENDIF.
Print different validity-data for the position
READ TABLE tkomservp WITH KEY vbdpa-posnr.
IF sy-subrc EQ 0.
 vedpa = tkomservp.
 IF vedpa-vbegdat NE space AND
 vedpa-venddat NE space AND
 NOT vedpa-vbegdat IS INITIAL AND
 NOT vedpa-venddat IS INITIAL.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_SERV1'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ELSEIF vedpa-vbegdat NE space AND
 NOT vedpa-vbegdat IS INITIAL.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_SERV2'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_SERV3'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ENDIF.
ENDIF.
Notice-rules for the positions.
MOVE vbdpa-posnr TO us_vposn.
CLEAR us_text.
LOOP AT tkomservpn WHERE vposn = us_vposn.
 vedpn = tkomservpn.
 IF us_text IS INITIAL.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_NOTTXT'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 us_text = charx.
 ENDIF.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_TERMS_OF_NOTICE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDLOOP.
IF NOT us_text IS INITIAL.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'EMPTY_LINE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDIF.
ENDFORM. "DIFFERENT_TERMS
 FORM END_PRINT *
FORM end_print.
PERFORM get_header_prices.
CALL FUNCTION 'CONTROL_FORM'
 EXPORTING
 command = 'PROTECT'.
PERFORM header_price_print.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'END_VALUES'.
CALL FUNCTION 'CONTROL_FORM'
 EXPORTING
 command = 'ENDPROTECT'.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'SUPPLEMENT_TEXT'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "END_PRINT
 FORM FORM_CLOSE *
 End of printing the form *
FORM form_close.
CALL FUNCTION 'CLOSE_FORM'
 EXCEPTIONS
 OTHERS = 1.
CALL FUNCTION 'CLOSE_FORM'
IMPORTING
RESULT =
RDI_RESULT =
 TABLES
 otfdata = t_otfdata
EXCEPTIONS
UNOPENED = 1
BAD_PAGEFORMAT_FOR_PRINT = 2
SEND_ERROR = 3
SPOOL_ERROR = 4
CODEPAGE = 5
 OTHERS = 1.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
IF sy-subrc NE 0.
 PERFORM protocol_update.
 retcode = 1.
ENDIF.
SET COUNTRY space.
ENDFORM. "FORM_CLOSE
 FORM FORM_OPEN *
 Start of printing the form *
--> US_SCREEN Output on screen *
 ' ' = printer *
 'X' = screen *
--> US_COUNTRY County for telecommunication and SET COUNTRY *
FORM form_open USING us_screen us_country.
INCLUDE zrep_rvadopfo.
INCLUDE yzrvadopfo.
INCLUDE RVADOPFO.
ENDFORM. "FORM_OPEN
 FORM FORM_TITLE_PRINT *
 Printing of the form title depending of the field VBTYP *
FORM form_title_print.
CASE vbdka-vbtyp.
 WHEN 'A'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_A'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'B'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_B'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'C'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_C'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'E'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_E'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'F'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_F'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'G'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_F'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'H'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_H'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'K'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_K'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN 'L'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_L'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 WHEN OTHERS.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TITLE_OTHERS'
 window = 'TITLE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDCASE.
IF repeat NE space.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'REPEAT'
 window = 'REPEAT'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDIF.
ENDFORM. "FORM_TITLE_PRINT
 FORM GET_DATA *
 General provision of data for the form *
FORM get_data.
DATA: us_veda_vbeln LIKE veda-vbeln.
DATA: us_veda_posnr_low LIKE veda-vposn.
CALL FUNCTION 'RV_PRICE_PRINT_REFRESH'
 TABLES
 tkomv = tkomv.
CLEAR komk.
CLEAR komp.
vbco3-mandt = sy-mandt.
vbco3-spras = nast-spras.
vbco3-vbeln = nast-objky.
vbco3-kunde = nast-parnr.
vbco3-parvw = nast-parvw.
CALL FUNCTION 'RV_DOCUMENT_PRINT_VIEW'
 EXPORTING
 comwa = vbco3
 IMPORTING
 kopf = vbdka
 TABLES
 pos = tvbdpa.
Fetch servicecontract-data and notice-data for head and position.
us_veda_vbeln = vbdka-vbeln.
us_veda_posnr_low = posnr_low.
CALL FUNCTION 'SD_VEDA_GET_PRINT_DATA'
 EXPORTING
 i_document_number = us_veda_vbeln
 i_language = sy-langu
 i_posnr_low = us_veda_posnr_low
 TABLES
 print_data_pos = tkomservp
 print_data_head = tkomservh
 print_notice_pos = tkomservpn
 print_notice_head = tkomservhn.
PERFORM get_controll_data.
PERFORM sender.
PERFORM check_repeat.
PERFORM tvbdpau_create.
ENDFORM. "GET_DATA
 FORM GET_ITEM_BILLING_SCHEDULES *
 In this routine the billing schedules are fetched from the *
 database. *
FORM get_item_billing_schedules.
REFRESH tfpltdr.
CHECK NOT vbdpa-fplnr IS INITIAL.
CALL FUNCTION 'BILLING_SCHED_PRINTVIEW_READ'
 EXPORTING
 i_fplnr = vbdpa-fplnr
 i_language = nast-spras
 TABLES
 zfpltdr = tfpltdr.
ENDFORM. "GET_ITEM_BILLING_SCHEDULES
*& Form ITEM_BILLING_SCHEDULES_PRINT
 This routine prints the billing shedules of a salesdocument *
 position. *
FORM item_billing_schedules_print.
DATA: first_line(1) TYPE c.
first_line = charx.
LOOP AT tfpltdr.
 fpltdr = tfpltdr.
Output of the following printlines
 IF NOT fpltdr-perio IS INITIAL.
 periodische Fakturen
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_BILLING_SCHEDULE_PERIODIC'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 bei periodischen nur eine Zeile
 EXIT.
 ELSEIF fpltdr-fareg CA '14'.
 prozentuale Teilfakturierung
 IF NOT first_line IS INITIAL.
 CLEAR first_line.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_BILLING_SCHEDULE_PERCENT_HEADER'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_BILLING_SCHEDULE_PERCENT'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ENDIF.
 ELSEIF fpltdr-fareg CA '235'.
 wertmäßige Teilfakturierung
 IF NOT first_line IS INITIAL.
 CLEAR first_line.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_BILLING_SCHEDULE_VALUE_HEADER'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_BILLING_SCHEDULE_VALUE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ENDIF.
 ELSEIF fpltdr-fareg CA '3'.
 Schlußrechnung
 ENDIF.
ENDLOOP.
ENDFORM. "ITEM_BILLING_SCHEDULES_PRINT
*eject
 FORM GET_ITEM_CHARACTERISTICS *
 In this routine the configuration data item is fetched from *
 the database. *
FORM get_item_characteristics.
REFRESH tkomcon.
CHECK NOT vbdpa-cuobj IS INITIAL.
CALL FUNCTION 'CUD0_GET_CONFIGURATION' "#EC EXISTS
 EXPORTING
 instance = vbdpa-cuobj
 language = nast-spras
 TABLES
 configuration = tkomcon
 EXCEPTIONS
 OTHERS = 4.
ENDFORM. "GET_ITEM_CHARACTERISTICS
 FORM GET_ITEM_PRICES *
 In this routine the price data for the item is fetched from *
 the database. *
FORM get_item_prices.
CLEAR: komp,
 tkomv.
IF komk-knumv NE vbdka-knumv.
 CLEAR komk.
 komk-mandt = sy-mandt.
 komk-kalsm = vbdka-kalsm.
 komk-kappl = pr_kappl.
 komk-waerk = vbdka-waerk.
 komk-knumv = vbdka-knumv.
 komk-vbtyp = vbdka-vbtyp.
ENDIF.
komp-kposn = vbdpa-posnr.
CALL FUNCTION 'RV_PRICE_PRINT_ITEM'
 EXPORTING
 comm_head_i = komk
 comm_item_i = komp
 language = nast-spras
 IMPORTING
 comm_head_e = komk
 comm_item_e = komp
 TABLES
 tkomv = tkomv
 tkomvd = tkomvd.
ENDFORM. "GET_ITEM_PRICES
 FORM GET_HEADER_PRICES *
 In this routine the price data for the header is fetched from *
 the database. *
FORM get_header_prices.
CALL FUNCTION 'RV_PRICE_PRINT_HEAD'
 EXPORTING
 comm_head_i = komk
 language = nast-spras
 IMPORTING
 comm_head_e = komk
 TABLES
 tkomv = tkomv
 tkomvd = tkomvd.
ENDFORM. "GET_HEADER_PRICES
*& Form HEADER_DATA_PRINT
 Printing of header data like terms, weights .... *
FORM header_data_print.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'HEADER_DATA'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. " HEADER_DATA_PRINT
 FORM HEADER_PRICE_PRINT *
 Printout of the header prices *
FORM header_price_print.
LOOP AT tkomvd.
 AT FIRST.
 IF komk-supos NE 0.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_SUM'.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'UNDER_LINE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ENDIF.
 ENDAT.
 komvd = tkomvd.
 IF komvd-koaid = 'D'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'TAX_LINE'.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'SUM_LINE'.
 ENDIF.
ENDLOOP.
DESCRIBE TABLE tkomvd LINES sy-tfill.
IF sy-tfill = 0.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'UNDER_LINE'
 EXCEPTIONS
 element = 1
 window = 2.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
ENDIF.
ENDFORM. "HEADER_PRICE_PRINT
 FORM HEADER_TEXT_PRINT *
 Printout of the headertexts *
FORM header_text_print.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'HEADER_TEXT'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "HEADER_TEXT_PRINT
 FORM ITEM_CHARACERISTICS_PRINT *
 Printout of the item characteristics -> configuration *
FORM item_characteristics_print.
LOOP AT tkomcon.
 conf_out = tkomcon.
 IF sy-tabix = 1.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_LINE_CONFIGURATION_HEADER'
 EXCEPTIONS
 OTHERS = 1.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_LINE_CONFIGURATION'
 EXCEPTIONS
 OTHERS = 1.
 IF sy-subrc NE 0.
 PERFORM protocol_update.
 ENDIF.
 ENDIF.
ENDLOOP.
ENDFORM. "ITEM_CHARACTERISTICS_PRINT
 FORM ITEM_DELIVERY_CONFIRMATION *
 If the delivery date is not confirmed, a text is printed *
FORM item_delivery_confirmation.
CHECK vbdpa-lfdat = space.
CHECK vbdpa-kwmeng NE 0.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_DELIVERY_CONFIRMATION'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "ITEM_DELIVERY_CONFIRMATION
 FORM ITEM_PRICE_PRINT *
 Printout of the item prices *
FORM item_price_print.
LOOP AT tkomvd.
 komvd = tkomvd.
 IF sy-tabix = 1.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_LINE_PRICE_QUANTITY'.
 ELSE.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_LINE_PRICE_TEXT'.
 ENDIF.
ENDLOOP.
ENDFORM. "ITEM_PRICE_PRINT
 FORM ITEM_PRINT *
 Printout of the items *
FORM item_print.
DATA: da_subrc LIKE sy-subrc,
 da_dragr LIKE tvag-dragr.
CALL FUNCTION 'WRITE_FORM' "First header
 EXPORTING element = 'ITEM_HEADER'
 EXCEPTIONS OTHERS = 1.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
CALL FUNCTION 'WRITE_FORM' "Activate header
 EXPORTING element = 'ITEM_HEADER'
 type = 'TOP'
 EXCEPTIONS OTHERS = 1.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
LOOP AT tvbdpa.
 vbdpa = tvbdpa.
TVAG lesen um festzustellen ob abgesagte Positionen gedruckt werden
sollen
 PERFORM tvag_select(sapmv45a) USING vbdpa-abgru
 da_dragr
 space
 da_subrc.
 IF da_dragr EQ space. "Print rejected item?
 IF vbdpa-posnr_neu NE space. "Item
 PERFORM get_item_serials.
 PERFORM get_item_characteristics.
 PERFORM get_item_billing_schedules.
 PERFORM get_item_prices.
 CALL FUNCTION 'CONTROL_FORM'
 EXPORTING
 command = 'ENDPROTECT'.
 CALL FUNCTION 'CONTROL_FORM'
 EXPORTING
 command = 'PROTECT'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_LINE'.
 PERFORM item_rejected.
 PERFORM item_price_print.
 CALL FUNCTION 'CONTROL_FORM'
 EXPORTING
 command = 'ENDPROTECT'.
 PERFORM item_text_print.
 PERFORM item_serials_print.
 PERFORM item_characteristics_print.
 PERFORM alternative_item.
 PERFORM delivery_date.
 PERFORM item_delivery_confirmation.
 PERFORM item_billing_schedules_print.
 PERFORM different_reference_no.
 PERFORM different_terms.
 PERFORM different_consignee.
 PERFORM schedule_header.
 PERFORM main_item.
 ELSE.
 PERFORM schedule_print.
 ENDIF.
 ENDIF.
ENDLOOP.
CALL FUNCTION 'WRITE_FORM' "Deactivate Header
 EXPORTING element = 'ITEM_HEADER'
 function = 'DELETE'
 type = 'TOP'
 EXCEPTIONS OTHERS = 1.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "ITEM_PRINT
 FORM ITEM_REJECTED *
 A text is printed, if the item is rejected *
FORM item_rejected.
CHECK NOT vbdpa-abgru IS INITIAL.
CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = 'ITEM_REJECTED'
 EXCEPTIONS
 element = 1
 window = 2.
IF sy-subrc NE 0.
 PERFORM protocol_update.
ENDIF.
ENDFORM. "ITEM_REJECTED
 FORM MAIN_ITEM *
 A text is printed, if the item is a main item *

Bursting program errors and last info on log file is: Start bursting proces

Hi,
I am new to bursting concepts. I created bursting file for the invoice and invoice program runs and calls the burst program and burst program errors.
Can you help? I have set the temp directory as /var/tmp
XML/BI Publisher Version : 5.6.3
Request ID: 16757790
All Parameters: ReportRequestID=16757789:DebugFlag=Y
Report Req ID: 16757789
Debug Flag: Y
Updating request description
Updated description
Retrieving XML request information
Node Name:ODBTST
Preparing parameters
null output =/u01/oracle/devcomn/admin/out/DEV_odbtst/o16757790.out
inputfilename =/u01/oracle/devcomn/admin/out/DEV_odbtst/o16757789.out
Data XML File:/u01/oracle/devcomn/admin/out/DEV_odbtst/o16757789.out
Set Bursting parameters..
Temp. Directory:/var/tmp
[102110_093551746][][STATEMENT] Oracle XML Parser version ::: Oracle XDK Java 9.0.4.0.0 Production
[102110_093551752][][STATEMENT] setOAProperties called..
Bursting propertes.....
{burstng-source=EBS, font.3 of 9 Barcode.normal.normal=truetype./usr/local/oracle/fonts/3OF9.TTF, system-temp-dir=/u01/oracle/devcomn/temp, user-variable:cp:parent_request_id=16757789, user-variable:cp:application_short_name=XDO, user-variable:cp:request_id=16757790, user-variable.OA_MEDIA=http://oapdev.pdcorp.com:8001/OA_MEDIA, font.GnuMICR.normal.normal=truetype./usr/local/oracle/fonts/GnuMICR.ttf, user-variable:cp:org_id=81, user-variable:cp:DebugFlag=Y, user-variable:cp:responsibility=50290, user-variable:cp:user=NATHANV, user-variable:cp:reportdescription=PD Invoice Burst, user-variable:cp:language=en, user-variable:cp:ReportRequestID=16757789, font.Free 3 of 9 Extended.normal.normal=truetype./usr/local/oracle/fonts/FRE3OF9X.TTF, user-variable:cp:locale=en-US, user-variable:cp:territory=US}
Start bursting process..
Start of log messages from FND_FILE
End of log messages from FND_FILE
---------------------------------------------------------------------------

i have few BG jobs running at backend, but i dont think that could be a problem. I have these jobs running
ESH_IX_PROCESS_CP_20100621051308
EU_PUT
EU_REORG
RPTMC_CREATE_CHANGEPOINT_AUTH
i cancelled the last one and first job is for trex indexing for changed object i SAP hR master data. middle two i dont know the purpose.
do you think these could be problem?
Mani

I have Nuance PDF Converter 7.2 and after I scan a document and want to email it, I get an error message that says the scan cannot be attached to an email.

I want to be clear: I can scan the document with Nuance PDF Converter 7.2, but after the scan, I want to email the scan to someone.
When I click on the word "email" on the left side of the Nuance screen, I get a failure message. For a couple of years this process worked without a problem. I was told by Nuance Support that the problem was in the email software. Is there something on a drop
down menu that I can click on the resolve the problem? Thanks.

The problem could be that your computer doesn't have Thunderbird identified as the default e-mail program, so the first step is:
Thunderbird: Menu bar: Tools: Options: Advanced Tab: System Integration:
Press the "Check Now..." button.
In the resulting "System Integration" window, make sure that "E-Mail" is check-marked, and "Always perform this check when starting Thunderbird" is checked. Then click the "Set as Default" button.
If you have Windows 8 or 8.1, then there is also another step: 
Windows Control Panel: Programs: Default Programs: Set your default programs. 
Find "Thunderbird" on the left side, and click to select it. 
On the right side, click "Set this program as default". 
Then reboot the computer. 
If the problem still exists, then do a clean install of Thunderbird:
Certain Thunderbird problems can be solved by performing a ''Clean reinstall''. This means you remove Thunderbird's program files and then reinstall Thunderbird. Please follow these steps:
#Download the latest version of Thunderbird from http://www.mozilla.org/en-US/thunderbird/ and save the setup file to your computer.
#After the download is complete, close all Thunderbird windows (Click Exit/Quit from the menu button on the right).
#Delete the Thunderbird installation folder, which is located in one of these locations, by default:
#*'''Windows:'''
#** C:\Program Files\Mozilla Thunderbird\
#** C:\Program Files (x86)\Mozilla Thunderbird\
#*'''Mac:''' Delete Thunderbird from the Applications folder.
#*'''Linux:''' If you installed Thunderbird with the distro-based package manager, you should use the same way to uninstall it - see [[Installing Thunderbird on Linux]]. If you downloaded and installed the binary package from the [http://www.mozilla.org/en-US/thunderbird/ Thunderbird Download Page], simply remove the folder ''thunderbird'' in your home directory.
#Now, go ahead and reinstall Thunderbird:
##Double-click the downloaded installation file and go through the steps of the installation wizard.
##Once the wizard is finished, choose to open Thunderbird after clicking the Finish button.
WARNING: Do not run Thunderbird's uninstaller or use a third party remover as part of this process, because that could permanently delete your Thunderbird data, including but not limited to, extensions, emails, personal settings and saved passwords. These cannot be recovered unless they have been backed up to an external device!
Please report back to see if this helped you!

Logo not printing properly in Invoice converted to PDF and emailed

Hello,
I am having a problem with a programming issue and have searched lots of forums but have found no solutions. We are on 4.7 and are not likely to upgrade any time soon. Therefore, I don't think any of the newer solutions are gonna work for me. I believe that I'm stuck using a couple of function modules to get t he job done. I am attempting to modify our Invoice Print program (uses SAPscript, not SmartForms) to have the output converted into a PDF file and then attached to an email that is then sent to the customer. Everything is working fine except for the company logo. It has been uploaded via SE78. It is a 24-bit bitmap file. I have played around with the DPI to have it appear correctly on the form. I added a FM GUI_DOWNLOAD step to verify that it is saved to my hard drive correctly. The PDF file saved t o my hard drive appears normally in Adobe Acrobat and Adobe Reader. So the problem occurs sometime after that. I have a routine wherein I convert is from 132 to 255 bytes. I then use FM SO_DOCUMENT_SEND_API1 to send it. When I swap the customer's email address to my own personal external emal address, the resultant email has an attached PDF file but the company logo is garbage. The top portion of the logo looks good and then at some point in the lower portion is appears as squiggly lines. This is not acceptable, of course. I have included the relevent code below:
DATA: ITAB_OTFDATA TYPE TABLE OF ITCOO WITH HEADER LINE.
DATA: ITAB_PDFDATA TYPE TABLE OF TLINE WITH HEADER LINE.
DATA: ITAB_DOCTAB_ARCHIVE TYPE STANDARD TABLE OF DOCS.
DATA: ITAB_OBJPACK LIKE SOPCKLSTI1 OCCURS 0 WITH HEADER LINE.
DATA: ITAB_RECORD LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE.
DATA: ITAB_OBJTXT LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE.
DATA: ITAB_OBJBIN LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE.
DATA: ITAB_RECLIST LIKE SOMLRECI1 OCCURS 0 WITH HEADER LINE.
DATA: BINFILESIZE TYPE I,
 G_LINES_TXT TYPE I,
 G_LINES_BIN TYPE I,
 DOCDATA TYPE SODOCCHGI1,
 WA_RESULT TYPE ITCPP,
 WA_BUFFER TYPE STRING,
 WA_OBJHEAD TYPE SOLI_TAB,
 G_INVOICE(10) TYPE C.
CLEAR: BINFILESIZE.
CALL FUNCTION 'CONVERT_OTF_2_PDF'
 EXPORTING
 USE_OTF_MC_CMD = 'X'
* ARCHIVE_INDEX =
 IMPORTING
 BIN_FILESIZE = BINFILESIZE
 TABLES
 OTF = ITAB_OTFDATA
 DOCTAB_ARCHIVE = ITAB_DOCTAB_ARCHIVE
 LINES = ITAB_PDFDATA
 EXCEPTIONS
 ERR_CONV_NOT_POSSIBLE = 1
 ERR_OTF_MC_NOENDMARKER = 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 'GUI_DOWNLOAD'
 EXPORTING
 filename = 'C:\TEMP\TEST.PDF'
 FILETYPE = 'BIN'
 tables
 data_tab = ITAB_PDFDATA.
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 PDF from 132 to 255
LOOP AT ITAB_PDFDATA.
* Replacing space by ~
 TRANSLATE ITAB_PDFDATA USING ' ~'.
 CONCATENATE WA_BUFFER ITAB_PDFDATA INTO WA_BUFFER.
ENDLOOP.
* Replacing ~ by space
TRANSLATE WA_BUFFER USING '~ '.
DO.
 ITAB_RECORD = WA_BUFFER.
* Appending 155 characters as a record
 APPEND ITAB_RECORD.
 SHIFT WA_BUFFER LEFT BY 255 PLACES.
 IF WA_BUFFER IS INITIAL.
 EXIT.
 ENDIF.
ENDDO.
REFRESH: ITAB_RECLIST,
 ITAB_OBJTXT,
 ITAB_OBJBIN,
 ITAB_OBJPACK.
CLEAR: WA_OBJHEAD.
ITAB_OBJBIN[] = ITAB_RECORD[].
G_INVOICE = VBRK-VBELN.
SHIFT G_INVOICE LEFT DELETING LEADING '0'.
*-- Create Message Body Title and Document
CLEAR: ITAB_OBJTXT-LINE.
CONCATENATE 'Invoice'
 G_INVOICE
 'for Purchase Order'
 PO_NUM
 'is attached to this email.'
 INTO ITAB_OBJTXT-LINE SEPARATED BY SPACE.
APPEND ITAB_OBJTXT.
CLEAR: ITAB_OBJTXT-LINE.
APPEND ITAB_OBJTXT.
CLEAR: ITAB_OBJTXT-LINE.
CONCATENATE 'Please see attached invoice.'
 'Thank you for your business!'
 INTO ITAB_OBJTXT-LINE SEPARATED BY SPACE.
APPEND ITAB_OBJTXT.
DESCRIBE TABLE ITAB_OBJTXT LINES G_LINES_TXT.
READ TABLE ITAB_OBJTXT INDEX G_LINES_TXT.
CONCATENATE 'Invoice' G_INVOICE
 INTO DOCDATA-OBJ_NAME SEPARATED BY SPACE.
DOCDATA-EXPIRY_DAT = SY-DATUM + 10.
CONCATENATE 'Invoice for P.O.'
 PO_NUM
 VBDKR-NAME1_WE
 INTO DOCDATA-OBJ_DESCR SEPARATED BY SPACE.
DOCDATA-SENSITIVTY = 'F'.
DOCDATA-DOC_SIZE = ( G_LINES_TXT - 1 ) * 255 + STRLEN( ITAB_OBJTXT ).
*-- Main Text
CLEAR: ITAB_OBJPACK-TRANSF_BIN.
ITAB_OBJPACK-HEAD_START = 1.
ITAB_OBJPACK-HEAD_NUM = 0.
ITAB_OBJPACK-BODY_START = 1.
ITAB_OBJPACK-BODY_NUM = G_LINES_TXT.
ITAB_OBJPACK-DOC_TYPE = 'RAW'.
APPEND ITAB_OBJPACK.
*-- Attachment (pdf-Attachment)
ITAB_OBJPACK-TRANSF_BIN = 'X'.
ITAB_OBJPACK-HEAD_START = 1.
ITAB_OBJPACK-HEAD_NUM = 0.
ITAB_OBJPACK-BODY_START = 1.
DESCRIBE TABLE ITAB_OBJBIN LINES G_LINES_BIN.
READ TABLE ITAB_OBJBIN INDEX G_LINES_BIN.
ITAB_OBJPACK-DOC_SIZE = ( G_LINES_BIN - 1 ) * 255 + STRLEN( ITAB_OBJBIN ).
ITAB_OBJPACK-BODY_NUM = G_LINES_BIN.
ITAB_OBJPACK-DOC_TYPE = 'PDF'.
CONCATENATE 'Invoice' G_INVOICE
 INTO ITAB_OBJPACK-OBJ_NAME SEPARATED BY SPACE.
CONCATENATE G_INVOICE '.pdf'
 INTO ITAB_OBJPACK-OBJ_DESCR.
APPEND ITAB_OBJPACK.
*-- Create Table of email recipients
CLEAR ITAB_RECLIST.
ITAB_RECLIST-RECEIVER = KNB1-INTAD.
ITAB_RECLIST-REC_TYPE = 'U'.
ITAB_RECLIST-COM_TYPE = 'INT'.
APPEND ITAB_RECLIST.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
 EXPORTING
 DOCUMENT_DATA = DOCDATA
 PUT_IN_OUTBOX = ' '
 SENDER_ADDRESS = 'arcredit @ companyname.com' <-- modified to comply with forum rules
 SENDER_ADDRESS_TYPE = 'SMTP'
 COMMIT_WORK = 'X'
* IMPORTING
* SENT_TO_ALL =
* NEW_OBJECT_ID =
* SENDER_ID =
 TABLES
 PACKING_LIST = ITAB_OBJPACK
 OBJECT_HEADER = WA_OBJHEAD
 CONTENTS_BIN = ITAB_OBJBIN
 CONTENTS_TXT = ITAB_OBJTXT
* CONTENTS_HEX =
* OBJECT_PARA =
* OBJECT_PARB =
 RECEIVERS = ITAB_RECLIST
 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.
*-- Send the email immediately
WAIT UP TO 3 SECONDS.
SUBMIT RSCONN01 WITH MODE = 'INT'
 WITH OUTPUT = 'X'
 AND RETURN.
Thanks in advance for any and all advice.
Best Regards,
Nik von Ruden
Edited by: Nik Von Ruden on Nov 3, 2009 6:48 PM
Edited by: Nik Von Ruden on Nov 3, 2009 6:49 PM

Hi Friend ,
I hav gone through your code ... I have one Question why you are changing from 132 to 255.inside your program
if there is a purpose then , please can you change your company logo Image size accordingly and uploaded it into SAP mime repository using se78.then your program let it convert from 132 to 255. definely you will see some change's in the Logo,then keep on adjusting you can acheive you result.
sometime the Image size also plays major role ,which we need to modify the sizes of image.
I am giving you an link which is already there but still from myside , just compare the code .
Link: [http://www.scribd.com/doc/454814/SAPSCRIPT-to-PDF]
Regards,

I had previously purchased the programs "Pages" and "Numbers" and they are on my iPhone and iPad I was told that the programs would automatically copy a version of itself for the iMac to be running them but I don't see it installed. How can I install them

I had previously purchased the programs "Pages" and "Numbers" and they are on my iPhone and iPad I was told that the programs would automatically copy a version of itself for the iMac to be running them but I don't see it installed. How can I install for free? I see that I could go to the apple store and purchase them again but I belibve that since I had already purchased them; I would get a free copy for my Imac. Do I got something confused here? Please help.

Whoever told you that was misinformed or lying. Those applications are sold separately for the iOS platform and the Mac platform.
Go to the Mac App Store to purchase Pages and Numbers for your Mac. They're $20 each. If you are running an older version of Mac OS X that can't use the Mac App Store, you can purchase install media from Apple.

Converting Programs- Free and Reliable

Similar Messages

Maybe you are looking for