From 472c228ef6d7c8d877558ff90051b1fdb35ffb5c Mon Sep 17 00:00:00 2001 From: renhao <renhui.hao@capgemini.com> Date: 星期二, 10 十月 2023 14:05:34 +0800 Subject: [PATCH] Merge branch 'dev' --- _Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl | 9 ++++++--- 1 files changed, 6 insertions(+), 3 deletions(-) diff --git a/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl b/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl index eeb6a49..712b51b 100644 --- a/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl +++ b/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl @@ -2,7 +2,8 @@ #parent: #root Method MappingUnitData ( Strings businesstypes, - GlobalOTDTable globalOTDTable + GlobalOTDTable globalOTDTable, + Strings organcodelist ) { Description: 'Get unit data from operation mapping' @@ -17,7 +18,8 @@ } else { listtodeal := selectset( globalOTDTable, Global_MappingOperation, item, // businesstypes.Difference( businesstypes.Difference( item.BusinessType().Tokenize( ", " ) ) ).Size() > 0 - businesstypes.Find( item.BusinessType() ) >= 0 + ( businesstypes.Find( item.BusinessType() ) >= 0 ) and + ( organcodelist.Find( item.OrganCode() ) >= 0 ) ); } @@ -42,12 +44,13 @@ infinite, unitofmeasurename ); - Unit::CreateOrUpdate( this, + supplyunit := Unit::CreateOrUpdate( this, "渚涘簲鍟�", "渚涘簲鍟�", "澶╅┈闆嗗洟", infinite, unitofmeasurename ); + supplyunit.IsSupplier(true); Unit::CreateOrUpdate( this, "鏁磋溅杩愯緭", -- Gitblit v1.9.3