How you will send mail from one SAP system to other SAP
system?

Answer Posted / pramod

Please go through the sample code to Send mail

*********
*Data of an object which can be changed
DATA : doc_chng LIKE sodocchgi1.

*SAPoffice: Single List with Column Length 255
DATA : objtxt LIKE solisti1 OCCURS 10 WITH HEADER LINE,
objbin LIKE solisti1 OCCURS 10 WITH HEADER LINE.

*SAPoffice: Description of Imported Object Components
DATA : objpack LIKE sopcklsti1 OCCURS 2 WITH HEADER LINE.

*SAPoffice: Structure of the API Recipient List
DATA : reclist LIKE somlreci1 OCCURS 5 WITH HEADER LINE.


FORM errors_send_mail .
* Creation of the document to be sent
doc_chng-obj_name = 'Log report For Historical Balance
Conversation'
.

CONCATENATE 'Log for ' sy-repid INTO doc_chng-obj_descr
SEPARATED BY space.


LOOP AT it_error. "HERE TYPE = 'A' OR TYPE = 'E'.
objtxt = it_error-message.
APPEND objtxt.
CLEAR: objtxt.
ENDLOOP.

LOOP AT it_message.
AT FIRST .
WRITE : / 'List of documents created :'.
SKIP 1.

ENDAT.
WRITE : / it_message-message.
objtxt = it_message-message.
APPEND objtxt.
CLEAR: objtxt.

ENDLOOP.

* Creation of the entry for the compressed document
CLEAR objpack-transf_bin.
objpack-head_start = 1.
objpack-head_num = 1.
objpack-body_start = 1.
objpack-body_num = 9.
objpack-doc_type = 'RAW'.
objpack-obj_name = 'DATA'.
objpack-doc_size = 10 * 255.
objpack-obj_langu = 'EN'.
APPEND objpack.
CLEAR objpack.

CLEAR objpack-transf_bin.
objpack-head_start = 0.
objpack-head_num = 0.
objpack-body_start = 10.
objpack-body_num = tab_lines.
objpack-doc_type = 'DAT'.
objpack-obj_name = 'DATA'.
objpack-doc_size = tab_lines * 255.
objpack-obj_langu = 'EN'.
APPEND objpack.
CLEAR objpack.

* Completing the recipient list
* RECLIST-RECEIVER = 'Michael.mccullough@ge.com'.
reclist-receiver = 'Tiffany.Boyle@ge.com'.
reclist-rec_type = 'U'.
APPEND reclist.
CLEAR reclist.
reclist-receiver = 'Kalpana.tyagi2@ge.com'.
reclist-rec_type = 'U'.
APPEND reclist.
CLEAR reclist.

* Sending the document
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
EXPORTING
document_data = doc_chng
put_in_outbox = 'X'
commit_work = 'X'
TABLES
packing_list = objpack
contents_txt = objtxt
contents_bin = objbin
receivers = reclist
EXCEPTIONS
too_many_receivers = 1
document_not_sent = 2
operation_no_authorization = 4
OTHERS = 99.
IF sy-subrc = 0.
SUBMIT rsconn01 WITH mode = 'INT' AND RETURN.
ENDIF.

Is This Answer Correct ?    4 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What are matchcodes?

557


Advantages and disadvantages of different types of bdc's?

579


What is the logo in sap script?

577


HOW CAN YOU USE A PAGE COUNT IN CALLING A PAGE IN SMARTFORM?

1638


What is tcode se16. For what is it used. Explain briefly?

548






Explain what are the events used for logical database?

534


write a program for creation of customer quotation using BAPI 'BAPI_QUOTATION_CREATEFROMDATA'.

2779


Explain what is a logical database?

602


What is a size category? : abap data dictionary

664


Why do we need to code a loop statement in both the pbo and pai events for each table in the screen?

602


What are the functional areas? User groups?

606


How to split one Invoice into Multiple ( Step by Step)?

1707


What is runtime analysis?

605


What is meant by slab? How is indian slab and us slab? : sap abap hr

560


hi..i hav developed an interactive report in which alv list display in basic list and 1st secondary list in alv grid display.I want to get summation(total) of the columns in the secondary list.I hav used 'do_sum' but i couldnt get.is there any other way to get summation(total) in secondary list which is an alv grid display

2560