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

将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 不能触发,参考:
这个事件只是在除最后页的其它页触发
 
如果不想打印统计信息,可以修改函数FITRV_PRINT_TABLE_CONTROL_DATA,添加:
 
  printcat-no_print_listinfos  = xfield.

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值