www.lucasozio.it

REPORT demo_int_tables_move .
 
* move
 
DATA: BEGIN OF line,
        col1(1) TYPE c,
        col2(1) TYPE c,
      END OF line.
 
DATA: etab LIKE TABLE OF line WITH HEADER LINE,
      ftab1 LIKE TABLE OF line.
 
line-col1 = 'A'. line-col2 = 'B'.
 
APPEND line TO etab.
 
MOVE etab[] TO ftab1.
 
LOOP AT ftab1 INTO line.
  WRITE: / line-col1, line-col2.
ENDLOOP.
 
SKIP.
ULINE.
 
* =
 
DATA: ftab2 TYPE SORTED TABLE OF f
            WITH NON-UNIQUE KEY table_line,
      itab1 TYPE HASHED TABLE OF i
            WITH UNIQUE KEY table_line,
      fl    TYPE f.
 
DO 3 TIMES.
  INSERT sy-index INTO TABLE itab1.
ENDDO.