Untitled
unknown
plain_text
a year ago
1.3 kB
4
Indexable
METHOD /iwbep/if_mgw_appl_srv_runtime~create_deep_entity.
DATA: lv_entity_set_name TYPE /iwbep/mgw_tech_name.
TYPES : BEGIN OF ts_deep_data.
INCLUDE TYPE zcl_zappa_ssc_top_spli_mpc=>ts_aliginfo.
TYPES: articles TYPE STANDARD TABLE OF zcl_zappa_ssc_top_spli_mpc=>ts_articles WITH DEFAULT KEY,
END OF ts_deep_data.
DATA lr_alloc_sim TYPE REF TO zarp_cl_int_alloc_sim.
DATA ls_ssc_output TYPE zappa_ssc_top_sty.
** DATA ls_deep_data TYPE ts_deep_data. "commented as part of DSCAE-479
DATA ls_deep_data TYPE zappa_ssc_top_sty. "DSCAE-479 changing the strucutre as the old structure dont work any more
* Get Entity Set Name
lv_entity_set_name = io_tech_request_context->get_entity_set_name( ).
* Read input data
io_data_provider->read_entry_data(
IMPORTING
es_data = ls_deep_data ).
ls_ssc_output = ls_deep_data.
* Call SSC ToP calculation
CREATE OBJECT lr_alloc_sim.
CALL METHOD lr_alloc_sim->process_ssc_top_split
* IMPORTING
* es_header = ls_deep_data
CHANGING
cs_ssc_input = ls_ssc_output.
* Transfer back the data
copy_data_to_ref( EXPORTING is_data = ls_ssc_output
CHANGING cr_data = er_deep_entity ).
ENDMETHOD.Editor is loading...
Leave a Comment