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

来源：互联网发布：比逗拍还牛的软件编辑：程序博客网时间：2024/06/02 08:57

将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.