ALV 输出控制字体颜色
2009-02-27 14:35
323 查看
ALV 输出控制字体颜色
原文地址:http://www.erphome.net/wdb/wdbread.php?forumid=14&filename=f_3254
REPORT ztest NO STANDARD PAGE HEADING.
* ALV
TYPE-POOLS: slis.
TYPES: BEGIN OF ty_data,
key(10),
2 type string,
text TYPE c LENGTH 50,
END OF ty_data.
DATA: gt_fieldcat TYPE slis_t_fieldcat_alv,
gs_layout TYPE slis_layout_alv.
* Data to be displayed
DATA: gt_data TYPE TABLE OF ty_data WITH KEY key WITH HEADER LINE.
*---------------------------------------------------------------------*
INITIALIZATION.
PERFORM e01_fieldcat_init USING gt_fieldcat[].
.
*---------------------------------------------------------------------*
START-OF-SELECTION.
PERFORM selection.
*---------------------------------------------------------------------*
END-OF-SELECTION.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
* CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
is_layout = gs_layout
it_fieldcat = gt_fieldcat[]
TABLES
t_outtab = gt_data
EXCEPTIONS
program_error = 1
OTHERS = 2.
*---------------------------------------------------------------------*
* --> E01_LT_FIELDCAT *
*---------------------------------------------------------------------*
FORM e01_fieldcat_init USING e01_lt_fieldcat TYPE slis_t_fieldcat_alv.
DATA: ls_fieldcat TYPE slis_fieldcat_alv.
* Key
CLEAR ls_fieldcat.
ls_fieldcat-fieldname = 'KEY'.
ls_fieldcat-tabname = 'GT_DATA'.
ls_fieldcat-reptext_ddic = 'KEY'.
ls_fieldcat-outputlen = 10.
APPEND ls_fieldcat TO e01_lt_fieldcat.
* Test number
CLEAR ls_fieldcat.
ls_fieldcat-fieldname = '2'.
ls_fieldcat-tabname = 'GT_DATA'.
ls_fieldcat-reptext_ddic = 'Ord#'.
ls_fieldcat-emphasize = 'C611'. " red
ls_fieldcat-outputlen = 5.
APPEND ls_fieldcat TO e01_lt_fieldcat.
* Text
CLEAR ls_fieldcat.
ls_fieldcat-fieldname = 'TEXT'.
ls_fieldcat-tabname = 'GT_DATA'.
ls_fieldcat-reptext_ddic = 'Text'.
ls_fieldcat-outputlen = 40.
APPEND ls_fieldcat TO e01_lt_fieldcat.
ENDFORM. "e01_fieldcat_init
*---------------------------------------------------------------------*
* FORM SELECTION *
*---------------------------------------------------------------------*
* ........ *
*---------------------------------------------------------------------*
FORM selection.
gt_data-key = 'Group 1'. gt_data-2 = '19734'. gt_data-text = 'This is group 1'.
APPEND gt_data.
gt_data-key = 'Group 2'. gt_data-text = 'This is group 2'.
APPEND gt_data.
ENDFORM. "selection
原文地址:http://www.erphome.net/wdb/wdbread.php?forumid=14&filename=f_3254
REPORT ztest NO STANDARD PAGE HEADING.
* ALV
TYPE-POOLS: slis.
TYPES: BEGIN OF ty_data,
key(10),
2 type string,
text TYPE c LENGTH 50,
END OF ty_data.
DATA: gt_fieldcat TYPE slis_t_fieldcat_alv,
gs_layout TYPE slis_layout_alv.
* Data to be displayed
DATA: gt_data TYPE TABLE OF ty_data WITH KEY key WITH HEADER LINE.
*---------------------------------------------------------------------*
INITIALIZATION.
PERFORM e01_fieldcat_init USING gt_fieldcat[].
.
*---------------------------------------------------------------------*
START-OF-SELECTION.
PERFORM selection.
*---------------------------------------------------------------------*
END-OF-SELECTION.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
* CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
is_layout = gs_layout
it_fieldcat = gt_fieldcat[]
TABLES
t_outtab = gt_data
EXCEPTIONS
program_error = 1
OTHERS = 2.
*---------------------------------------------------------------------*
* --> E01_LT_FIELDCAT *
*---------------------------------------------------------------------*
FORM e01_fieldcat_init USING e01_lt_fieldcat TYPE slis_t_fieldcat_alv.
DATA: ls_fieldcat TYPE slis_fieldcat_alv.
* Key
CLEAR ls_fieldcat.
ls_fieldcat-fieldname = 'KEY'.
ls_fieldcat-tabname = 'GT_DATA'.
ls_fieldcat-reptext_ddic = 'KEY'.
ls_fieldcat-outputlen = 10.
APPEND ls_fieldcat TO e01_lt_fieldcat.
* Test number
CLEAR ls_fieldcat.
ls_fieldcat-fieldname = '2'.
ls_fieldcat-tabname = 'GT_DATA'.
ls_fieldcat-reptext_ddic = 'Ord#'.
ls_fieldcat-emphasize = 'C611'. " red
ls_fieldcat-outputlen = 5.
APPEND ls_fieldcat TO e01_lt_fieldcat.
* Text
CLEAR ls_fieldcat.
ls_fieldcat-fieldname = 'TEXT'.
ls_fieldcat-tabname = 'GT_DATA'.
ls_fieldcat-reptext_ddic = 'Text'.
ls_fieldcat-outputlen = 40.
APPEND ls_fieldcat TO e01_lt_fieldcat.
ENDFORM. "e01_fieldcat_init
*---------------------------------------------------------------------*
* FORM SELECTION *
*---------------------------------------------------------------------*
* ........ *
*---------------------------------------------------------------------*
FORM selection.
gt_data-key = 'Group 1'. gt_data-2 = '19734'. gt_data-text = 'This is group 1'.
APPEND gt_data.
gt_data-key = 'Group 2'. gt_data-text = 'This is group 2'.
APPEND gt_data.
ENDFORM. "selection
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY' 是字体的颜色变了 CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'是整个格子的颜色变了 |
相关文章推荐
- ALV 输出控制字体颜色 例程
- ALV 输出控制字体颜色 例程
- C++控制输出的字体颜色
- shell脚本编程(严格的终端格式控制,美丽的输出字体颜色)
- Unity控制台控制输出字体的颜色
- shell脚本(严格的终端格式控制,美丽的输出字体颜色)
- shell脚本编程(严格的终端格式控制,美丽的输出字体颜色)
- gui字体颜色的控制和常用组件
- 深入理解Shell输出颜色与控制
- (百度空间)C/C++控制台输出时设置字体及背景颜色
- linux下 echo 输出字体颜色的用法
- 关于ALV颜色的控制
- linux printf设置颜色与输出控制,利用控制码,实现固定位置输出百分比进度
- 3. 设计一个带有菜单的图形用户界面程序,使用级联菜单控制文字的字体和颜色,运行结果如下图所示
- 控制Button字体颜色变化
- 在网页之中用样式来控制字体的大小和颜色
- 控制台输出颜色控制(Console 模式下的颜色显示)
- C/C++实现控制台输出不同颜色字体的方法
- JS控制字体大小中、设为首页、收藏本站功能、超链接去掉颜色
- iOS 系统自带UITabBarController 字体颜色以及图片的控制