SAP SMARTFORMS 之由竖打向横打的转换
来源:互联网 发布:数组中随机数有的为空 编辑:程序博客网 时间:2024/05/16 12:51
在同一个SMARTFOMR中,想实现前几页是竖向打印的,而后几页变为横向打印的,觉得这个需求有点不切实际
老大说这样的打印好像只有Mircosoft Word能够实现,我觉得这也有点不可能。如果你有好的方法能够实现在同
一个SMARTFORM中实现打印方向的改变,请你与我联系,我将非常感谢。
当然,需求是不能不实现的,毕竟俺是拿着工资上着班的,所以没办法,简便的方法做不出来,只能用笨方法做了,
一个SMARTFORM完成不了的工作,我把他分配给两个,这样实现起来虽然麻烦点,但终归是把这个需求解决了,
还是挺高兴的。
具体实现方法就不详细说了,其实很简单,和上一篇循环打印的原理差不多,只是把一个SMARTFORM的循环打印变
成了控制两个SMARTFORM同时打印而已。贴段代码出来,大家一看就明白了。希望哪位遇到这样的需求了能够对
你有所帮助。
当然,如果你有更好的方法,请与我联系。谢谢。
*要竖打的内表数据 ---竖打FORM调用
CONCATENATE sy-uname sy-uzeit+4(2) INTO mid.
EXPORT table = itab TO DATABASE indx(hk) ID mid.
CONDENSE mid NO-GAPS.
DATA fm_name TYPE tdsfname.
DATA: ls_control_param TYPE ssfctrlop .
DATA: ls_composer_param TYPE ssfcompop .
DATA: outopt TYPE ssfcresop.
DATA: i_job_output_info TYPE ssfcrescl.
ls_control_param-langu = '1'.
ls_control_param-no_open = 'X'.
ls_control_param-no_close = 'X'.
CALL FUNCTION 'SSF_OPEN'
EXPORTING
control_parameters = ls_control_param
output_options = ls_composer_param
IMPORTING
job_output_options = outopt
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.
EXIT.
ENDIF.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'Z_CUSTOMER_BILL'
variant = ' '
direct_call = ' '
IMPORTING
fm_name = 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.
CALL FUNCTION fm_name
EXPORTING
control_parameters = ls_control_param
output_options = ls_composer_param
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.
DELETE FROM DATABASE indx(hk) ID mid.
**要横打的内表数据 ---横打FORM调用
IF jtab IS NOT INITIAL.
CLEAR fm_name.
CLEAR mid.
CONCATENATE sy-uname sy-uzeit+4(2) INTO mid.
*将内表数据存入ABAP内存
EXPORT table = jtab TO DATABASE indx(hk) ID mid.
CONDENSE mid NO-GAPS.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'Z_CUSTOMER_BILL_ADD'
variant = ' '
direct_call = ' '
IMPORTING
fm_name = 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.
CALL FUNCTION fm_name
EXPORTING
control_parameters = ls_control_param
output_options = ls_composer_param
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.
DELETE FROM DATABASE indx(hk) ID mid.
ENDIF.
CALL FUNCTION 'SSF_CLOSE'
IMPORTING
job_output_info = i_job_output_info
EXCEPTIONS
formatting_error = 1
internal_error = 2
send_error = 3
OTHERS = 4.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
- SAP SMARTFORMS 之由竖打向横打的转换
- SAP SMARTFORMS 之由竖打向横打的转换
- SAP-ABAP SmartForms之变量显示小技巧
- SAP Smartforms 条码打印
- SAP中smartforms参数
- SAP Smartforms 条码打印
- SAP关于smartforms报表
- 男朋友向女朋友打的辞职报告
- SAP/ABAP: Smartforms, SSF_OPEN, SSF_CLOSE
- 由索引向组合串的转换
- SmartForms 之二--设计
- 打的
- sap wda 调用smartforms生成PDF
- SAP SMARTFORMS 打印 CNSAPWIN 不支持页格式
- SAP SMARTFORMS 打印 CNSAPWIN 不支持页格式
- SAP SMARTFORMS 打印 CNSAPWIN 不支持页格式
- SAP SMARTFORMS 常用的一些系统变量
- SAP SMARTFORMS 基本操作 处理流程
- Arcgis license 服务无法启动的解决问题
- Apdex——衡量服务器性能的标准
- java设计模式—工厂模式
- 获取手机Ip地址
- 使用JS获得串口数据
- SAP SMARTFORMS 之由竖打向横打的转换
- 特征值分解和SVD
- mysql服务关闭过程
- Caused by: java.lang.ClassNotFoundException: javax.servlet.ServletContextListener 解决方案
- Struts2 中的值栈的理解
- 有return的情况下try catch finally的执行顺序
- Java中堆内存和栈内存详解
- JAVA--原型模式(Prototype)--设计模式五
- WWeChat仿微信应用源码带IM服务端源码完整版