Created by Jerry Wang, last modified on Oct 20, 2014
如果想找出bol collection 里满足某个attribute 等于指定value的条件的bol entity，例如一个bol collection 里包含了一系列product instance, 需要找出product id 等于JERRY06042的product instance，有两种做法:
- 逐一遍历collection 中的entity，在每次循环里取出entity的PRODUCT_ID, 和指定比较，如果找到满足条件的bol entity，则退出循环:
```ABAP
CONSTANTS: gv_product_id TYPE comm_product-product_id VALUE 'JERRY06042'.
DATA: lv_start TYPE i,
lv_end type i.
GET RUN TIME FIELD lv_start.
DATA(lo_product) = lo_collection->get_first( ).
WHILE lo_product IS NOT INITIAL.
DATA(lv_product_id) = lo_product->get_property_as_string( 'PRODUCT_ID' ).
IF lv_product_id = gv_product_id.
WRITE: / 'product found in solution1'.
EXIT.
ENDIF.
lo_product = lo_collection->get_next( ).
ENDWHILE.
GET RUN TIME FIELD lv_end.
lv_end = lv_end - lv_start.
WRITE: / 'time spentsolution1: ' , lv_end.
- 从bol collection 里得到iterator，利用iterator的FIND_BY_PROPERTY功能:
CLEAR: lv_start.
GET RUN TIME FIELD lv_start.
DATA(iterator) = lo_collection->get_iterator( ).
DATA(lo_found) = iterator->find_by_property( iv_attr_name = 'PRODUCT_ID' iv_value = gv_product_id ).
GET RUN TIME FIELD lv_end.
lv_product_id = lo_found->get_property_as_string( 'PRODUCT_ID' ).
WRITE: / 'Product found in solution2: ', lv_product_id.
lv_end = lv_end - lv_start.
WRITE: / 'time spent solution2: ' , lv_end COLOR COL_NEGATIVE.
```
测试发现bol collection里的entity数量越多，则第二种办法的性能优势越突出。例如在bol collection包含1684个product的情况下，方法二的性能是方法一的将近5倍。
REPORT ZHANA_PRODUCT_SEARCH_FILTER.
PARAMETERS: prod_id type COMT_PRODUCT_ID,
prod_des type COMT_PRSHTEXTX,
cat_id type COMT_CATEGORY_ID,"COMM_PRPRDCATR-CATEGORY_ID,
cat_desc type COMT_CATEGORY_TEXT,
maxhit type i .
DATA: lo_core TYPE REF TO cl_crm_bol_core,
lo_collection TYPE REF TO if_bol_entity_col,
lo_root_entity TYPE REF TO cl_crm_bol_entity,
lv_view_name TYPE crmt_view_name,
lv_query_name TYPE crmt_ext_obj_name,
lt_query_parameter TYPE crmt_name_value_pair_tab,
ls_query_parameter LIKE LINE OF lt_query_parameter,
lv_size TYPE i.
START-OF-SELECTION.
* replace ' ' with '' into prod_id.
SHIFT prod_id RIGHT DELETING TRAILING space.
SHIFT prod_id left DELETING LEADING space.
SHIFT prod_des RIGHT DELETING TRAILING space.
SHIFT prod_des left DELETING LEADING space.
SHIFT cat_id RIGHT DELETING TRAILING space.
SHIFT cat_id left DELETING LEADING space.
SHIFT cat_desc RIGHT DELETING TRAILING space.
SHIFT cat_desc left DELETING LEADING space.
IF prod_id NE ''.
ls_query_parameter-name = 'PRODUCT_ID'.
ls_query_parameter-value = prod_id.
APPEND ls_query_parameter TO lt_query_parameter.
ENDIF.
IF prod_des NE ''.
ls_query_parameter-name = 'DESCRIPTION'.
ls_query_parameter-value = prod_des.
APPEND ls_query_parameter TO lt_query_parameter.
ENDIF.
IF cat_id NE ''.
ls_query_parameter-name = 'CATEGORY_ID'.
ls_query_parameter-value = cat_id.
APPEND ls_query_parameter TO lt_query_parameter.
ENDIF.
IF cat_desc NE ''.
ls_query_parameter-name = 'CATEGORY_DESC'.
ls_query_parameter-value = cat_desc.
APPEND ls_query_parameter TO lt_query_parameter.
ENDIF.
IF maxhit EQ ''.
maxhit = 10000.
ENDIF.
ls_query_parameter-name = 'MAX_ROWS'.
ls_query_parameter-value = maxhit.
APPEND ls_query_parameter TO lt_query_parameter.
lo_core = cl_crm_bol_core=>get_instance( ).
lo_core->load_component_set( 'PROD_ALL' ).
lv_query_name = 'ProdAdvancedSearchProducts'.
"lv_query_name = 'ProdAdvSearchRgProducts'.
try.
lo_collection = lo_core->query(
iv_query_name = lv_query_name
it_query_params = lt_query_parameter
iv_view_name = lv_view_name ).
CATCH CX_SY_ARITHMETIC_ERROR.
write:/ 'Error' .
ENDTRY.
lv_size = lo_collection->IF_BOL_BO_COL~SIZE( ).
WRITE:/ 'Number of ' , lv_size, ' Products has been found!'.
CONSTANTS: gv_product_id TYPE comm_product-product_id VALUE 'JERRY06042'.
DATA: lv_start TYPE i,
lv_end type i.
GET RUN TIME FIELD lv_start.
DATA(lo_product) = lo_collection->get_first( ).
WHILE lo_product IS NOT INITIAL.
DATA(lv_product_id) = lo_product->get_property_as_string( 'PRODUCT_ID' ).
IF lv_product_id = gv_product_id.
WRITE: / 'product found in solution1'.
EXIT.
ENDIF.
lo_product = lo_collection->get_next( ).
ENDWHILE.
GET RUN TIME FIELD lv_end.
lv_end = lv_end - lv_start.
WRITE: / 'time spentsolution1: ' , lv_end.
CLEAR: lv_start.
GET RUN TIME FIELD lv_start.
DATA(iterator) = lo_collection->get_iterator( ).
DATA(lo_found) = iterator->find_by_property( iv_attr_name = 'PRODUCT_ID' iv_value = gv_product_id ).
GET RUN TIME FIELD lv_end.
lv_product_id = lo_found->get_property_as_string( 'PRODUCT_ID' ).
WRITE: / 'Product found in solution2: ', lv_product_id.
lv_end = lv_end - lv_start.
WRITE: / 'time spent solution2: ' , lv_end COLOR COL_NEGATIVE.