*&---------------------------------------------------------------------*

*& Report ZGROUPBY

*&---------------------------------------------------------------------*

*&

*&---------------------------------------------------------------------*

REPORT ZGROUPBY.

DATA flights TYPE TABLE OF spfli WITH EMPTY KEY.

START-OF-SELECTION.

SELECT * FROM  spfli

        WHERE carrid = 'LH'

        INTO TABLE @flights.

BREAK-POINT.

DATA members LIKE flights.

LOOP AT flights INTO DATA(flight)

    GROUP BY ( carrier = flight-carrid cityfr = flight-cityfrom )

             ASCENDING

             ASSIGNING FIELD-SYMBOL().

 CLEAR members.

 LOOP AT GROUP ASSIGNING FIELD-SYMBOL().

  " Jerry 2016-12-4 20:45PM at aircraft - this BASE is a new keyword: give the expression an initial value

   members = VALUE #( BASE members ( ) ).

 ENDLOOP.

 cl_demo_output=>write( members ).

ENDLOOP.

cl_demo_output=>display( ).