METHOD if_genil_appl_intlay~get_dynamic_query_result.TYPES:BEGIN OF ty_order,guid         TYPE crmt_object_guid,object_id    TYPE crmt_object_id_db,process_type TYPE crmt_process_type,END OF ty_order,BEGIN OF ty_product,product_guid TYPE comt_product_guid,product_id   TYPE comt_product_id,short_text   TYPE comt_prshtextx,END OF ty_product,BEGIN OF ty_part,guid_hi     TYPE crmt_object_guid,addr_nr     TYPE ad_addrnum,addr_type   TYPE ad_adrtype,partner_fct TYPE crmt_partner_fct,END OF ty_part,BEGIN OF ty_adrc,addrnumber TYPE ad_addrnum,name1      TYPE ad_name1,smtp_addr  TYPE ad_smtpadr,tel_number TYPE ad_tlnmbr1,street     TYPE ad_street,str_suppl1 TYPE ad_strspp1,str_suppl2 TYPE ad_strspp2,post_code1 TYPE ad_pstcd1,city1      TYPE ad_city1,END OF ty_adrc.DATA: lt_selection    TYPE axtt_tables_sel_param,ls_selection    TYPE axt_tables_sel_param,rt_object_id    TYPE RANGE OF crmt_object_id,rs_object_id    LIKE LINE OF rt_object_id,rt_process_type TYPE RANGE OF crmt_process_type,rs_process_type LIKE LINE OF rt_process_type,rt_cgi_date     TYPE RANGE OF zadtel00009q,rs_cgi_date     LIKE LINE OF rt_cgi_date,rt_cgi_time     TYPE RANGE OF zadtel00009u,rs_cgi_time     LIKE LINE OF rt_cgi_time,lx_root         TYPE REF TO cx_root.              "#EC NEEDEDDATA:gt_order   TYPE TABLE OF ty_order,gw_order   LIKE LINE OF gt_order,gt_product TYPE TABLE OF ty_product,gw_product LIKE LINE OF gt_product,gt_part    TYPE TABLE OF ty_part,vt_part    TYPE TABLE OF ty_part,gw_part    LIKE LINE OF gt_part,gt_adrc    TYPE TABLE OF ty_adrc,gw_adrc    LIKE LINE OF gt_adrc,gv_index   TYPE i. "
DATA ls_selection_paras TYPE genilt_selection_parameter.DATA lt_where_condition TYPE crmt_report_dyn_sql_line_ta.DATA: gt_result TYPE TABLE OF zcrms0056,vt_result TYPE TABLE OF zcrms0056,ls_result TYPE          zcrms0056.DATA: lv_maxhit     TYPE          int4,lv_object_key TYPE          crmt_bsp_objectkey,lr_object     TYPE REF TO   if_genil_cont_root_object.DEFINE set_result.LOOP AT GT_RESULT INTO LS_RESULT.LR_OBJECT = IV_ROOT_LIST->ADD_OBJECT( IV_OBJECT_NAME = 'ZTCRESULT'IS_OBJECT_KEY = LS_RESULT-GUID ).LV_OBJECT_KEY = LS_RESULT-GUID.LR_OBJECT->SET_KEY( LV_OBJECT_KEY ).LR_OBJECT->SET_ATTRIBUTES( LS_RESULT ).CLEAR LS_RESULT.ENDLOOP.END-OF-DEFINITION .lt_selection = it_selection_parameters.
*    SORT LT_SELECTION BY ATTR_NAME.LOOP AT lt_selection INTO ls_selection.CASE  ls_selection-attr_name.WHEN 'ZZAFLD00001Y'.MOVE-CORRESPONDING ls_selection TO rs_cgi_time.INSERT rs_cgi_time INTO TABLE rt_cgi_time.WHEN 'PROCESS_TYPE'.MOVE-CORRESPONDING ls_selection TO rs_process_type.INSERT rs_process_type INTO TABLE rt_process_type.WHEN 'ZZAFLD00001X'.MOVE-CORRESPONDING ls_selection TO rs_cgi_date.INSERT rs_cgi_date INTO TABLE rt_cgi_date.ENDCASE.ENDLOOP.lv_maxhit = is_query_parameters-max_hits.SELECT b~guida~guid AS headera~po_number_solda~zzztrackreturna~zzafld000001b~zzafld00001x AS zzgi_dateb~description AS short_textINTO CORRESPONDING FIELDS OF TABLE gt_resultFROM zhsb_sales_index AS aINNER JOIN crmd_orderadm_i AS bON a~guid = b~headerWHERE a~process_type = 'ZSO5'AND a~sales_org    = 'O 50000231'AND a~sold_to_party = '0000202693'AND b~zzafld00001x IN rt_cgi_dateAND b~zzafld00001y IN rt_cgi_timeAND b~itm_type     = 'ZSO5'."取前置服务工单vt_result[] = gt_result[].DELETE vt_result WHERE po_number_sold IS INITIAL.IF vt_result[] IS NOT INITIAL.SELECT guidobject_idprocess_typeINTO TABLE gt_orderFROM zhsb_order_indexFOR ALL ENTRIES IN vt_resultWHERE object_id = vt_result-po_number_sold+0(10)AND   process_type = 'ZSV1'.ENDIF."取合作伙伴ship toREFRESH:vt_result.vt_result[] = gt_result[].SORT vt_result BY header.DELETE ADJACENT DUPLICATES FROM vt_result COMPARING header.IF vt_result[] IS NOT INITIAL.SELECT crmd_link~guid_hicrmd_partner~addr_nrcrmd_partner~addr_typecrmd_partner~partner_fctINTO TABLE gt_partFROM crmd_linkINNER JOIN crmd_partnerON crmd_link~guid_set = crmd_partner~guidFOR ALL ENTRIES IN vt_resultWHERE crmd_link~guid_hi = vt_result-headerAND   crmd_partner~partner_fct = '00000002'AND   crmd_link~objtype_set = '07'."PARTNERREFRESH:vt_part.vt_part[] = gt_part[].SORT vt_part BY addr_nr.DELETE ADJACENT DUPLICATES FROM vt_part COMPARING addr_nr.IF vt_part[] IS NOT INITIAL.SELECT adrc~addrnumberadrc~name1adr6~smtp_addradrc~tel_numberadrc~streetadrc~str_suppl1adrc~str_suppl2adrc~post_code1adrc~city1INTO TABLE gt_adrcFROM adrcLEFT JOIN adr6ON adrc~addrnumber = adr6~addrnumberFOR ALL ENTRIES IN vt_partWHERE adrc~addrnumber = vt_part-addr_nr.REFRESH:vt_part.ENDIF.ENDIF.SORT gt_part BY guid_hi.SORT gt_adrc BY addrnumber.LOOP AT gt_result INTO ls_result.READ TABLE gt_order INTO gw_order WITH KEY object_id = ls_result-po_number_sold+0(10).IF sy-subrc <> 0.CONTINUE.ENDIF.ls_result-name2 = '固定值'."赋值联系人信息READ TABLE gt_part INTO gw_part WITH KEY guid_hi = ls_result-header BINARY SEARCH.IF sy-subrc = 0.READ TABLE gt_adrc INTO gw_adrc WITH KEY addrnumber = gw_part-addr_nr BINARY SEARCH.IF sy-subrc = 0.ls_result-tel_number = gw_adrc-tel_number.ls_result-post_code1 = gw_adrc-post_code1.ls_result-street = gw_adrc-street.ls_result-str_suppl1 = gw_adrc-str_suppl1.ls_result-name1 = gw_adrc-name1.ENDIF.ENDIF.MODIFY gt_result FROM ls_result.ENDLOOP.set_result.ENDMETHOD.