有时候不需要打印smartforms，而是以pdf格式发邮件发过去，下面是部分代码

REPORT  zlm_cvrt_smart_to_pdf_mail .

"控制变量

DATA  fm_name              TYPE rs38l_fnam .

DATA : control_parameters   TYPE ssfctrlop ,

      l_output_options    

TYPE ssfcompop .

DATA job_output_info       TYPE ssfcrescl .

DATA job_output_options    TYPE ssfcresop .

*--------------------------------------------------------------------*

"转OTF

DATA : gt_otf       LIKE  TABLE  OF itcoo     WITH  HEADER  LINE ,

      gt_pdf_line 

LIKE  TABLE  OF tline     WITH  HEADER  LINE ,

      gt_record   

LIKE  TABLE  OF solisti1  WITH  HEADER  LINE . DATA: g_len_in TYPE i,                                                 "OTF 文件大小（邮件附件大小）

      g_lines_txt TYPE i,                                              "邮件文本行数

      g_lines_bin TYPE i.                                              "邮件附件行数

DATA: g_benfile   TYPE xstring.                                        "二进制格式的邮件

DATA: g_object(50) TYPE c.                                             "邮件主题

DATA pdf_name     TYPE string.                                         "附件名称

DATA: gt_objpack  LIKE TABLE OF sopcklsti1   WITH HEADER LINE,         "邮件内容 正文+附件

      gt_objtxt   LIKE TABLE OF solisti1     WITH HEADER LINE,         "正文内容

      gt_objbin   LIKE TABLE OF solisti1     WITH HEADER LINE,         "附件内容

      gt_reclist  LIKE TABLE OF somlreci1    WITH HEADER LINE,         "收件人

      wa_doc_chng TYPE sodocchgi1.                                     "邮件属性

*--------------------------------------------------------------------*

"选择屏幕

PARAMETERS :

            p_email 

TYPE so_recname OBLIGATORY  DEFAULT  'LIUMENG@…….com' . 

*--------------------------------------------------------------------*

START-OF-SELECTION.

  CLEAR: job_output_options,

         job_output_info,

         g_len_in,

         g_lines_txt,

         g_lines_bin,

         g_benfile.

  CLEAR  : gt_otf[], gt_pdf_line[],gt_record[].

  "控制变量赋值   control_parameters-getotf    = 'X'.   "此参数必须，否则不会导出PDF而直接显示smartform

  control_parameters-no_close  = ''.

  control_parameters-no_dialog = 'X'.   "不显示打印对话框

  "输出参数设置

  l_output_options-tddest      = 'ZLM_PL'. "选择打印设备，可选

  l_output_options-xsfoutdev   = 'ZLM_PL'. "选择打印设备，可选

  l_output_options-tdprinter   = 'CNSAPWIN'.

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

    EXPORTING

      formname           = 'ZLM_SMTFM'

    IMPORTING

      fm_name            = fm_name

    EXCEPTIONS

      no_form            = 1

      no_function_module = 2

      OTHERS             = 3.

  CHECK: sy-subrc = 0.

  CALL FUNCTION fm_name

    EXPORTING

      control_parameters = control_parameters

      output_options     = l_output_options      "默认打印选项设置传输

*     user_settings      = 'X'                   "是否从用户主记录中获取信息

      i_acct_head        = l_acct_head

    IMPORTING

      job_output_info    = job_output_info

      job_output_options = job_output_options

    TABLES

      it_acct_item       = lt_acct_item

    EXCEPTIONS

      formatting_error   = 1