From 5d16fa127ab2005b56ddb9c8d8c2ff1ff0f5826d Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期二, 22 十月 2024 17:47:43 +0800
Subject: [PATCH] 发动机物流成本报表导入报错处理
---
_Main/BL/Type_FinancialSalesSource/StaticMethod_InitializeNew.qbl | 16 +++++++++++-----
1 files changed, 11 insertions(+), 5 deletions(-)
diff --git a/_Main/BL/Type_FinancialSalesSource/StaticMethod_InitializeNew.qbl b/_Main/BL/Type_FinancialSalesSource/StaticMethod_InitializeNew.qbl
index 208fe2e..f4def0f 100644
--- a/_Main/BL/Type_FinancialSalesSource/StaticMethod_InitializeNew.qbl
+++ b/_Main/BL/Type_FinancialSalesSource/StaticMethod_InitializeNew.qbl
@@ -8,7 +8,9 @@
TextBody:
[*
// 鐢勫叞楦� Jun-24-2024 (created)
- owner.FinancialSalesSource( relflush );
+ traverse( owner, FinancialSalesSource, source, not source.IsImport() ){
+ source.Delete();
+ }
owner.FSImportData( relflush );
productids := construct( Strings );
allunit := FinancialSalesReport::GetDefaultAllUnit();
@@ -20,12 +22,12 @@
source := owner.FinancialSalesSource( relnew, IsImport := false, Name := FinancialSalesReport::GetDefaultName() );
table := source.FinancialSalesReport( relnew, ID := source.Name(), Name := source.Name(), IsImport := false );
- showtable := source.FinancialSalesReport( relnew, ID := source.Name() + 'Show', Name := source.Name(), IsImport := false, IsShow := true );
+ source.FinancialSalesReport( relnew, ID := source.Name() + 'Show', Name := source.Name(), IsImport := false, IsShow := true );
startofplanning := owner.StartOfPlanning().Date();
//startofyear := startofplanning.StartOfYear();
startofnextyear := startofplanning.StartOfNextYear();
- search := owner.FinancialSalesSearch( relnew, Unit := allunit, Generation := allunit, MqbMlb := allunit, Power := allunit );
+ //search := owner.FinancialSalesSearch( relnew, Unit := allunit, Generation := allunit, MqbMlb := allunit, Power := allunit );
table.GenerateColumn( owner );
@@ -131,7 +133,11 @@
// }
// }
//}
- factorys := selectset( owner, Factory, factory, factory.ID() = FinancialProductionReport::GetDefaultAllUnit() );
- showtable.Generate( search, factorys, productids );
+ excelsource := selectobject( owner, FinancialSalesSource, excelsource, excelsource.IsImport() );
+ if( not isnull( excelsource ) ){
+ excelsource.AfterImport();
+ }
+ //factorys := selectset( owner, Factory, factory, factory.ID() = FinancialProductionReport::GetDefaultAllUnit() );
+ //showtable.Generate( search, factorys, productids );
*]
}
--
Gitblit v1.9.3