Guest User

Untitled

a guest
Jan 24th, 2020
110
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. DATA:
  2.       summe_plaetze Type i,
  3.       anzahl_fluege Type i,
  4.       durchschnitt(6) TYPE p DECIMALS 1,
  5.       sc TYPE scarr,
  6.       sp TYPE spfli,
  7.       sf TYPE sflight.
  8.  
  9. START-OF-SELECTION.
  10.  
  11.  
  12. select * from sflight into sf.
  13.   anzahl_fluege = anzahl_fluege + 1.
  14.   summe_plaetze = summe_plaetze + sf-SEATSOCC.
  15.   ENDSELECT.
  16.    durchschnitt = summe_plaetze / anzahl_fluege.
  17.   write : / 'Anzahl der Flüge:',anzahl_fluege.
  18.   write : / 'Summe der Plätze:',summe_plaetze.
  19.   write : / 'Durchschnitt der belegten Plätze:',durchschnitt.
RAW Paste Data