Hi

具有数据的bapi结构和对应的结构X具有相同的名称和字段（我相信位置相同），因此您可以使用字段符号：

A）如果字段位于相同位置：

字段符号： ANY类型，

ANY类型。

DO

将结构BAPI_MARA的组件SY-索引分配给。

如果SY-SUBRC <>0。退出。 ENDIF。

将结构BAPI_MARAX的组件SY-索引分配给。

如果不是初始的。

='X '。

ENDIF。

ENDDO。

如果位置不同，则可以使用名称，因此可以使用fm DDIF_FIELDINFO_GET来获取 结构的名称，结果将在DFIES_TAB中：

在DFIES_TAB中循环。

ASSIGN COMPONENT DFIES_TAB-FIELD STRUCTURE BAPI_MARA

TO 。

将结构BAPI_MARAX的组件DFIES_TAB-FIELDNAME分配给

到。

如果不是初始的。

='X'。

ENDIF。

ENDLOOP。

Max

PERFORM fill_x_structure更改ls_shippingx。

  FORM fill_x_structure更改cs_x_structure TYPE任何。


    数据：lr_struct类型参考cl_abap_structdescr，
          lr_field类型参考cl_abap_elemdescr。
    FIELD-SYMBOLS：类似于cl_abap_structdescr => components的行，
                    TYPE ANY。


    lr_struct？= cl_abap_typedescr => describe_by_data（cs_x_structure）。
    检查lr_struct是否绑定。
    环回lr_struct->组件ASSIGNING 。
      UNASSIGN 。
  *如果unicode处于活动状态，则仅考虑x字段，C1会考虑
  2字节
      检查 -type_kind EQ lr_struct-> typekind_char。
      ASSIGN COMPONENT -结构名称cs_x_structure TO 。
      检查已分配。
  *获取元素描述
      lr_field？= cl_abap_typedescr => describe_by_data（）。
      检查lr_field-> absolute_name EQ'\ TYPE = BAPIUPDATE'。
       = cl_mmpur_constants =>是。
    结局。


  ENDFORM。  " fill_x_structure