常用的搜索帮助有SE11的SH,域，值列表，组件等。。。下面介绍一下经常用的：
一：下拉
dropdown是最经常用的，也是最简单的一种。
不管是查询条件，还是结果清单，还是明细界面，下拉都是一样的
1.设置字段属性为下拉。（界面查询组件，视图，字段，使用F2）
T-code:BSP_WD_CMPWB进入组件界面，输入组件
选择左侧对应的视图双击：
展开CONTEXT节点，选择对应的context node,点开属性
设置GET_P：字段属性
CASE iv_property. WHEN if_bsp_wd_model_setter_getter=>fp_fieldtype. rv_value = cl_bsp_dlc_view_descriptor=>field_type_picklist. WHEN if_bsp_wd_model_setter_getter=>fp_server_event . rv_value = 'ZSTAT'. ENDCASE.
然后设置GET_V：VALUE
LR_CURRENT = ME->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_CURRENT IS BOUND. LR_CURRENT->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_CURRENT ). CHECK LS_CURRENT-PROCESS_TYPE = 'ZWO3'. DATA:lt_ddlb TYPE bsp_wd_dropdown_table. DATA:ls_ddlb TYPE LINE OF bsp_wd_dropdown_table. DATA gr_ddlb_msale_gb TYPE REF TO cl_crm_uiu_ddlb. CREATE OBJECT gr_ddlb_msale_gb EXPORTING iv_source_type = 'T'. DATA:lt_tj30t TYPE TABLE OF tj30t, ls_tj30t TYPE tj30t. SELECT * INTO TABLE lt_tj30t FROM tj30t WHERE STSMA = 'ZHIC_002' AND spras = sy-langu. LOOP AT lt_tj30t INTO ls_tj30t. ls_ddlb-key = ls_tj30t-estat. ls_ddlb-value = ls_tj30t-txt30. INSERT ls_ddlb INTO TABLE lt_ddlb. CLEAR: ls_tj30t,ls_ddlb. ENDLOOP. INSERT INITIAL LINE INTO lt_ddlb INDEX 1. IF sy-subrc = 0. gr_ddlb_msale_gb->set_selection_table( it_selection_table = lt_ddlb ). ENDIF. rv_valuehelp_descriptor = gr_ddlb_msale_gb.
二：F4
直接使用有搜索帮助或者有域的数据元素，或者手动给字段添加搜索帮助
设置GET_V（map字段一定要对好,inmap是输入字段，这里使用ZZZSYMPTOMSGROUP对应到搜索帮助的CODEGRUPPE ZZSECTIONCODE 对应 CODE
OUT 对应输出字段，对应到界面字段，如果没有默认值和搜索项之类的，可以只使用outmap）
DATA: ls_map TYPE if_bsp_wd_valuehelp_f4descr=>gtype_param_mapping, lt_inmap TYPE if_bsp_wd_valuehelp_f4descr=>gtype_param_mapping_tab, lt_outmap TYPE if_bsp_wd_valuehelp_f4descr=>gtype_param_mapping_tab, lr_entity TYPE REF TO cl_crm_bol_entity. ls_map-context_attr = 'STRUCT.ZZZSYMPTOMSGROUP'. ls_map-f4_attr = 'CODEGRUPPE'. APPEND ls_map TO: lt_inmap. ls_map-context_attr = 'EXT.ZZSECTIONCODE'. ls_map-f4_attr = 'CODE'. APPEND ls_map TO: lt_inmap. ls_map-context_attr = 'EXT.ZZSECTIONCODE'. ls_map-f4_attr = 'CODE'. APPEND ls_map TO lt_outmap. ls_map-context_attr = 'ZSEC_DESC'. ls_map-f4_attr = ' KURZTEXT'. APPEND ls_map TO lt_outmap. lr_entity ?= me->collection_wrapper->get_current( ). CREATE OBJECT rv_valuehelp_descriptor TYPE cl_bsp_wd_valuehelp_f4descr EXPORTING iv_help_id = 'ZPQCODE_Z6' iv_help_id_kind = if_bsp_wd_valuehelp_f4descr=>help_id_kind_name iv_input_mapping = lt_inmap iv_output_mapping = lt_outmap iv_trigger_submit = abap_true iv_object_ref = lr_entity.
三：组件搜索帮助：一般顾问就喜欢用标准的BP的那个搜索帮助，所以很多项目中只要是BP的字段，都会要求用那个搜索帮助。
添加组件为搜索帮助
METHOD BP_ACCOUNT_SEARCH. * only used for account search - Employee and Contact have separate search DATA : LV_TITLE TYPE STRING, LV_EVENTNAME TYPE STRING, LR_QS TYPE REF TO CL_CRM_BOL_DQUERY_SERVICE, LR_CURRENT TYPE REF TO CL_CRM_BOL_ENTITY, LR_COL TYPE REF TO IF_BOL_BO_COL, LR_CONTEXT TYPE REF TO CL_BSP_WD_CONTEXT_NODE, LV_EMPRESP TYPE STRING, LV_COLLECTION TYPE REF TO IF_BOL_BO_COL, LR_BTPARTNERSET TYPE REF TO CL_CRM_BOL_ENTITY, LR_BTPARTNER TYPE REF TO CL_CRM_BOL_ENTITY, LR_PARTNERSET_CTXT TYPE REF TO CL_CRM_UIU_BTPARTNERSET_CN. DATA: LV_LOW TYPE STRING. DATA: LS_SELECTION TYPE GENILT_SELECTION_PARAMETER, LR_VALUENODE TYPE REF TO CL_BSP_WD_VALUE_NODE, LR_REF_ANY TYPE REF TO DATA. FIELD-SYMBOLS: <LV_CONTEXT_NODE> TYPE ANY, <LV_PARTNERSET_CONTEXT_NODE> TYPE ANY. DATA: LR_PARAM TYPE REF TO IF_BOL_BO_PROPERTY_ACCESS, LR_ITERATOR TYPE REF TO IF_BOL_BO_COL_ITERATOR, LT_PARAMS TYPE GENILT_SELECTION_PARAMETER_TAB. DATA: LS_GENERAL TYPE ZCORDER_GENERAL. DATA LV_SALES_ORG TYPE CRMT_SALES_ORG. DATA LV_LAND TYPE LAND1."当前账号所属国家 CALL FUNCTION 'Z_GET_SALESORG_BY_USER' EXPORTING IV_USER = SY-UNAME IMPORTING EV_COUNTRY = LV_LAND. LR_CURRENT ?= ME->TYPED_CONTEXT->ZCORDER->COLLECTION_WRAPPER->GET_CURRENT( ). LR_CURRENT->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_GENERAL ). IF LS_GENERAL-COUNTRY EQ 'JP' AND ( IV_ROLE = 'ZHSI0CNN' OR IV_ROLE = 'RELAIER' ). ZCL_CRM_BUFFER=>GV_JP_FLAG = 'X'. ELSE. CLEAR ZCL_CRM_BUFFER=>GV_JP_FLAG. ENDIF. CASE IV_ROLE. WHEN 'SOLDTO'. LV_TITLE = CL_WD_UTILITIES=>GET_OTR_TEXT_BY_ALIAS( 'CRM_UIU_BT/PARTNER_SEARCH' ). IF BPSEARCH_ACCOUNT_POPUP IS NOT BOUND. BPSEARCH_ACCOUNT_POPUP = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( IV_INTERFACE_VIEW_NAME = 'SearchHelpWindow' "#EC NOTEXT IV_USAGE_NAME = 'CUBPSearchAccount' IV_TITLE = LV_TITLE ). ENDIF. * set display mode BPSEARCH_ACCOUNT_POPUP->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ). * Open the Popup BPSEARCH_ACCOUNT_POPUP->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' ). * Role dependand Event CONCATENATE 'SEL' IV_ROLE INTO LV_EVENTNAME. BPSEARCH_ACCOUNT_POPUP->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = LV_EVENTNAME ). * Get Query Context node LR_CONTEXT = BPSEARCH_ACCOUNT_POPUP->GET_CONTEXT_NODE( 'SEARCH' ). CHECK LR_CONTEXT IS BOUND. * Get DQuery object to add search parameter LR_QS ?= LR_CONTEXT->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_QS IS BOUND. LR_COL = LR_QS->GET_SELECTION_PARAMS( ). IF IV_ROLE = 'SERPR' OR IV_ROLE = 'RELAIER' OR IV_ROLE = 'SOLDTO'. CASE IV_ROLE. WHEN 'SERPR'. LV_LOW = 'Z003'. LS_SELECTION-ATTR_NAME = 'ZBP_GROUP'. LS_SELECTION-SIGN = 'I'. LS_SELECTION-OPTION = 'EQ'. LS_SELECTION-LOW = LV_LOW . GET REFERENCE OF LS_SELECTION INTO LR_REF_ANY. CREATE OBJECT LR_VALUENODE TYPE CL_BSP_WD_VALUE_NODE EXPORTING IV_DATA_REF = LR_REF_ANY. LR_COL->ADD( LR_VALUENODE ). WHEN 'RELAIER'. LV_LOW = 'Z005'. LS_SELECTION-ATTR_NAME = 'ZBP_GROUP'. LS_SELECTION-SIGN = 'I'. LS_SELECTION-OPTION = 'EQ'. LS_SELECTION-LOW = LV_LOW . GET REFERENCE OF LS_SELECTION INTO LR_REF_ANY. CREATE OBJECT LR_VALUENODE TYPE CL_BSP_WD_VALUE_NODE EXPORTING IV_DATA_REF = LR_REF_ANY. LR_COL->ADD( LR_VALUENODE ). WHEN 'SOLDTO'. IF SY-LANGU = 'J'."ADD BY LY 20170328 LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'COUNTRY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'JP' ). ENDIF. ENDCASE. ENDIF. IF ZCL_CRM_BUFFER=>GV_UI_LOGIN_ORG = 'O 50000297'. LV_LOW = LS_GENERAL-SALES_ORG. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'CATEGORY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = '1' ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZSALES_ORG' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = LV_LOW ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z005' ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z006' ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z021' ). ENDIF. LR_COL = LR_QS->GET_SELECTION_PARAMS( ). LR_ITERATOR = LR_COL->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-attr_name = 'ZBP_GROUP' AND ls_selection-low IS INITIAL AND ZCL_CRM_BUFFER=>GV_UI_LOGIN_ORG = 'O 50000297'.. lr_col->remove( lr_param ). lr_param = lr_iterator->get_current( ). CONTINUE. * EXIT. ENDIF. IF ls_selection-attr_name = 'ZSALES_ORG' AND ls_selection-low IS INITIAL AND ZCL_CRM_BUFFER=>GV_UI_LOGIN_ORG = 'O 50000297'.. lr_col->remove( lr_param ). lr_param = lr_iterator->get_current( ). CONTINUE. * EXIT. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP' AND LS_SELECTION-ATTR_NAME = 'COUNTRY' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. * EXIT. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. BPSEARCH_ACCOUNT_POPUP->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' IV_COLLECTION = LR_COL ). WHEN 'SERPR'. LV_TITLE = CL_WD_UTILITIES=>GET_OTR_TEXT_BY_ALIAS( 'CRM_UIU_BT/PARTNER_SEARCH' ). IF BPSEARCH_ACCOUNT_POPUP1 IS NOT BOUND. BPSEARCH_ACCOUNT_POPUP1 = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( IV_INTERFACE_VIEW_NAME = 'SearchHelpWindow' "#EC NOTEXT IV_USAGE_NAME = 'CUBPSearchAccount' IV_TITLE = LV_TITLE ). ENDIF. * set display mode BPSEARCH_ACCOUNT_POPUP1->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ). * Open the Popup BPSEARCH_ACCOUNT_POPUP1->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' ). * Role dependand Event CONCATENATE 'SEL' IV_ROLE INTO LV_EVENTNAME. BPSEARCH_ACCOUNT_POPUP1->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = LV_EVENTNAME ). * Get Query Context node LR_CONTEXT = BPSEARCH_ACCOUNT_POPUP1->GET_CONTEXT_NODE( 'SEARCH' ). CHECK LR_CONTEXT IS BOUND. * Get DQuery object to add search parameter LR_QS ?= LR_CONTEXT->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_QS IS BOUND. LR_CURRENT ?= ME->TYPED_CONTEXT->ZCORDER->COLLECTION_WRAPPER->GET_CURRENT( ). LR_CURRENT->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_GENERAL ). LV_LOW = LS_GENERAL-SALES_ORG. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZSALES_ORG' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = LV_LOW ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z003' ). IF SY-LANGU = 'J'. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'COUNTRY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'JP' ). ENDIF. LR_COL = LR_QS->GET_SELECTION_PARAMS( ). LR_ITERATOR = LR_COL->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-ATTR_NAME = 'ZBP_GROUP' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. * EXIT. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP' AND LS_SELECTION-ATTR_NAME = 'COUNTRY' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. * EXIT. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. LR_PARAM = LR_ITERATOR->GET_FIRST( ). WHILE LR_PARAM IS BOUND. LR_PARAM->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_SELECTION ). IF LS_SELECTION-ATTR_NAME = 'ZSALES_ORG' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). EXIT. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. BPSEARCH_ACCOUNT_POPUP1->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' IV_COLLECTION = LR_COL ). WHEN 'RELAIER' OR 'CONSIGNOR'. LV_TITLE = CL_WD_UTILITIES=>GET_OTR_TEXT_BY_ALIAS( 'CRM_UIU_BT/PARTNER_SEARCH' ). IF BPSEARCH_ACCOUNT_POPUP2 IS NOT BOUND. BPSEARCH_ACCOUNT_POPUP2 = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( IV_INTERFACE_VIEW_NAME = 'SearchHelpWindow' "#EC NOTEXT IV_USAGE_NAME = 'CUBPSearchAccount' IV_TITLE = LV_TITLE ). ENDIF. * set display mode BPSEARCH_ACCOUNT_POPUP2->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ). * Open the Popup BPSEARCH_ACCOUNT_POPUP2->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' ). * Role dependand Event CONCATENATE 'SEL' IV_ROLE INTO LV_EVENTNAME. BPSEARCH_ACCOUNT_POPUP2->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = LV_EVENTNAME ). * Get Query Context node LR_CONTEXT = BPSEARCH_ACCOUNT_POPUP2->GET_CONTEXT_NODE( 'SEARCH' ). CHECK LR_CONTEXT IS BOUND. * Get DQuery object to add search parameter LR_QS ?= LR_CONTEXT->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_QS IS BOUND. *********add by dq-yuw 南非retailer 分组为z006 IF LV_LAND EQ 'ZA' OR LS_GENERAL-COUNTRY EQ 'ZA'.. * lr_qs->add_selection_param( iv_attr_name = 'ZBP_GROUP' * iv_sign = 'I' * iv_option = 'EQ' * iv_low = 'Z006' ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'PARTNER' IV_SIGN = 'I' IV_OPTION = 'SW' IV_LOW = '5' ). ELSE. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z005' ). IF IV_ROLE = 'CONSIGNOR'. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z006' ). ENDIF. IF IV_ROLE = 'RELAIER'. IF LV_LAND EQ 'FR' OR ZCL_CRM_BUFFER=>GV_UI_LOGIN_ORG = 'O 50000297'... LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z006' ). ENDIF. ENDIF. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP'. IF IV_ROLE <> 'CONSIGNOR'. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z006' ). ENDIF. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z010' ). ENDIF. ****************end add IF SY-LANGU = 'J'."ADD BY LY 20170328 LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'COUNTRY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'JP' ). ENDIF. LR_CURRENT ?= ME->TYPED_CONTEXT->ZCORDER->COLLECTION_WRAPPER->GET_CURRENT( ). LR_CURRENT->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_GENERAL ). LV_LOW = LS_GENERAL-SALES_ORG. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZSALES_ORG' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = LV_LOW ). LR_COL = LR_QS->GET_SELECTION_PARAMS( ). LR_ITERATOR = LR_COL->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-ATTR_NAME = 'ZBP_GROUP' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. * EXIT. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP' AND LS_SELECTION-ATTR_NAME = 'COUNTRY' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. * EXIT. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. LR_PARAM = LR_ITERATOR->GET_FIRST( ). WHILE LR_PARAM IS BOUND. LR_PARAM->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_SELECTION ). IF LS_SELECTION-ATTR_NAME = 'ZSALES_ORG' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). EXIT. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. BPSEARCH_ACCOUNT_POPUP2->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' IV_COLLECTION = LR_COL ). WHEN 'NETWORK' OR 'ZHSI0CNN'. LV_TITLE = CL_WD_UTILITIES=>GET_OTR_TEXT_BY_ALIAS( 'CRM_UIU_BT/PARTNER_SEARCH' ). IF BPSEARCH_ACCOUNT_POPUP2 IS NOT BOUND. BPSEARCH_ACCOUNT_POPUP2 = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( IV_INTERFACE_VIEW_NAME = 'SearchHelpWindow' "#EC NOTEXT IV_USAGE_NAME = 'CUBPSearchAccount' IV_TITLE = LV_TITLE ). ENDIF. * set display mode BPSEARCH_ACCOUNT_POPUP2->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ). * Open the Popup BPSEARCH_ACCOUNT_POPUP2->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' ). * Role dependand Event CONCATENATE 'SEL' IV_ROLE INTO LV_EVENTNAME. BPSEARCH_ACCOUNT_POPUP2->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = LV_EVENTNAME ). * Get Query Context node LR_CONTEXT = BPSEARCH_ACCOUNT_POPUP2->GET_CONTEXT_NODE( 'SEARCH' ). CHECK LR_CONTEXT IS BOUND. * Get DQuery object to add search parameter LR_QS ?= LR_CONTEXT->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_QS IS BOUND. IF SY-LANGU = 'J'."ADD BY LY 20170328 LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'COUNTRY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'JP' ). ENDIF. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z010' ). IF LS_GENERAL-COUNTRY EQ 'JP'. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z006' ). ENDIF. * lr_current ?= me->typed_context->zcorder->collection_wrapper->get_current( ). * lr_current->get_properties( IMPORTING es_attributes = ls_general ). * lv_low = ls_general-sales_org. * lr_qs->add_selection_param( iv_attr_name = 'ZSALES_ORG' * iv_sign = 'I' * iv_option = 'EQ' * iv_low = lv_low ). LR_COL = LR_QS->GET_SELECTION_PARAMS( ). LR_ITERATOR = LR_COL->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-ATTR_NAME = 'ZBP_GROUP' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP' AND LS_SELECTION-ATTR_NAME = 'COUNTRY' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. BPSEARCH_ACCOUNT_POPUP2->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' IV_COLLECTION = LR_COL ). WHEN 'LOGICAL'. LV_TITLE = CL_WD_UTILITIES=>GET_OTR_TEXT_BY_ALIAS( 'CRM_UIU_BT/PARTNER_SEARCH' ). IF BPSEARCH_ACCOUNT_POPUP IS NOT BOUND. BPSEARCH_ACCOUNT_POPUP = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( IV_INTERFACE_VIEW_NAME = 'SearchHelpWindow' "#EC NOTEXT IV_USAGE_NAME = 'CUBPSearchAccount' IV_TITLE = LV_TITLE ). ENDIF. * set display mode BPSEARCH_ACCOUNT_POPUP->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ). * Open the Popup BPSEARCH_ACCOUNT_POPUP->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' ). * Role dependand Event CONCATENATE 'SEL' IV_ROLE INTO LV_EVENTNAME. BPSEARCH_ACCOUNT_POPUP->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = LV_EVENTNAME ). * Get Query Context node LR_CONTEXT = BPSEARCH_ACCOUNT_POPUP->GET_CONTEXT_NODE( 'SEARCH' ). CHECK LR_CONTEXT IS BOUND. * Get DQuery object to add search parameter LR_QS ?= LR_CONTEXT->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_QS IS BOUND. * IF SY-LANGU = 'J'. * lr_qs->add_selection_param( iv_attr_name = 'COUNTRY' * iv_sign = 'I' * iv_option = 'EQ' * iv_low = 'JP' ). * ENDIF. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z003' ). LR_CURRENT ?= ME->TYPED_CONTEXT->ZCORDER->COLLECTION_WRAPPER->GET_CURRENT( ). LR_CURRENT->GET_PROPERTIES( IMPORTING ES_ATTRIBUTES = LS_GENERAL ). LV_LOW = LS_GENERAL-SALES_ORG. IF LV_LOW IS NOT INITIAL. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZSALES_ORG' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = LV_LOW ). ENDIF. LV_LOW = LS_GENERAL-COUNTRY. IF LV_LOW IS NOT INITIAL. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'COUNTRY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = LV_LOW ). ENDIF. LR_COL = LR_QS->GET_SELECTION_PARAMS( ). LR_ITERATOR = LR_COL->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-ATTR_NAME = 'ZBP_GROUP' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP' AND LS_SELECTION-ATTR_NAME = 'COUNTRY' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. WHEN 'ZHSI0DEL'. LV_TITLE = CL_WD_UTILITIES=>GET_OTR_TEXT_BY_ALIAS( 'CRM_UIU_BT/PARTNER_SEARCH' ). IF BPSEARCH_ACCOUNT_POPUP2 IS NOT BOUND. BPSEARCH_ACCOUNT_POPUP2 = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( IV_INTERFACE_VIEW_NAME = 'SearchHelpWindow' "#EC NOTEXT IV_USAGE_NAME = 'CUBPSearchAccount' IV_TITLE = LV_TITLE ). ENDIF. * set display mode BPSEARCH_ACCOUNT_POPUP2->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ). * Open the Popup BPSEARCH_ACCOUNT_POPUP2->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' ). * Role dependand Event CONCATENATE 'SEL' IV_ROLE INTO LV_EVENTNAME. BPSEARCH_ACCOUNT_POPUP2->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = LV_EVENTNAME ). * Get Query Context node LR_CONTEXT = BPSEARCH_ACCOUNT_POPUP2->GET_CONTEXT_NODE( 'SEARCH' ). CHECK LR_CONTEXT IS BOUND. * Get DQuery object to add search parameter LR_QS ?= LR_CONTEXT->COLLECTION_WRAPPER->GET_CURRENT( ). CHECK LR_QS IS BOUND. IF SY-LANGU = 'J'."ADD BY LY 20170328 LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'COUNTRY' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'JP' ). ENDIF. LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z010' ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z006' ). LR_QS->ADD_SELECTION_PARAM( IV_ATTR_NAME = 'ZBP_GROUP' IV_SIGN = 'I' IV_OPTION = 'EQ' IV_LOW = 'Z003' ). * lr_current ?= me->typed_context->zcorder->collection_wrapper->get_current( ). * lr_current->get_properties( IMPORTING es_attributes = ls_general ). * lv_low = ls_general-sales_org. * lr_qs->add_selection_param( iv_attr_name = 'ZSALES_ORG' * iv_sign = 'I' * iv_option = 'EQ' * iv_low = lv_low ). LR_COL = LR_QS->GET_SELECTION_PARAMS( ). LR_ITERATOR = LR_COL->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-ATTR_NAME = 'ZBP_GROUP' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. ENDIF. IF LS_GENERAL-COUNTRY EQ 'JP' AND LS_SELECTION-ATTR_NAME = 'COUNTRY' AND LS_SELECTION-LOW IS INITIAL. LR_COL->REMOVE( LR_PARAM ). LR_PARAM = LR_ITERATOR->GET_CURRENT( ). CONTINUE. ENDIF. LR_PARAM = LR_ITERATOR->GET_NEXT( ). ENDWHILE. BPSEARCH_ACCOUNT_POPUP2->OPEN( IV_INBOUND_PLUG = 'CLEAR_ALL' IV_COLLECTION = LR_COL ). ENDCASE. ENDMETHOD.
METHOD op_zhsi0cnn. * Added by wizard: Outbound plug 'ZHSI0CNN' bp_account_search( iv_role = 'ZHSI0CNN' ). ENDMETHOD.
太懒了，不想说废话，直接代码吧。。。不懂的就算了