*&---------------------------------------------------------------------*
*& Report Z99_57
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_57.

SELECT *
  FROM SCARR
  INTO TABLE @DATA(LT_SCARR).

DATA(LT_LIST) = VALUE STRING_TABLE(
  FOR <FS> IN LT_SCARR INDEX INTO IDX
  LET SEP   = '_'
      VAR1  = |INDEX: { IDX }|
      VAR2  = <FS>-CARRID && SEP && <FS>-CARRNAME
      VAR3  = |{ VAR1 }, TEXT = { VAR2 }|
   IN ( VAR3 ) ).

CL_DEMO_OUTPUT=>DISPLAY( LT_LIST ).