Flugdaten

DATA:
  count TYPE i VALUE 0,
  sc    TYPE scustom,
  sb    TYPE sbook.

* ???
TOP-OF-PAGE.
* Zeile ganz oben
 ULINE (140).
  WRITE: /  '|', (10)'Kunden ID',       '|', (15)'Kunde',
            '|', (14)'Strasse',         '|', (12)'Postleitzahl',
            '|', (14)'Ort',             '|', (12)'Buchungs-Nr.',
            '|', (16)'Fluggeselschaft', '|', (10)'FLugnummer',
            '|', (9)'Flugdatum',        '|'.
  ULINE /(140).

START-OF-SELECTION.
  SELECT * FROM  scustom INTO sc.
    SELECT * FROM sbook INTO sb
             WHERE customid = sc-id.
      WRITE: /  '|', (10)sc-id,       '|', (15)sc-name,
                '|', (14)sc-street,   '|', (12)sc-postcode,
                '|', (14)sc-city,     '|', (12)sb-bookid,
                '|', (16)sb-carrid,   '|', (10)sb-connid,
                '|', (9)sb-fldate,    '|'.
    ENDSELECT.
    IF sy-dbcnt > 0.
      count = count + 1.
    ENDIF.

  ENDSELECT.

END-OF-SELECTION.
  ULINE /(140).
  WRITE: / '|', 'Anzahl der Kunden: ', count, (104)' ', '|'.
  ULINE /(140).