SAP SMARTFORMS表单打印

T-CODE—SMARTFORMS 

1、创建页格式

T-CODE—SPAD

• 点击显示进去点击创建

保存

• 进行格式设置

显示进去创建

注: 打印方向一般横向和纵向都要勾选上

• 设备类型设置【CNSAPWIN：标准设备类型】

显示创建

其中打印初始化填写：\ew134;

页尾：\f

行的结束：\n

如下，填写完成后保存即可。

2、创建样式

• 字符格式

• 段落格式

• 表头数据

3、创建表单

• 表格属性应用页格式和样式

• 全局定义

• 创建主窗口

• 总记录程序行

• LOOP数据循环表头

TRUE-命令

• 创建模板

创建文本及对应值

保存激活完成。

修改Smartfroms默认文本编辑器

• 首先安装对应插件

SAPSLTESP00_0-70001053  可以在SAP官网下载 

• 将world编辑器改为默认文本编辑器

SE38—RSCPSETEDITOR—执行取消勾选sapscript和smartForms 这2个复选框，然后激活

表单插入条形码、二维码

SE73——创建

更改进入点击创建新条形码

应用

表单图片节点

图形节点中的图片可以直接使用服务器上已有的图片，或者通过事务代码SE78先将本地图片上传到SAP服务器后再使用：

• 上传图片：

• 表单应用图片：

地址节点

地址是经常出现在各种信函中的文本，在SAPScript中，它是文本元素的一部分。通过地址的好处是保证地址是根据发信人国家的书写规范输出，使用地址节点有一个前提条件，即该用户必须具有SAP CAA的管理员权限，否则只有通过文本节点进行地址添加

文本模块

Text Module：文本模块，主要用于设置一段固定的文本信息，如报表头名称，或者是报表附加条款说明等信息。

• 创建文本模块：

• 表单应用

打印代码

*定义Form的名字

DATA: lv_formname TYPE fpwbformname.

*定义得到的函数名字，这个函数就是form的接口

DATA: fm_name TYPE rs38l_fnam.

DATA: control    TYPE ssfctrlop, "打开SMARTFORM时的函数参数

      out_option TYPE ssfcompop,

      jobinfo    TYPE ssfcrescl.

*打开打印界面

CALL FUNCTION 'SSF_OPEN'

  EXPORTING

    user_settings      = 'X'

    control_parameters = control

    output_options     = out_option

  EXCEPTIONS

    formatting_error   = 1

    internal_error     = 2

    send_error         = 3

    user_canceled      = 4

    OTHERS             = 5.

*获取表单函数

CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'

  EXPORTING

    formname           = lv_formname

  IMPORTING

    fm_name            = fm_name

  EXCEPTIONS

    no_form            = 1

    no_function_module = 2

    OTHERS             = 3.

*调用表单接口函数

CALL FUNCTION fm_name

  EXPORTING

    control_parameters = control

    output_options     = out_option

    ls_head            = ls_head      "表单页面数据参数

*   IMPORTING

*   DOCUMENT_OUTPUT_INFO       =

*   JOB_OUTPUT_INFO    =

*   JOB_OUTPUT_OPTIONS =

  TABLES

    lt_item            = lt_item

  EXCEPTIONS

    formatting_error   = 1

    internal_error     = 2

    send_error         = 3

    user_canceled      = 4

    OTHERS             = 5.

IF sy-subrc <> 0.

* Implement suitable error handling here

ENDIF.

*//关闭打印

CALL FUNCTION 'SSF_CLOSE'

  IMPORTING

    job_output_info  = jobinfo

  EXCEPTIONS

    formatting_error = 1

    internal_error   = 2

    send_error       = 3

    OTHERS           = 4.