SAP smartforms打印参数控制

*&---------------------------------------------------------------------*
*& Report ZSMARTFORMS_001
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT zsmartforms_001.

DATA : sf_name TYPE rs38l_fnam.
DATA : sf_output_options TYPE ssfcompop.
DATA : sf_control_parameters TYPE ssfctrlop.
DATA : sf_job_output_options TYPE ssfcresop.

***********************设置打印对话框中的参数***************************

sf_output_options-tddest = 'LP01'. "打印设备
sf_output_options-tdpageslct = '1,2,4'. "打印哪几页，多页使用逗号分开
sf_output_options-tdnoprev = 'X'. "隐藏打印预览按钮

*********控制打印对话框显示与否，及直接打印预览方式输出*****************

sf_control_parameters-no_dialog = 'X'. "打印前不显示打印设置对话框
sf_control_parameters-preview = 'X'. "直接显示预览结果

*******************调用SMARTFORMS程序生成函数***************************

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'ZSF_WM0030'
IMPORTING
fm_name = sf_name.

***************************动态调用新生成的函数*************************

CALL FUNCTION sf_name
EXPORTING
output_options = sf_output_options "获取打印对话框中用户选择、输入、操作的结果：如判断用户在
control_parameters = sf_control_parameters "打印对话框中点击的是打印预览还是点击的直接打印
IMPORTING
job_output_options = sf_job_output_options.

IF sf_job_output_options-tdpreview = 'X'. "控制报表的打印次数，将打印记录累加后存放于系统中，作为重复打印控制的依据。
WRITE : '打印预览模式'.
ELSE.
WRITE : '直接打印模式'.
ENDIF.