*&---------------------------------------------------------------------*
*& Report Z99_59
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_59.

TYPES TY_RANGE TYPE RANGE OF SPFLI-CONNID.

SELECT *
  FROM SFLIGHT
  WHERE CARRID IN ('AA', 'LH')
  INTO TABLE @DATA(LT_SFLIGHT).

DATA(LR_RANGE) = VALUE TY_RANGE( FOR GROUPS GROUP OF WA IN LT_SFLIGHT
                                    GROUP BY ( CARRID = WA-CARRID
                                               CONNID = WA-CONNID )
                                               ASCENDING
                                               WITHOUT MEMBERS
                                    LET SIGN   = 'I'
                                        OPTION = 'EQ'
                                     IN SIGN   = SIGN
                                        OPTION = OPTION
                                        ( LOW = GROUP-CONNID ) ).
CL_DEMO_OUTPUT=>DISPLAY( LR_RANGE ).