标准列表和选择屏幕
连接相似语句
使用“:”连接相似语句,在 ABAP 中,冒号是非常常见的,比如说最常见的程序
“WIRT::'111', '222', '333'.”。“:”并不是 WRITE语法,而是ABAP 本身语法,是通过“:”
将三个相似语句连接,相当于
WRITE ’111’.
WRITE ’222’.
WRITE ’333’.
标准列表输出
REPORT YTEST002.
*数据库表SPFLI相关
TABLES SPFLI.
SKIP.
*输出表头
ULINE AT /(91).
WRITE: / SY-VLINE,(15) '航线承运人',SY-VLINE,(15) '航班连接',SY-VLINE,
(15) '国家代码',SY-VLINE,(15) '起飞城市',SY-VLINE,
(15) '起飞机场',SY-VLINE.
ULINE AT /(91).
*输出内容
SELECT * FROM SPFLI.
WRITE: / SY-VLINE,(15) SPFLI-CARRID,SY-VLINE,(15) SPFLI-CONNID,SY-VLINE,
(15) SPFLI-COUNTRYTO,SY-VLINE,(15) SPFLI-CITYFROM,SY-VLINE,(15)
SPFLI-AIRPFROM,SY-VLINE.
ULINE AT /(91).
ENDSELECT.
输出如图所示:

先输出表头,再从数据表中读取数据并输出,横竖线使用“ULINE”和
“sy-line”。
SY-PAGNO 当前页号
SY-LSIND 列表索引页
SY-DATUM 当前时间
SY-LISTI 上一个列表的索引
SY-LINSZ 当前报表宽度
SY-LILLI 绝对列表中选定的行号
SY-LINCT 当前报表长度
SY-CUROW 屏幕上的行
SPACE 空字串
SY-CUCOL 光标列
SY-SUBRC 执行状态 0 表示成功
SY-CPAGE 列表的当前显示页
SY-UNAME 用户名
SY-STARO 真实行号
SY-UZEIT 当前时间
SY-LISEL 选择行的内容,长度为 255
SY-TCODE 当前的
TCODE SY-LINNO 当前行
输出无条件换页
输出无条件换页,使用语法:“NEW-PAGE”。
换页并且定义新页面的长度,使用语法:“NEW-PAGE LINE-COUNT 20”
列表颜色
语法:
FORMAT COLOR <n> [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 参数:是否影响前景颜色
Example:
*更改背景颜色
FORMAT COLOR COL_HEADING.
WRITE 'HELLO WORLD'.
WRITE 'WELCOME!'.
*更改前景颜色
FORMAT COLOR COL_HEADING INVERSE ON.
WRITE / 'HELLO WORLD'.
WRITE 'WELCOME'.
输出热点
START-OF-SELECTION.
WRITE '请按'.
FORMAT HOTSPOT ON COLOR 6 INVERSE ON.
WRITE '热点'.
FORMAT HOTSPOT OFF COLOR OFF.
AT LINE-SELECTION.
WRITE 'WELCOME!'.
输出:

单击“热点”字符,系统输出

交互式列表
在单击输出行时输出第二页。
START-OF-SELECTION.
WRITE: '初如列表,SY-LSIND =',SY-LSIND.
AT LINE-SELECTION.
IF SY-LSIND = 1.
WRITE: '第二列表,SY-LSIND =',SY-LSIND.
ENDIF.

浙公网安备 33010602011771号