DATA:
   rec_desc TYPE abap_compdescr,
   desc TYPE REF TO cl_abap_structdescr.
desc ?= cl_abap_tabledescr=>describe_by_data( p_data = data ).
LOOP AT desc->components INTO rec_desc.
......................