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

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

contents_txt - это тектовое наполнение сообщения с длиной строки не более 255 символов.
contents_hex - двоичное наполнение.
Если нужно пересылать текстовый файл как приложение, то я бы посоветовал сформировать его как contents_hex при помощи stream'а из библиотеки ixml.
Приложению присваивается расширение, которое вы пишете в packing-doc_type.

slash

Сергей Королев написал:

contents_txt - это тектовое наполнение сообщения с длиной строки не более 255 символов.
contents_hex - двоичное наполнение.
Если нужно пересылать текстовый файл как приложение, то я бы посоветовал сформировать его как contents_hex при помощи stream'а из библиотеки ixml.
Приложению присваивается расширение, которое вы пишете в packing-doc_type.

сделал, тока через filed-symbols, всё работет, спасибо,
правда при передачи в файле кирилицы, приходит черте-что(

slash

Сергей Королев написал:

я бы посоветовал сформировать его как contents_hex при помощи stream'а из библиотеки ixml.

а можно по подробнее...
а то если делать через field-symbols то количество строк в _txt и _hex одинканово, что не есть приавильно(при длинне строки в txt в 255 char приходит только одна строка)...

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

Пример формирования внтурнеей таблицы (текст с разделителем-табуляцией) при помощи stream:

Code:

  ixml = cl_ixml=>create( ).
  stream_factory = ixml->create_stream_factory( ).
  stream = stream_factory->create_ostream_itable( contents_hex ).
  encoding = ixml->create_encoding( byte_order    = 0
                                    character_set = 'windows-1251' ).

  stream->open( ).
  stream->set_encoding( encoding = encoding ).

  LOOP AT lt_data INTO wa_data.
    ADD 1 TO count.
    CLEAR str.
    DO.
      ASSIGN COMPONENT sy-index
        OF STRUCTURE wa_data TO <data>.

      IF sy-subrc NE 0.
        EXIT.
      ENDIF.

      IF sy-index > 1.
        str = cl_abap_char_utilities=>horizontal_tab.
        stream->write_string( string = str ).
      ENDIF.

      str = <data>.
      stream->write_string( string = str ).
    ENDDO.

    str = cl_abap_char_utilities=>cr_lf.
    stream->write_string( string = str ).
  ENDLOOP.
  size = stream->get_num_written( ).

  PERFORM send_mail TABLES contents_hex USING size.
  REFRESH contents_hex.

Код работает в 4.7, по идее должен работать и в Unicode (не проверялось).

slash

теперь, кажется, уже совсем всё работает)
ещё раз спасибо

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

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

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