ABAP：用field symbols指向的内表，怎样获取内表的字段目录

[variable11]

DATA: gt_showtab type ref to data.
field-symbols: <showtab> type ANY TABLE.

CREATE DATA gt_showtab like STANDARD TABLE OF zxs_det.
ASSIGN gt_showtab->* to <showtab>.

现在要获取<showtab>的字段目录，用于显示报表，要怎么做？
之前用的函数只能用于旧方式定义的内表：REUSE_ALV_FIELDCATALOG_MERGE。

[SAP-nkGavin]

1) 动态声明一个和显示内容的內表相同类型的structure
2) 使用cl_abap_structdescr可以得到此structure中每个element的DDIC信息

示例代码如下供参考


DATA: gs_display TYPE REF TO data.
FIELD-SYMBOLS: <fs_display> TYPE ANY.

DATA: lo_descr TYPE REF TO cl_abap_structdescr,
lt_fields TYPE ddfields,
ls_sflight TYPE sflight.

BREAK-POINT.

CREATE DATA gs_display TYPE sflight.
ASSIGN gs_display->* TO <fs_display>.

lo_descr ?= cl_abap_typedescr=>describe_by_data( <fs_display> ).

lt_fields = lo_descr->get_ddic_field_list( p_langu = 'E'
p_including_substructres = abap_true ).
BREAK-POINT.

[variable11]

如果 gs_display 不是type系统表，而是程序内部定义的structure呢。
比如：

types: begin of mm_01,
matnr type mara-matnr,
prodh type mara-prdha,
end of mm_01.

create data gs_display type mm_01.