Code: Alles auswählen.
method SEND_MAIL.
* Email-Versand
TRY.
data(title) = conv so_obj_des( |Kommissionierliste - FEHLTEILE| ).
data(text) = get_mail_text( missing_parts ).
* -------- create persistent send request ------------------------
data(send_request) = cl_bcs=>create_persistent( ).
send_request->add_recipient(
i_recipient = cl_cam_address_bcs=>create_internet_address( conv #( me->DEFAULT_MAIL ) )
i_express = abap_true ).
* -------- create and set document -------------------------------
* create document from internal table with text
data(document) = cl_document_bcs=>create_document(
i_type = 'RAW'
i_text = text
i_length = '100'
i_subject = title ).
* add document to send request
send_request->set_document( document ).
* ---------- send document ---------------------------------------
data(sent_to_all) = send_request->send( i_with_error_screen = abap_false ).
COMMIT WORK.
Folgende Benutzer bedankten sich beim Autor Xilukarim für den Beitrag (Insgesamt 3):
Radinator • a-dead-trousers • deejey