FORM pdf预览功能函数 SSFCOMP_PDF_PREVIEW

 函数模块             SSFCOMP_PDF_PREVIEW

Smart Forms: PDF Preview (Test)

function ssfcomp_pdf_preview.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"  IMPORTING
*"     REFERENCE(I_OTF) TYPE  TSFOTF
*"  EXCEPTIONS
*"      CONVERT_OTF_TO_PDF_ERROR
*"      CNTL_ERROR
*"----------------------------------------------------------------------
data: l_dummy type standard table of tline.

  clear: pdf_data, pdf_size.

* convert otf to pdf
  call function 'CONVERT_OTF'
       exporting
            format                = 'PDF'
       importing
            bin_filesize          = pdf_size
            bin_file              = pdf_data
       tables
            otf                   = i_otf[]
            lines                 = l_dummy
       exceptions
            err_max_linewidth     = 1
            err_format            = 2
            err_conv_not_possible = 3
            others                = 4.

  if sy-subrc <> 0.
    raise convert_otf_to_pdf_error.
  endif.

  call screen 0300 starting at 1 1.

endfunction.