经常会遇到行列转换的需求。于是就找到了这样的一段代码。虽然也有其他的转换方法。但是都没有及时的记录。于是 就想起了将这段经典代码写在这里。
TABLES spfli.
data:
it_data type STANDARD TABLE OF spfli,
wa_ref type ref to data,
it_fields type stringtab,
desc_struc type ref to cl_abap_structdescr,
desc_fields type ddfields.
field-symbols:
<wa_data> type any,
<p_str> type string,
<p_component> type dfies.
create data wa_ref like line of it_data.
assign wa_ref->* to <wa_data>.
desc_struc ?= cl_abap_structdescr=>describe_by_data( <wa_data> ).
desc_fields = desc_struc->get_ddic_field_list( ).
loop at desc_fields assigning <p_component>.
...
endloop.
希望能够帮到更多的人。