SAP行列转换的一个方法

    经常会遇到行列转换的需求。于是就找到了这样的一段代码。虽然也有其他的转换方法。但是都没有及时的记录。于是 就想起了将这段经典代码写在这里。

  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.

希望能够帮到更多的人。