*&---------------------------------------------------------------------*
*& Report Z99_120
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_120.

WITH
  +CONNID AS (
    SELECT A~CARRID
          ,B~CARRNAME
          ,A~CONNID
          ,A~CITYFROM
          ,A~CITYTO
      FROM SPFLI AS A INNER JOIN
           SCARR AS B
        ON A~CARRID EQ B~CARRID
     ),

   +FLIGHT AS (
     SELECT  CARRID
            ,CONNID
            ,COUNT( CONNID ) AS COUNT
            ,SUM( PRICE ) AS PRICE
            ,MAX( SEATSMAX ) AS SEATSMAX
            ,AVG( SEATSOCC ) AS SEATSOCC
       FROM SFLIGHT
       GROUP BY CARRID, CONNID
     )
    SELECT  A~CARRID
           ,A~CARRNAME
           ,A~CONNID
           ,A~CITYFROM
           ,A~CITYTO
           ,B~COUNT
           ,B~PRICE
           ,B~SEATSMAX
           ,B~SEATSOCC
      FROM +CONNID AS A INNER JOIN
           +FLIGHT AS B
        ON  A~CARRID EQ B~CARRID
        AND A~CONNID EQ B~CONNID
      ORDER BY A~CARRID, A~CONNID
      INTO TABLE @DATA(LT_DATA).

CL_DEMO_OUTPUT=>DISPLAY( LT_DATA ).