ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 将TC的内容转换为ALV LIST并打印

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

原创 Linux操作系统 作者:hzq2010 时间:2011-05-07 14:34:12 0 删除 编辑
 
*&---------------------------------------------------------------------*
*&      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 不能触发,参考:
这个事件只是在除最后页的其它页触发
 
如果不想打印统计信息,可以修改函数FITRV_PRINT_TABLE_CONTROL_DATA,添加:
 
  printcat-no_print_listinfos  = xfield.

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/23495244/viewspace-694701/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2010-03-11

  • 博文量
    196
  • 访问量
    172150