From 9c9638c18c5098cd429a39723de7c095c14aa360 Mon Sep 17 00:00:00 2001
From: renhao <renhui.hao@capgemini.com>
Date: 星期一, 25 九月 2023 22:12:09 +0800
Subject: [PATCH] 供应商unit

---
 _Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl b/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl
index eeb6a49..e826ddb 100644
--- a/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl
+++ b/_Main/BL/Type_MacroPlan/Method_MappingUnitData.qbl
@@ -42,12 +42,13 @@
                           infinite, 
                           unitofmeasurename );
     
-    Unit::CreateOrUpdate( this, 
+    supplyunit := Unit::CreateOrUpdate( this, 
                           "渚涘簲鍟�", 
                           "渚涘簲鍟�", 
                           "澶╅┈闆嗗洟", 
                           infinite, 
                           unitofmeasurename );
+    supplyunit.IsSupplier(true);
     
     Unit::CreateOrUpdate( this, 
                           "鏁磋溅杩愯緭", 

--
Gitblit v1.9.3