*&---------------------------------------------------------------------*
*& Report Z99_119
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_119.

DATA LT_SFLIGHT TYPE TABLE OF SFLIGHT.

SELECT *
  FROM SPFLI
  INTO TABLE @DATA(LT_SPFLI).

SELECT  A~CARRID
       ,A~CONNID
       ,A~CURRENCY
       ,SUM( A~PRICE ) AS PRICE
  
  FROM SFLIGHT AS A
  INNER JOIN @LT_SPFLI AS B
    ON  A~CARRID EQ B~CARRID
    AND A~CONNID EQ B~CONNID
  
  GROUP BY A~CARRID, A~CONNID, A~CURRENCY
  INTO CORRESPONDING FIELDS OF TABLE @LT_SFLIGHT.

CL_DEMO_OUTPUT=>DISPLAY( LT_SFLIGHT ).