*---颜色
format color col_heading on intensified on."表头颜色
write:wa_a901-kschl color = 4 intensified on."主码颜色
write:wa_a901-datab color 2 intensified off."显示白色
format color off."取消所有颜色格式
*---固定表头
report ztest_test message-id me."报表可以这样定义
REPORT LINE-COUNT 100 LINE-SIZE 100 "报表设置:每页100行,每行长度100
NO STANDARD PAGE HEADING.
TOP-OF-PAGE.
ULINE.
WRITE sy-pagno. "每页设置它的页数
ULINE.
top-of-page.
write:'表头..........:'.
scroll list to page 1."固定一个表头,有top-of-page时,这个语句才起作用
set left scroll-boundary column 80."固定某一列,一定要写在loop中的write之前.
*-------------------------------一个固定表头的例子-----------------------------
REPORT LINE-COUNT 100 LINE-SIZE 100
NO STANDARD PAGE HEADING.
SELECTION-SCREEN BEGIN OF SCREEN 500 AS WINDOW.
PARAMETERS page TYPE i.
SELECTION-SCREEN END OF SCREEN 500.
START-OF-SELECTION.
DO 10000 TIMES.
WRITE sy-index.
ENDDO.
TOP-OF-PAGE.
ULINE.
WRITE sy-pagno.
ULINE.
AT LINE-SELECTION.
CALL SELECTION-SCREEN 500 STARTING AT 10 10.
SCROLL LIST TO COLUMN sy-staco
TO PAGE page LINE sy-staro.
"---------------------------color列表颜色,hotspot热点-----------------
format color <color参数> [on] intensified [on|off] inverse [on|off]
color参数:
col_background取决于gui
col_heading灰蓝
col_normal淡灰
col_total黄
col_key黄绿
col_positive绿
col_negative红
col_group紫
intensified参数:背景颜色参数
inverse参数:是否影响前景颜色
例:
format color col_heading inverse on.
write 'hello'.
FORMAT COLOR OFF.//取消颜色格式
.......
start-of-selection.
format hotspot on color 6 inverse on. //设置热点,6是颜色号
write 'hello'.
format hotspot off color off. //取消热点
at line-selection.
write 'welcome!'.
评论