SAP中PDF文件本地保存方法

1、对于scriptform或者smartform已经ABAP list都可以通过SAP标准程序RSTXPDFT4进行本地保存。

使用本方法需要获得要打印内容的假脱机请求号&＃xff0c;可以通过事务码SP02获得。

2、通过自己书写代码实现&＃xff1a;

①对于scriptform&＃xff1a;首先要设置 函数 OPEN_FORM 的参数 OPTIONS &＃xff0c;OPTIONS中的参数 tdgetotf 设置为&＃39;X&＃39;.

通过函数    CALL FUNCTION &＃39;CLOSE_FORM&＃39;
                IMPORTING
                  RESULT  &＃61; RESULT
                tables
                  otfdata &＃61; otfdata.

取得otfdata数据&＃xff0c;用于下面的函数&＃xff1a;

    CALL FUNCTION &＃39;CONVERT_OTF&＃39;
   EXPORTING
     format                      &＃61; &＃39;PDF&＃39;
   IMPORTING
     bin_filesize                &＃61; bin_size
    TABLES
      otf                         &＃61; otfdata
    lines                       &＃61; pdf_lines .

调用文件保存对话框&＃xff1a;

    CALL METHOD cl_gui_frontend_services&＃61;>file_save_dialog
    EXPORTING
    default_extension    &＃61; &＃39;PDF&＃39;
      file_filter          &＃61; &＃39;*.PDF&＃39;
    CHANGING
      filename             &＃61; filename
      path                 &＃61; path
      fullpath             &＃61; fullpath .

将数据保存到本地&＃xff1a;

    CALL FUNCTION &＃39;GUI_DOWNLOAD&＃39;
    EXPORTING
   bin_filesize                    &＃61; bin_size
      filename                        &＃61; fullpath
   filetype                        &＃61; &＃39;BIN&＃39;
   codepage                        &＃61; &＃39;4110&＃39;
   IGNORE_CERR                     &＃61; ABAP_TRUE
    TABLES
      data_tab                        &＃61; pdf_lines.

②对于smartform&＃xff1a;调用的时候需要设置参数control_parameters&＃xff0c;getotf 值设置为&＃39;X&＃39;.

在打开smartform时候&＃xff0c;通过importing参数job_output_info获得&＃39;CONVERT_OTF&＃39;函数的tables参数OTF的值。job_output_info-otfdata[],,可以通过SSFCOMP_PDF_PREVIEW函数预览smartform的内容&＃xff1a;

call function ‘SSFCOMP_PDF_PREVIEW’
  exporting
    i_otf                          &＃61; t_otf[].

或者通过下面代码下载PDF文件到本地&＃xff1a;

CALL FUNCTION &＃39;CONVERT_OTF&＃39;
EXPORTING
format &＃61; &＃39;PDF&＃39;
IMPORTING
bin_filesize &＃61; bin_size
TABLES
otf &＃61; otfdata
lines &＃61; pdf_lines .

调用文件保存对话框&＃xff1a;

CALL METHOD cl_gui_frontend_services&＃61;>file_save_dialog
EXPORTING
default_extension &＃61; &＃39;PDF&＃39;
file_filter &＃61; &＃39;*.PDF&＃39;
CHANGING
filename &＃61; filename
path &＃61; path
fullpath &＃61; fullpath .

将数据保存到本地&＃xff1a;

CALL FUNCTION &＃39;GUI_DOWNLOAD&＃39;
EXPORTING
bin_filesize &＃61; bin_size
filename &＃61; fullpath
filetype &＃61; &＃39;BIN&＃39;
codepage &＃61; &＃39;4110&＃39;
IGNORE_CERR &＃61; ABAP_TRUE
TABLES
data_tab &＃61; pdf_lines.