标准列表和选择屏幕

连接相似语句

  使用“:”连接相似语句,在 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.

posted @ 2011-08-21 00:33  VerySky  阅读(410)  评论(0)    收藏  举报