*----------------------------------------------------------------------*
***INCLUDE MZ_TP1_F01 .
*----------------------------------------------------------------------*
*
FORM suchen .
  SELECT * FROM spfli
    WHERE cityfrom = zflug_input-cityfrom
    AND   cityto   = zflug_input-cityto.
    MOVE-CORRESPONDING spfli TO zflug.
    zflug-fltime = spfli-fltime.
    SELECT * FROM sflight
      WHERE carrid = spfli-carrid
      AND   connid = spfli-connid
      AND   fldate
        BETWEEN zflug_input-vondatum AND zflug_input-bisdatum.
      zflug-seatsfree = sflight-seatsmax - sflight-seatsocc.
      MOVE-CORRESPONDING sflight TO zflug.
      APPEND zflug TO itab.
    ENDSELECT.
  ENDSELECT.
ENDFORM.                    " suchen