以下为正文

*数据库表spfli相关 
TABLES: spfli, sflight. 
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. 
 
​

评论关闭
IT干货网

微信公众号号:IT虾米 (左侧二维码扫一扫)欢迎添加!