From 9b3d8a44e8a76928b1abf2f18a74ef5051a4b089 Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期三, 21 八月 2024 14:32:24 +0800
Subject: [PATCH] 客户需求（PPA+IDS）日志添加
---
_Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateData.qbl | 42 ++++++++++++++++++++++++++++++++----------
1 files changed, 32 insertions(+), 10 deletions(-)
diff --git a/_Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateData.qbl b/_Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateData.qbl
index afb4b46..e61e4bd 100644
--- a/_Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateData.qbl
+++ b/_Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateData.qbl
@@ -3,6 +3,7 @@
StaticMethod GenerateData (
const MacroPlan macroplan,
InterfaceDataset interfaceDataset,
+ String executor,
Boolean versionflag
)
{
@@ -10,16 +11,37 @@
TextBody:
[*
// 鐢勫叞楦� Aug-20-2024 (created)
- interfaceDataset.CustomerDemandPPAIDS( relflush );
- nowdate := DateTime::ActualTime();
- traverse( macroplan, SalesDemand.astype( Forecast ), forecast ){
- interfaceDataset.CustomerDemandPPAIDS( relnew, Product := forecast.ProductID()
- , DemandDate := forecast.StartDate()
- , DemandQty := [Number]forecast.Quantity()
- , VersionName := macroplan.ScenarioName()
- , InterfaceTime := nowdate
- , VersionFlag := versionflag
- );
+ cdlast := maxobject( interfaceDataset, CustomerDemandPPAIDS, cd, cd.InterfaceTime(), cd.DemandDate(), cd.Product() );
+ if( not isnull( cdlast ) ){
+ loginfo := cdlast.InterfaceLoginfo();
+ if( not loginfo.IsShow() ){
+ loginfo.Delete();
+ }else{
+ loginfo.Last( false );
+ }
+ interfaceDataset.CustomerDemandPPAIDS( relflush );
}
+ nowdate := DateTime::ActualTime();
+ loginfo := interfaceDataset.InterfaceLoginfo( relnew, ExecuteUser := executor
+ , Name := Translations::InterfaceDataset_CustomerDemandPPAIDS_Name()
+ , InterfaceDateTime := DateTime::ActualTime()
+ , Message := '瀹㈡埛闇�姹傦紙PPA+IDS锛夋暟鎹帹閫�'
+ , IsShow := false
+ , Last := true
+ , ReturnSuccess := true
+ , ReturnMsg := 'Success'
+ , Success := true
+ );
+ traverse( macroplan, SalesDemand.astype( Forecast ), forecast ){
+ cd :=interfaceDataset.CustomerDemandPPAIDS( relnew, Product := forecast.ProductID()
+ , DemandDate := forecast.StartDate()
+ , DemandQty := [Number]forecast.Quantity()
+ , VersionName := macroplan.ScenarioName()
+ , InterfaceTime := nowdate
+ , VersionFlag := versionflag
+ );
+ loginfo.CustomerDemandPPAIDS( relinsert, cd );
+ }
+ loginfo.TotalRow( loginfo.CustomerDemandPPAIDS( relsize ) );
*]
}
--
Gitblit v1.9.3