DATA 动态给值处理

 data    lr_data    TYPE REF TO ztssf_039,
            lr_data1   TYPE REF TO data  .
            
lr_current->get_properties( IMPORTING es_attributes = ls_data  ) .

第1方法 ：

CREATE DATA lr_data  .
    lr_data->* = ls_data  .

• GET REFERENCE OF ls_data INTO lr_data . " 不采用

第2方法 ：

CREATE DATA lr_data1 TYPE ztssf_039 .
ASSIGN lr_data1->* TO FIELD-SYMBOL() .
MOVE-CORRESPONDING ls_data TO .

zcl_common_utility=>cur_data     =    lr_data1   .

assign ME->DATA_REF->* to .
if SY-SUBRC = 0.
move-corresponding IS_ATTRIBUTES to .
endif.

assign ME->DATA_REF->* to .
if SY-SUBRC = 0.
move-corresponding to ES_ATTRIBUTES.
endif.