Re: Send E-mails with attached MIME objects and PDF files together

Some code

Code fragment:

CALL METHOD cl_bcs_convert=>string_to_soli
     EXPORTING
       iv_string = my_string
     RECEIVING
       et_soli   = it_soli.

   DATA: ob_document_bcs TYPE REF TO cl_document_bcs.

   CALL METHOD cl_document_bcs=>create_document
     EXPORTING
       i_type    = 'HTM'
       i_subject = sos33-objdes
       i_text    = it_soli
     RECEIVING
       result    = ob_document_bcs.

   DATA: ob_bcs TYPE        REF TO cl_bcs.
   DATA: ob_cam_address_bcs TYPE REF TO cl_cam_address_bcs .

   ob_bcs = cl_bcs=>create_persistent( ).

   CALL METHOD ob_bcs->set_document( ob_document_bcs ).

   ob_cam_address_bcs = cl_cam_address_bcs=>create_internet_address( sos04-s_snd_nam ).

   CALL METHOD ob_bcs->set_sender
     EXPORTING
       i_sender = ob_cam_address_bcs.

   DATA: it_adr_name TYPE TABLE OF sos04-l_adr_name .

   SPLIT sos04-l_adr_name AT space INTO TABLE it_adr_name .

   FIELD-SYMBOLS: <st_adr_name> LIKE LINE OF it_adr_name .

   DATA: i_copy TYPE abap_bool .

   LOOP AT it_adr_name ASSIGNING <st_adr_name> .

     ob_cam_address_bcs = cl_cam_address_bcs=>create_internet_address( <st_adr_name> ).

     CALL METHOD ob_bcs->add_recipient
       EXPORTING
         i_copy      = i_copy
         i_recipient = ob_cam_address_bcs.

     i_copy  = abap_true .

   ENDLOOP.

   DATA: result TYPE abap_bool .

   CALL METHOD ob_bcs->send
     EXPORTING
       i_with_error_screen = abap_true
     RECEIVING
       result              = result.

   IF result EQ abap_true.
     MESSAGE s004(bcs_medium) WITH sos04-l_adr_name .
   ENDIF.

   COMMIT WORK .

Result in outlook

Regards.