通過 Function Module 發(fā)送郵件，可發(fā)送附件。
所屬 Function Group : SOI1
所屬 Package : SO

*@郵件相關(guān)變量
DATA:rec_l_docdata?? TYPE sodocchgi1,
???? l_sender_adr??? TYPE soextreci1-receiver,
???? tab_l_packlist? TYPE STANDARD TABLE OF sopcklsti1,
???? tab_l_contents? TYPE STANDARD TABLE OF solisti1,
???? tab_l_receivers TYPE STANDARD TABLE OF somlreci1.

DATA:l_mail_title??? TYPE sodocchgi1-obj_descr,
?????? rec_l_packlist? TYPE sopcklsti1,
?????? rec_l_contents? TYPE solisti1,
?????? rec_l_receivers TYPE somlreci1.

* Populate the subject/generic message attributes
rec_l_docdata-obj_langu = sy-langu.
rec_l_docdata-obj_name? = ‘SAPRPT’.
rec_l_docdata-obj_descr = l_mail_title .
rec_l_docdata-sensitivty = ‘F’.
rec_l_docdata-skip_scren = ’1′.

* Describe the body of the message
rec_l_packlist-transf_bin = space.
rec_l_packlist-head_start = 1.
rec_l_packlist-head_num = 0.
rec_l_packlist-body_start = 1.
DESCRIBE TABLE tab_l_contents LINES rec_l_packlist-body_num.
rec_l_packlist-doc_type = ‘RAW’.
APPEND rec_l_packlist TO tab_l_packlist.

*郵件內(nèi)容
APPEND rec_l_contents TO tab_l_contents.

*如何修改發(fā)送人郵箱?
rec_l_receivers-receiver = ‘your@domain’.
rec_l_receivers-rec_type = ‘U’.
rec_l_receivers-com_type = ‘INT’.
rec_l_receivers-notif_del = ‘X’.
rec_l_receivers-notif_ndel = ‘X’.
APPEND rec_l_receivers TO tab_l_receivers.

CALL FUNCTION ‘SO_DOCUMENT_SEND_API1′
? EXPORTING
??? document_data??????????????????? = rec_l_docdata
*?? PUT_IN_OUTBOX??????????????????? = ‘ ‘
?? sender_address?????????????????? = sy-uname
?? sender_address_type????????????? = ‘ ‘
?? commit_work????????????????????? = ‘X’
* IMPORTING
*?? SENT_TO_ALL????????????????????? =
*?? NEW_OBJECT_ID??????????????????? =
*?? SENDER_ID??????????????????????? =
? TABLES
??? packing_list???????????????????? = tab_l_packlist
*?? OBJECT_HEADER??????????????????? =
*?? CONTENTS_BIN???????????????????? =
?? contents_txt???????????????????? = tab_l_contents
*?? CONTENTS_HEX???????????????????? =
*?? OBJECT_PARA????????????????????? =
*?? OBJECT_PARB????????????????????? =
??? receivers??????????????????????? = tab_l_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.

————
注意：
1、發(fā)件人必須在SU3里配置好郵箱。
2、收件人郵箱域名必須由basis在系統(tǒng)中配置。具體方法不清楚。

?

與50位技術(shù)專家面對(duì)面20年技術(shù)見證，附贈(zèng)技術(shù)全景圖

總結(jié)

以上是生活随笔為你收集整理的FM之SO_DOCUMENT_SEND_API1的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。