隐藏字段技术

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.