From 56fd7e8181fa8db461333e0451cbabbf03f290f9 Mon Sep 17 00:00:00 2001
From: yypsybs <yypsybs@foxmail.com>
Date: 星期三, 27 九月 2023 16:40:23 +0800
Subject: [PATCH] Merge remote-tracking branch 'origin/dev' into dev

---
 _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