Interested to Buy Any Domain ? << Click Here >> for more details...
How you will send mail from one SAP system to other SAP
system?
- 1 Answers
- 11002 Views
- Keane India Ltd, I also Faced
- E-Mail Answers
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
What is the process to enhance the Infotype
What is an internal table?
What are the ways you can do the tuning?
Does every abap/4 have a modular structure? : abap modularization
What is native sql?
Different between Interface and Abstract classes?
How many structures can be created in a Ztable ?
PROGRAM TO CREATE INQUIRY IN SD USING BAPI 'BAPI_INQUIRY_CREATEFROMDATA'
What is a view in sap? : abap data dictionary
What are the difference between call screen and leave screen?
What are the parameters in bdc_insert? : abap bdc
Explain some essential objects in abap dictionary?
in bdcsome times we get the ok code for "enter" wrongly instead of '/00'.what is the reason.how we can exceed this problem.
Name some data dictionary objects?
What is the maximum number of structures that can be included in a table or structure
