赛跑网-ALV报表增加页眉

SAPOK_ABAP · 发表于 2012-8-22 11:04:27

   为了使ALV输出的报表更加美观，除了设置报表的各行的各列颜色，还可以给输出的报表添加一个标题，这个很简单，只需要传给函数REUSE_ALV_GRID_DISPLAY 输入项目下的I_GRID_TITLE  = '标题' 即可；
   除此之外，还可以进行一个类似于页眉的设置，可以在一个子程序中进行，处理好之后，将子程序名称传给 i_callback_top_of_page  .如下代码

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
   i_callback_program    = i_repid
   it_fieldcat          = int_fcat
   i_callback_top_of_page  = 'ALV_TOP_OF_PAGE'
   i_save                = 'A'
   i_callback_user_command = 'FRM_UCOMM'  "实现双击事件
TABLES
   t_outtab             = imat
EXCEPTIONS
   program_error          = 1
   OTHERS                = 2.
  IF sy-subrc <> 0.
  ENDIF.

FORM alv_top_of_page.
  DATA:it_commentary TYPE slis_t_listheader.
  DATA wa_commentary LIKE LINE OF it_commentary .
  CLEAR wa_commentary.
  wa_commentary-typ = 'S'.
  wa_commentary-key = 'WRITE BY:'.
  wa_commentary-info = sy-uname.
  APPEND wa_commentary TO it_commentary .
  CLEAR wa_commentary.
  wa_commentary-typ = 'S'.
  wa_commentary-key = 'DATA:'.
  wa_commentary-info = sy-datum .
  APPEND wa_commentary TO it_commentary .

游客，如果您要查看本帖隐藏内容请回复

ENDFORM. "ALV_TOP_OF_PAGE

该贴已经同步到 SAPOK_ABAP的微博

admin · 发表于 2012-8-22 15:17:43

石子儿 · 发表于 2012-10-14 17:54:26

看来要学到还多着呐，谢谢老师！

leanne · 发表于 2013-1-20 16:22:00

学习

dorian110 · 发表于 2013-3-3 19:33:38

别放弃

caizjian · 发表于 2013-3-21 12:38:35

点击查看加入

412768150 · 发表于 2013-4-28 01:40:52

cx楼主辛苦啦，这个问题对我很重要

caizjian · 发表于 2013-5-18 20:54:01

顶一个

ronnieshuai · 发表于 2013-7-5 22:58:31

这个要收藏一下，因为目前很少要到它！

爱人的人 · 发表于 2015-1-6 14:16:26

看看

		自动登录	找回密码
密码			注册

赛跑网-ALV报表增加页眉

最近访客

thanks