abap:从现有内部创建动态内部 table
abap: create dynamic internal table from existing one
我有以下内部 table:
VBELN POSNR ELEMENT VALUE
4711 10 E1 12
4711 10 E2 23
ABAP(框架,Class 等)是否有任何可能性,因此我可以在运行时快速创建一个新的内部 table,如下所示:
VBELN POSNR E1 E2
4711 10 12 23
如有任何帮助,我们将不胜感激。
谢谢和BR。
是的。您想要的是 ABAP 运行时类型服务 (RTTS),更准确地说是 ABAP Runtime Type Creation (RTTC).
DATA(vbeln_descriptor) = CAST cl_abap_datadescr( cl_abap_typedescr=>describe_by_name( 'VBELN' ) ).
DATA(posnr_descriptor) = CAST cl_abap_datadescr( cl_abap_typedescr=>describe_by_name( 'POSNR' ) ).
DATA(components) = VALUE abap_component_tab( ( name = 'VBELN'
type = vbeln_descriptor )
( name = 'POSNR'
type = posnr_descriptor ) ).
DATA(value_descriptor) = cl_abap_typedescr=>describe_by_name( 'VALUE' ).
LOOP AT vbeln_rows INTO DATA(vbeln_row).
INSERT VALUE #(
name = vbeln_row-element
type = value_descriptor )
INTO TABLE components.
ENDLOOP.
DATA(row_descriptor) = cl_abap_structdescr=>get( components ).
DATA(table_descriptor) = cl_abap_tabledescr=>create( row_descriptor ).
DATA itab TYPE REF TO data.
CREATE DATA itab TYPE HANDLE table_descriptor.
我有以下内部 table:
VBELN POSNR ELEMENT VALUE
4711 10 E1 12
4711 10 E2 23
ABAP(框架,Class 等)是否有任何可能性,因此我可以在运行时快速创建一个新的内部 table,如下所示:
VBELN POSNR E1 E2
4711 10 12 23
如有任何帮助,我们将不胜感激。
谢谢和BR。
是的。您想要的是 ABAP 运行时类型服务 (RTTS),更准确地说是 ABAP Runtime Type Creation (RTTC).
DATA(vbeln_descriptor) = CAST cl_abap_datadescr( cl_abap_typedescr=>describe_by_name( 'VBELN' ) ).
DATA(posnr_descriptor) = CAST cl_abap_datadescr( cl_abap_typedescr=>describe_by_name( 'POSNR' ) ).
DATA(components) = VALUE abap_component_tab( ( name = 'VBELN'
type = vbeln_descriptor )
( name = 'POSNR'
type = posnr_descriptor ) ).
DATA(value_descriptor) = cl_abap_typedescr=>describe_by_name( 'VALUE' ).
LOOP AT vbeln_rows INTO DATA(vbeln_row).
INSERT VALUE #(
name = vbeln_row-element
type = value_descriptor )
INTO TABLE components.
ENDLOOP.
DATA(row_descriptor) = cl_abap_structdescr=>get( components ).
DATA(table_descriptor) = cl_abap_tabledescr=>create( row_descriptor ).
DATA itab TYPE REF TO data.
CREATE DATA itab TYPE HANDLE table_descriptor.