将TC的内容转换为ALV LIST并打印

最新推荐文章于 2024-08-17 00:30:00 发布

最新推荐文章于 2024-08-17 00:30:00 发布 · 77 阅读

本文介绍如何使用ABAP编程语言中的TC内容转换成ALV格式，并通过调用特定函数实现报表打印功能。文章提供了详细的代码示例，包括初始化参数、调用函数以及处理异常情况等。

将TC的内容转换为ALV LIST并打印

*&---------------------------------------------------------------------*
*& Form print_table_control_data
*&---------------------------------------------------------------------*
FORM print_tc .
DATA: repid LIKE sy-repid.
repid = sy-repid.
CALL FUNCTION 'FITRV_PRINT_TABLE_CONTROL_DATA'
EXPORTING
table_control = flights
callback_program = repid
callback_top_of_list = 'TOP_OF_LIST'
callback_top_of_page = 'TOP_OF_PAGE'
callback_end_of_page = 'END_OF_PAGE'
callback_end_of_list = 'END_OF_LIST'
optimize_column_width = 'X'
get_curr_quan_fields_from_ddic = 'X'
window_title = '测试'
TABLES
print_data = itab
EXCEPTIONS
column_information_missing = 1
printing_not_possible = 2
OTHERS = 3.
ENDFORM. " print_table_control_data

*&---------------------------------------------------------------------*
*& Form top_of_list
*&---------------------------------------------------------------------*
FORM top_of_list.
WRITE: / 'Top_of_list'.
ENDFORM.

*&---------------------------------------------------------------------*
*& Form top_of_page
*&---------------------------------------------------------------------*
FORM top_of_page.
WRITE: / 'Top_of_page'.
ENDFORM.
*&---------------------------------------------------------------------*
*& Form end_of_list
*&---------------------------------------------------------------------*
FORM end_of_list.
WRITE: / 'End_of_list'.
ENDFORM.

*&---------------------------------------------------------------------*
*& Form end_of_page
*&---------------------------------------------------------------------*
FORM end_of_page.
WRITE: / 'End_of_page'.
ENDFORM.

*END_OF_PAGE 不能触发，参考：

http://help.sap.com/saphelp_erp2004/helpdata/en/ee/c8e071d52611d2b468006094192fe3/frameset.htm

这个事件只是在除最后页的其它页触发

如果不想打印统计信息，可以修改函数FITRV_PRINT_TABLE_CONTROL_DATA，添加：

printcat-no_print_listinfos = xfield.