最近客户有一个需求是需要讲发票的smartform 发送到第三方系统。
原先的做法是,SAP只是发送发票数据过去,由第三方系统去自己创建PDF打印。
那么就遇到了一个问题,SAP中的发票打印产生修改的时候。第三方系统也要同步修改,
涉及到数据发送不完全的,还需要修改发送数据的接口。
这样每次的变更,对各系统来说就比较麻烦且工作量大,效率也不高。
后来研究了下,发现可以将smartform转换成PDF,再转成xstring去发送,
对方收到之后,再转回PDF。
  DATA: lv_func_name          TYPE rs38l_fnam. "数据元素DATA: lw_output_options     TYPE ssfcompop .DATA: ls_document_output    TYPE ssfcrespd,ls_job_output         TYPE ssfcrescl,ls_job_options        TYPE ssfcresop,ls_control_parameters TYPE ssfctrlop. "Smart Forms: 控制结构.DATA: lv_message            TYPE string.DATA: lv_bin_size    TYPE i,lv_pdf_xstring TYPE xstring.DATA: lt_tline              TYPE STANDARD TABLE OF tline.CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'EXPORTINGformname           = 'ZSD_SF_INVOICE_NEW'IMPORTINGfm_name            = lv_func_nameEXCEPTIONSno_form            = 1no_function_module = 2OTHERS             = 3.IF sy-subrc <> 0.MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgnoWITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.ENDIF.
*设置不打开对话框,ls_control_parameters-no_dialog = 'X'.ls_control_parameters-langu     = sy-langu.ls_control_parameters-getotf    = 'X'.lw_output_options-tdnoprev  = 'X'.CALL FUNCTION lv_func_nameEXPORTING
*     ARCHIVE_INDEX        =
*     ARCHIVE_INDEX_TAB    =
*     ARCHIVE_PARAMETERS   =control_parameters   = ls_control_parameters
*     MAIL_APPL_OBJ        =
*     MAIL_RECIPIENT       =
*     MAIL_SENDER          =output_options       = lw_output_options
*     USER_SETTINGS        = 'X'ls_head              = ls_headIMPORTINGdocument_output_info = ls_document_outputjob_output_info      = ls_job_outputjob_output_options   = ls_job_optionsTABLESit_items             = lt_itemEXCEPTIONSformatting_error     = 1internal_error       = 2send_error           = 3user_canceled        = 4OTHERS               = 5.IF sy-subrc <> 0.CALL FUNCTION 'MESSAGE_TEXT_BUILD'EXPORTINGmsgid               = sy-msgidmsgnr               = sy-msgnomsgv1               = sy-msgv1msgv2               = sy-msgv2msgv3               = sy-msgv3msgv4               = sy-msgv4IMPORTINGmessage_text_output = lv_message.ENDIF.
*CALL FUNCTION 'CONVERT_OTF'EXPORTINGformat                = 'PDF'IMPORTINGbin_filesize          = lv_bin_sizebin_file              = lv_pdf_xstringTABLESotf                   = ls_job_output-otfdatalines                 = lt_tlineEXCEPTIONSerr_max_linewidth     = 1err_format            = 2err_conv_not_possible = 3err_bad_otf           = 4OTHERS                = 5.IF sy-subrc <> 0.CALL FUNCTION 'MESSAGE_TEXT_BUILD'EXPORTINGmsgid               = sy-msgidmsgnr               = sy-msgnomsgv1               = sy-msgv1msgv2               = sy-msgv2msgv3               = sy-msgv3msgv4               = sy-msgv4IMPORTINGmessage_text_output = lv_message.RETURN.ENDIF.*lv_pdf_xstring 就是我们需要的smartform xtring
*可以放到下面这个结构中
TYPES:BEGIN OF ty_invoice,vbeln   TYPE vbeln_vf,xstring TYPE xstring,END OF ty_invoice.
DATA: gs_invoice TYPE ty_invoice.