赛跑网-SMARTFORM的调用

SAPOK_ABAP

*下列代码展示了，如何通过代码调用smartforms。并设置相关参数。
   "前提建立ZFORM
DATA: l_name TYPE rs38l_fnam.
DATA: ws_composer_param TYPE ssfcompop.
DATA: lt_control_param  LIKE ssfctrlop OCCURS 0 WITH HEADER LINE.

***根据FORM名称，得到函数名
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
  EXPORTING
    formname           = 'ZFORM'   "※SMARTFOMR名称
  IMPORTING
    fm_name            = l_name           "※转换得到的函数名
  EXCEPTIONS
    no_form            = 1
    no_function_module = 2
    OTHERS             = 3.
IF sy-subrc <> 0.
  MESSAGE e398(00) WITH '没有获取打印的form表单'.
ENDIF.

**相关打印参数传递
ws_composer_param-tdimmed   = 'X'.   "打印参数，立即打印
ws_composer_param-tddelete  = 'X'.   "打印参数，立即后删除
ws_composer_param-tddest    = 'LOCL'."指定输出设备

游客，如果您要查看本帖隐藏内容请回复

"调用函数实现打印
CALL FUNCTION l_name
  EXPORTING
    control_parameters = lt_control_param
    output_options     = ws_composer_param
    user_settings      = ''.
*    TABLES                                 “tables为传入参数
*      gt_header   = lt_header[] .
IF sy-subrc <> 0.
ENDIF.

该贴已经同步到 SAPOK_ABAP的微博

布拉德与朔太郎

学习了额！！！

abapnewbie

THANKS FOR SHARING.  建议供下载的东西能有个部分预览

SAPOK_ABAP

abapnewbie 发表于 2012-8-20 09:23
THANKS FOR SHARING.  建议供下载的东西能有个部分预览

OK .
8月16日的实战项目去下载看看~~

Hedy.Y

AAAAAAAAAAAAAAAAAAAAAAAA

JOYSAP

支持涛哥，支持赛跑。

石子儿

学习了！

Hedy.Y

dew

study

dorian110

学习