sy-uname написал(а):
CTyDeHT написал(а):
Всем здравствуйте!
Столкнулся с пробелмой автоматической отправки по сап-почте
Использую ФМ SO_NEW_DOCUMENT_ATT_SEND_API1, но почта отправляется только мне, другим пользователям и на внешний е-майл не отправляется. Может кто подскажет, может там параметры какие-то для этого обязательные нужны или еще что.
Может и нужны, а может и нет. Кто-ж его знает.
"Подробности! -- сказал Римский, стукнув пресс-папье по столу."Что значит "не отправляется"? Падает в дамп? Возвращает код ошибки? Завершается нормально?
Привидите фрагмент вашего кода, так как через форум не видно что, как и где Вы заполнини, какие параметры задействовали.
По поводу отправки на внешнюю почту - а должно отправляться? все необходимые для этого настройки сделаны?
Завершается нормально, помещается в отправленные, но дальше никуда не уходит.
REPORT ZESK_OTPRAVKA_SAPMAIL .
data: gt_kont type TABLE OF ZESK_UCHET,
gs_kont type ZESK_UCHET.
data: gt_konter TYPE TABLE OF ZESK_UCHET,
gs_konter type ZESK_UCHET.
data: DOCUMENT_DATA LIKE SODOCCHGI1.
data: RECEIVERS LIKE SOMLRECI1 OCCURS 1 WITH HEADER LINE.
*Data: tab_lines type i.
data: DOC_HEADER LIKE SOLISTI1 OCCURS 1 WITH HEADER LINE.
data: DOC_CONTENT like SOLISTI1 occurs 1 with header line.
*data: objpack like sopcklsti1 occurs 1 with header line.
select * from ZESK_UCHET into CORRESPONDING FIELDS OF TABLE gt_kont.
Data: docdata like sodocchgi1,
objpack like sopcklsti1 occurs 1 with header line,
objhead like solisti1 occurs 1 with header line,
objtxt like solisti1 occurs 10 with header line,
objbin like solisti1 occurs 10 with header line,
reclist like somlreci1 occurs 1 with header line.
Data: tab_lines type i,
doc_size type i,
att_type like SOODK-OBJTP.
docdata-obj_name = 'Ïðîâåðêà'.
docdata-obj_descr = 'Íåò îáíîâëåíèÿ'.
docdata-PROC_TYPE = 'D'.
loop at gt_kont into gs_kont.
if gs_kont-erdat < sy-datum.
CONCATENATE gs_kont-name1
gs_kont-name2
gs_kont-name3
gs_kont-name4 into objtxt.
CONCATENATE gs_kont-kanum
objtxt into objtxt SEPARATED BY space.
append objtxt.
objtxt = gs_kont-KOMMENT.
append DOC_CONTENT.
endif.
endloop.
describe table objtxt lines tab_lines.
read table objtxt index tab_lines.
docdata-doc_size = ( tab_lines - 1 ) * 255 + strlen( objtxt ).
clear objpack-transf_bin.
objpack-head_start = 1.
objpack-head_num = 0.
objpack-body_start = 1.
objpack-body_num = tab_lines.
objpack-doc_type = 'RAW'.
append objpack.
reclist-receiver =
'smo@itec-center.ru'.
reclist-rec_type = 'U'.
reclist-com_type = 'INT'.
append reclist.
clear: reclist.
reclist-receiver = sy-uname.
reclist-rec_type = 'B'.
reclist-EXPRESS = 'X'.
append reclist.
clear: reclist.
reclist-receiver = '70bae'.
reclist-rec_type = 'B'.
reclist-EXPRESS = 'X'.
reclist-com_type = 'RML'.
append reclist.
reclist-receiver = sy-uname. "<-- change internal user
* reclist-rec_type = 'B'.
* append reclist.
CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
EXPORTING
document_data = docdata
* PROC_TYPE = 'T'
PUT_IN_OUTBOX = 'X'
tables
packing_list = objpack
OBJECT_HEADER = objhead
* CONTENTS_BIN = objbin
CONTENTS_TXT = objtxt
receivers = reclist
.
IF sy-subrc <> 0.
message ID 'SO' TYPE 'S' NUMBER '023'
with docdata-obj_name.
ENDIF.