А насколько автоматизируема сап-почта?

PavelBerezin

Есть-ли ФМ (или классы) для интеграции оной, чтобы программно проделать примерно следующее:
-просмотреть список входящих писем
-проанализировать текст внутри сообщений
-выгрузить прикрипленные файлы в определенный каталог
-сформировать своё письмо и отосолать его

т.е. чтото типа MAPI :roll:

AnS1

Класс разработок SO посмотри

STS

Кстати, да. Меня тоже интересует этот вопрос! Особенно вопрос, касающийся наличия ФМ создания и отправки сообщения...

Сергей Королев

Есть функциональный модуль SO_NEW_DOCUMENT_ATT_SEND_API1, можно найти примеры использования. Пользовался, работает. Только нужно еще настроить сервер, чтобы он мог отправлять вовне. Насколько помню в ТТГ 6.10, так что он должен уметь. Настройка - в транзакции SCOT.
Чтобы автоматом принимать почту, можно почитать ноту 455140. Прием почты и выгрузку делал, правда здесь 6.20. Работает ли на 6.10, не знаю. В help.sap.com поищи CL_BCS - это центральный класс для работы с почтой. В принципе, прямо по туториалу можно добиться успеха.

ascorp

Отправлять вовне это хорошо.. а как вовнутрь письма получать извне?

Сергей Королев

Дык я же говорю, нота 455140. Там достаточно подробная инструкция.

PavelBerezin

спасиба ... археологи роют дальше :lol:

Лупень

Чтение папок
CALL FUNCTION 'SO_FOLDER_LIST_READ'
EXPORTING
OWNER = OWNER
REGION = 'P'
TABLES
FOLDER_LIST = LIST_FOLDER

Чтение документа
CALL FUNCTION 'SO_DOCUMENT_READ_API1'
EXPORTING
DOCUMENT_ID = DOCUMENT_ID
IMPORTING
DOCUMENT_DATA = DOCUMENT_DATA
TABLES
OBJECT_CONTENT = MESSAGE_CONT
ATTACHMENT_LIST = ATTACHMENT_LIST

Чтение аттача
CALL FUNCTION 'SO_ATTACHMENT_READ_API1'
EXPORTING
attachment_id = attachment_id
IMPORTING
attachment_data = attachment_data
TABLES
attachment_header = attach_head
attachment_content = attach_cont
contents_hex = attach_cont_hex

Отправка сообщений
CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'
EXPORTING
DOCUMENT_DATA = DOCUMENT_DATA
PUT_IN_OUTBOX = PUT_IN_OUTBOX
IMPORTING
NEW_OBJECT_ID = NEW_OBJECT_ID
TABLES
OBJECT_CONTENT = OBJECT_CONTENT
RECEIVERS = API_RECEIVERS

Модулей для работы с этой потехой много(как RFC так и не RFC), здесь некоторые из них.

slash

Лупень написал(а):

Чтение папок

Отправка сообщений
CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'
EXPORTING
DOCUMENT_DATA = DOCUMENT_DATA
PUT_IN_OUTBOX = PUT_IN_OUTBOX
IMPORTING
NEW_OBJECT_ID = NEW_OBJECT_ID
TABLES
OBJECT_CONTENT = OBJECT_CONTENT
RECEIVERS = API_RECEIVERS

а можно какой нить пример работы с фм,

желательно с созданием текст. файла и аттачем его к письму,

особенно что касается DOCUMENT_DATA, с остальным вроде как всё понятно

?

Гость

FUNCTION 'SO_OBJECT_SEND' а можно и так отправлять письма с обработанными данными, при этом если все настроено, то и на внешние ящики

Сергей Королев

slash написал(а):

особенно что касается DOCUMENT_DATA, с остальным вроде как всё понятно

Ну мне хватало всего двух полей:

Code:

  document_data-obj_descr = text-001.
  document_data-obj_langu = 'R'.

obj_descr - тема сообщения. Вообще, вот фрагмент, отсылающий XML файл на внешний адрес:

