REPORT  z05_28.
 

TYPES: BEGIN OF ty_data,

         field1 TYPE string,

         field2 TYPE string,

       END OF ty_data.

DATA: lt_data TYPE TABLE OF ty_data 

WITH NON-UNIQUE SORTED KEY skey COMPONENTS field1,
      ls_data TYPE ty_data.

APPEND VALUE #( field1 = 'A' field2 = '1' ) TO lt_data.
APPEND VALUE #( field1 = 'A' field2 = '1' ) TO lt_data.
APPEND VALUE #( field1 = 'A' field2 = '2' ) TO lt_data.
APPEND VALUE #( field1 = 'B' field2 = '3' ) TO lt_data.
APPEND VALUE #( field1 = 'B' field2 = '3' ) TO lt_data.
APPEND VALUE #( field1 = 'C' field2 = '4' ) TO lt_data.

DELETE ADJACENT DUPLICATES FROM lt_data COMPARING field1 field2.

*DELETE ADJACENT DUPLICATES FROM lt_data USING KEY skey.

LOOP AT lt_data INTO ls_data.

  WRITE: / ls_data-field1, ls_data-field2.

ENDLOOP.