From 5ef66da459a5a313477ccc62ddb2e26cac6f42ba Mon Sep 17 00:00:00 2001
From: xiaoding721 <33130084+xiaoding721@users.noreply.github.com>
Date: 星期四, 22 八月 2024 17:00:51 +0800
Subject: [PATCH] 修复六位码匹配不上不警告的bug

---
 _Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl |    3 +++
 _Main/BL/Type_Archive/StaticMethod_Success.qbl            |    6 +++++-
 _Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl   |    2 +-
 3 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl b/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl
index 0b65024..a363c8e 100644
--- a/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl
+++ b/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl
@@ -14,7 +14,7 @@
     traverse ( archiveExecutionStatus, TemporaryDemandData, tdd ,tdd.Origin() = "" or tdd.StartDate() >= macroPlan.StartOfPlanning().Date()) {
       targetProduct_MP       := select( macroPlan, Product_MP, tempPMP, tempPMP.ID() = tdd.ProductID() );
       targetStockingPoint_MP := select( macroPlan, StockingPoint_MP, tempSPMP, tempSPMP.ID() = tdd.StockingPointID() );
-      info( tdd.SalesSegmentName() );
+      // info( tdd.SalesSegmentName() );
       if ( not isnull( targetProduct_MP ) and not isnull( targetStockingPoint_MP ) ) {
         forcest := Forecast::Create( targetProduct_MP,
                           targetStockingPoint_MP,
diff --git a/_Main/BL/Type_Archive/StaticMethod_Success.qbl b/_Main/BL/Type_Archive/StaticMethod_Success.qbl
index 5844f72..2e39f8a 100644
--- a/_Main/BL/Type_Archive/StaticMethod_Success.qbl
+++ b/_Main/BL/Type_Archive/StaticMethod_Success.qbl
@@ -23,7 +23,11 @@
       archiveExecutionStatus.AES_TemporaryDemandData().Source().FlatQuery( "truncate table A_Forecasts" );
       
       // 杩斿洖鎴愬姛娑堟伅
-      RequirementImportExecutionStatus::Create( archiveExecutionStatus, code, "Complete", userName, Translations::A_VWED_RequirementImportSuccessful(), true );
+      if( message <> ''){
+        RequirementImportExecutionStatus::Create( archiveExecutionStatus, code, "Complete", userName, message, true );
+      }else{
+        RequirementImportExecutionStatus::Create( archiveExecutionStatus, code, "Complete", userName, Translations::A_VWED_RequirementImportSuccessful(), true );
+      }
     } else {
       RequirementImportExecutionStatus::Create( archiveExecutionStatus, code, "Complete", userName, message, false );
     }
diff --git a/_Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl b/_Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl
index cbf8db1..5e58ffd 100644
--- a/_Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl
+++ b/_Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl
@@ -8,6 +8,9 @@
   TextBody:
   [*
     // Akari Aug-21-2024 (created)
+    owner.DispatchShiftPlan( relflush );
+    owner.RB_DispatchShiftPlanBroker().Source().FlatQuery( "truncate table A_DispatchShiftPlan" );
+    
     now := DateTime::Now();
     macroPlanName := macroPlan.MDSMacroPlan().Description();
     traverse( macroPlan,Unit.UnitPeriod.astype( UnitPeriodTime ).ShiftPlan,shiftPlan ){

--
Gitblit v1.9.3