ABAP 发送邮件(表格/附件)

前言

发送邮件功能在SAP 中比较常见的了，比如报表，生产上的数据记录等，都需要用到邮件功能。现展示一个简单的邮件功能给大家，望采纳。

语法

千篇一律，实用最要紧,直接贴代码。

DATA: GT_SPFLI TYPE TABLE OF SPFLI WITH HEADER LINE.
DATA:M_REMARK TYPE SO_TEXT255,STITLE1(50) TYPE C,MAILTO TYPE AD_SMTPADR.
DATA:OREF TYPE REF TO CX_ROOT,TXT TYPE STRING, LV_STRING TYPE STRING.

CONSTANTS:
  GC_TAB  TYPE C VALUE CL_BCS_CONVERT=>GC_TAB,  "CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB
  GC_CRLF TYPE C VALUE CL_BCS_CONVERT=>GC_CRLF.

DATA BINARY_CONTENT TYPE SOLIX_TAB.
DATA SIZE           TYPE SO_OBJ_LEN.
DATA SEND_REQUEST   TYPE REF TO CL_BCS.
DATA DOCUMENT       TYPE REF TO CL_DOCUMENT_BCS.
DATA RECIPIENT      TYPE REF TO IF_RECIPIENT_BCS.
DATA RECIPSEND      TYPE REF TO IF_SENDER_BCS.
DATA BCS_EXCEPTION  TYPE REF TO CX_BCS.
DATA BINARY_CONTENT_FORECAST TYPE SOLIX_TAB.
DATA MA