如何用PDF预览smartform-[SSFCOMP_PDF_PREVIEW]详解编程语言

REPORT ztest_pdf_output. 
*&---------------------------------------------------------------------* 
*& Data Declaration 
*&---------------------------------------------------------------------* 
DATA: gv_formname TYPE tdsfname VALUE 'HRRCF_CS_APPLICANT', 
gv_fm_name  TYPE rs38l_fnam. 
DATA: gwa_ssfcompop TYPE ssfcompop, 
gwa_control   TYPE ssfctrlop. 
DATA: gv_devtype    TYPE rspoptype. 
DATA: gv_job_output TYPE ssfcrescl. 
DATA: gt_lines      TYPE TABLE OF tline. 
DATA: gv_size       TYPE i. 
*&---------------------------------------------------------------------* 
*& START-OF-SELECTION 
*&---------------------------------------------------------------------* 
START-OF-SELECTION. 
*Get the function module name using form name 
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME' 
EXPORTING 
formname           = gv_formname 
IMPORTING 
fm_name            = gv_fm_name 
EXCEPTIONS 
no_form            = 1 
no_function_module = 2 
OTHERS             = 3. 
IF sy-subrc <> 0. 
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno 
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. 
ENDIF. 
*Get Device Type 
CALL FUNCTION 'SSF_GET_DEVICE_TYPE' 
EXPORTING 
i_language             = sy-langu 
IMPORTING 
e_devtype              = gv_devtype 
EXCEPTIONS 
no_language            = 1 
language_not_installed = 2 
no_devtype_found       = 3 
system_error           = 4 
OTHERS                 = 5. 
gwa_ssfcompop-tdprinter = gv_devtype. 
*Suppress print dialog 
gwa_control-no_dialog = 'X'. 
gwa_control-getotf = 'X'. 
*Trigger the smartform 
CALL FUNCTION gv_fm_name 
EXPORTING 
control_parameters = gwa_control 
output_options     = gwa_ssfcompop 
IMPORTING 
job_output_info    = gv_job_output 
EXCEPTIONS 
formatting_error   = 1 
internal_error     = 2 
send_error         = 3 
user_canceled      = 4 
OTHERS             = 5. 
IF sy-subrc <> 0. 
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno 
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. 
ENDIF. 
CALL FUNCTION 'SSFCOMP_PDF_PREVIEW' 
EXPORTING 
i_otf                    = gv_job_output-otfdata 
EXCEPTIONS 
convert_otf_to_pdf_error = 1 
cntl_error               = 2 
OTHERS                   = 3. 
IF sy-subrc <> 0. 
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno 
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. 
ENDIF.