DATA:LR_QUERY_SERVICE   TYPE REF TO   CL_CRM_BOL_DQUERY_SERVICE,LR_MESSAGE_SERVICE TYPE REF TO   CL_BSP_WD_MESSAGE_SERVICE,LV_MESSAGE         TYPE          STRING,LR_SEL_PARAMS      TYPE REF TO   IF_BOL_BO_COL,LR_COL             TYPE REF TO   IF_BOL_BO_COL,LR_PARAM           TYPE REF TO   IF_BOL_BO_PROPERTY_ACCESS,LR_ITERATOR        TYPE REF TO   IF_BOL_BO_COL_ITERATOR,LS_SELECTION       TYPE          GENILT_SELECTION_PARAMETER,LT_PARAMS          TYPE          GENILT_SELECTION_PARAMETER_TAB,LV_MAX_HITS        TYPE          I,LR_VALUENODE       TYPE REF TO   CL_BSP_WD_VALUE_NODE,GS_CLAUSE          TYPE STRING,GT_CLAUSE          TYPE TABLE OF STRING,GT_EKKO            TYPE TABLE OF EKKO,GW_EKKO            TYPE EKKO.."获取当前查询节点LR_QUERY_SERVICE ?= ME->TYPED_CONTEXT->SEARCHQUERYNODE->COLLECTION_WRAPPER->GET_CURRENT( )."检查查询节点实例化CHECK LR_QUERY_SERVICE IS BOUND."清空结果节点内容ME->TYPED_CONTEXT->SEARCHRESULTNODE->COLLECTION_WRAPPER->CLEAR( )."获取查询对象LR_SEL_PARAMS = LR_QUERY_SERVICE->GET_SELECTION_PARAMS( )."获取最大值LR_QUERY_SERVICE->GET_PROPERTY_AS_VALUE( EXPORTING IV_ATTR_NAME = 'MAX_HITS'IMPORTING EV_RESULT = LV_MAX_HITS )."获取查询对象的BOL迭代器^_^LR_ITERATOR   = LR_SEL_PARAMS->GET_ITERATOR( )."迭代器循环获取查询对象的值LR_PARAM      = LR_ITERATOR->GET_FIRST( ).WHILE LR_PARAM IS BOUND.LR_PARAM->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_SELECTION ).IF LS_SELECTION-LOW IS NOT INITIAL OR LS_SELECTION-HIGH IS NOT INITIAL."选择条件有值IF LS_SELECTION-LOW IS NOT INITIAL AND LS_SELECTION-HIGH IS NOT INITIAL AND LS_SELECTION-OPTION = 'BT'.CONCATENATE LS_SELECTION-ATTR_NAME 'BETWEEN' LS_SELECTION-LOW 'AND' LS_SELECTION-HIGH INTO GS_CLAUSE SEPARATED BY ' '.ENDIF.IF LS_SELECTION-LOW IS NOT INITIAL.

IF LS_SELECTION-OPTION <> 'EQ' AND LS_SELECTION-OPTION <> 'NE'.REPLACE ALL OCCURRENCES OF '*' IN LS_SELECTION-LOW WITH '%'.CONCATENATE '''' LS_SELECTION-LOW '''' INTO LS_SELECTION-LOW.CONCATENATE LS_SELECTION-ATTR_NAME 'LIKE' LS_SELECTION-LOW INTO GS_CLAUSE SEPARATED BY ' '.ELSE.CONCATENATE LS_SELECTION-ATTR_NAME LS_SELECTION-OPTION LS_SELECTION-LOW INTO GS_CLAUSE SEPARATED BY ' '.ENDIF.

ENDIF.

APPEND GS_CLAUSE TO GT_CLAUSE.

ENDIF.
*      APPEND LS_SELECTION TO LT_PARAMS.LR_PARAM = LR_ITERATOR->GET_NEXT( ).ENDWHILE.SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_EKKOFROM EKKO WHERE (GT_CLAUSE).DATA:  LR_REF_ANY    TYPE REF TO DATA,LR_VALUE_NODE TYPE REF TO CL_BSP_WD_VALUE_NODE.CREATE OBJECT LR_COL TYPE CL_CRM_BOL_BO_COL.LOOP AT GT_EKKO INTO GW_EKKO.GET REFERENCE OF GW_EKKO INTO LR_REF_ANY.CREATE OBJECT LR_VALUE_NODETYPECL_BSP_WD_VALUE_NODEEXPORTINGIV_DATA_REF = LR_REF_ANY.LR_COL->ADD( LR_VALUE_NODE ).ENDLOOP.ME->TYPED_CONTEXT->SEARCHRESULTNODE->COLLECTION_WRAPPER->ADD_COLLECTION( LR_COL ).