REPORT  z10_04.

DATA : gv_1 TYPE c VALUE 'A',

       gv_2 TYPE c VALUE 'B',

       gv_3 TYPE c VALUE 'C',

       gv_4 TYPE c VALUE 'D',

       gv_5 TYPE c VALUE 'E'.

DATA : gv_fname TYPE c LENGTH 10.

DATA : gv_idx TYPE n.

FIELD-SYMBOLS : <fs>.

gv_fname = gv_1.

DO 5 TIMES.

  CLEAR : gv_fname.

  gv_fname = 'GV_'.

  gv_idx = sy-index.

  CONCATENATE gv_fname gv_idx INTO gv_fname.

  ASSIGN (gv_fname) TO <fs>.

WRITE :/ gv_fname, ' : ',  <fs>.