Люди добрые, помогите!
Задача: отослать в цикле письмо ряду пользователей, и сохранить их в исходящией папке.
Не пойму в чем ошибка. На первом шаге цикла письмо отсылается нормально, а на последующих возвращает код возврата 9 - OBJECT_NOT_SENT.
Code:
free ZOBJECT_HD_CHANGE.
ZOBJECT_HD_CHANGE-OBJLA = sy-langu.
ZOBJECT_HD_CHANGE-OBJDES = Заголовок'.
append ZOBJECT_HD_CHANGE.
free zobjcont.
zobjcont-line = 'Строка 1'.
APPEND zobjcont.
free zreciviers.
zreciviers-RECNAM = zuser.
zreciviers-SNDEX = 'X'.
append zreciviers.
CALL FUNCTION 'SO_OBJECT_SEND'
EXPORTING
OBJECT_HD_CHANGE = ZOBJECT_HD_CHANGE
OBJECT_TYPE = 'RAW'
OUTBOX_FLAG = 'X'
OWNER = sy-uname
TABLES
OBJCONT = zobjcont
RECEIVERS = zreciviers
EXCEPTIONS
....
OBJECT_NOT_SENT = 9
....
Вариант с тем чтобы заполнять таблицу zreciviers разными пользователями не подходит, т.к. алгоритм построен по другому и процедуре уже передается единственное имя пользователя.