Code:

  CALL METHOD xml_doc->render_2_table
    IMPORTING
      size  = size
      table = contents_hex.

  document_data-obj_descr = text-001.
  document_data-obj_langu = 'R'.

  contents_line-line = text-002.
  APPEND contents_line TO contents_txt.

  CLEAR packing.
  packing-head_start = 1.
  packing-head_num = 1.
  packing-body_start = 1.
  packing-body_num = LINES( contents_txt ).
  packing-doc_type = 'RAW'.
  packing-obj_name = 'BODY'.
  packing-obj_langu = 'R'.
  APPEND packing TO packing_list.

  CLEAR packing.
  packing-transf_bin = 'X'.
  packing-head_start = 2.
  packing-head_num = 1.
  packing-body_start = 1.
  packing-body_num = LINES( contents_hex ).
  packing-doc_type = 'XML'.
  packing-doc_size = size.
  CONCATENATE idoc_control-docnum '.xml'
    INTO packing-obj_descr.
  packing-obj_langu = 'R'.
  APPEND packing TO packing_list.

  CLEAR object_header.
  APPEND object_header TO object_headers.

  object_header = packing-obj_descr.
  APPEND object_header TO object_headers.

  receiver-rec_type = 'U'.
  receiver-receiver = smtp_address.

  receiver-notif_del = 'X'.
  receiver-notif_read = 'X'.
  receiver-notif_ndel = 'X'.

  APPEND receiver TO receivers.

  CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
    EXPORTING
      document_data              = document_data
      put_in_outbox              = put_in_outbox
      commit_work                = 'X'
    TABLES
      packing_list               = packing_list
      object_header              = object_headers
      contents_txt               = contents_txt
      contents_hex               = contents_hex
      receivers                  = 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.

Если у вас 4.7, то можно пользоваться библиотекой классов BCS, про нее есть в хэлпе, начальный класс CL_BCS. Есть ли она в 4.6, не знаю.

slash

вот это восстановил:
[code]DATA: contents_line LIKE SOLISTI1,
contents_txt LIKE SOLISTI1 OCCURS 1,
contents_hex LIKE SOLIX OCCURS 1,
document_data LIKE SODOCCHGI1,
object_header LIKE SOLISTI1,
object_headers LIKE SOLISTI1 OCCURS 1,
packing LIKE SOPCKLSTI1,
packing_list LIKE SOPCKLSTI1 OCCURS 1,
receiver LIKE SOMLRECI1,
receivers LIKE SOMLRECI1 OCCURS 1,
size TYPE I,
put_in_outbox LIKE SONV-FLAG.

а как насчёт:

put_in_outbox = 'X' = сохранять в ящике отправленных?

и вот насчёт этого:
idoc_control
немного поподробнее..

Сергей Королев

Цитата:

idoc_control

на это не обращайте внимания, фрагмент "выкушен" из обработки idoc.

slash

отправка работает, спасибо

Code:

 CLEAR packing. 
  packing-transf_bin = 'X'. 
  packing-head_start = 2. 
  packing-head_num = 1. 
  packing-body_start = 1. 
  packing-body_num = LINES( contents_hex ). 
  packing-doc_type = 'XML'. 
  packing-doc_size = size. 
  CONCATENATE idoc_control-docnum '.xml' 
    INTO packing-obj_descr. 
  packing-obj_langu = 'R'. 
  APPEND packing TO packing_list.

а как вместо xml отправлять просто текстовый файл (формируется из select-а)?

вопрос снят
в packing-doc_type ставим 'TXT'.

slash

а на сколько важны вот эти места:

Code:

    TABLES
      packing_list               = packing_list
      object_header              = object_headers
      contents_txt               = contents_txt
      contents_hex               = contents_hex  <--!!!

и

Code:

packing-doc_size = 255 * lcnt.

а то письма с файлами доходят но файлы пустые,
к тому же несмотря на

Code:

  CONCATENATE 'PUTSRAIF_' sy_datum '.dat'
    INTO packing-obj_descr.

и

Code:

packing-doc_type = 'TXT'.

файл приходит с разрешение .txt

Правила форума

А насколько автоматизируема сап-почта?

Кто сейчас на конференции