隐藏字段技术

START-OF-SELECTION.
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.
*隐藏关键字
HIDE: SPFLI-CARRID,SPFLI-CONNID.
ULINE AT /(91).
ENDSELECT.
AT LINE-SELECTION.
*只输出第一页
IF SY-LSIND = 1.
*根据隐藏字段读取并打印从表
SELECT * FROM SFLIGHT
WHERE CARRID = SPFLI-CARRID AND CONNID = SPFLI-CONNID.
WRITE: / SFLIGHT-CARRID,SY-VLINE,SFLIGHT-CONNID,
SY-VLINE,SFLIGHT-FLDATE,SY-VLINE,SFLIGHT-PRICE.
ENDSELECT.
ENDIF.

posted @ 2017-03-17 15:31  快乐VS神  阅读(424)  评论(0编辑  收藏  举报