Merge branch 'dev'

renhao

2023-10-13 462215553c754d26acde8edab81b4a73f774e21e

 _Main/BL/Type_MacroPlan/Method_MappingOperationBOMData.qbl

@@ -76,7 +76,7 @@
    }
    if( createPurchaseSupplyMaterial ) {
        toCreateBomList := selectuniquevalues( bomList, Elements, item, 
                                               item.ComponentType() = "P", item.OrganCode() + item.ComponentCode());
                                               item.ComponentType() = "P" and keyProductList.Find( item.ComponentCode())>=0, item.OrganCode() + item.ComponentCode());
        traverse( toCreateBomList, Elements, key ) {
            boms := selectset( bomList, Elements, item, item.ComponentType() = "P" and item.OrganCode() + item.ComponentCode() = key );
            bom := boms.First();