From 86762e6696b38e9ac9dc03d2cee5044592623f5e Mon Sep 17 00:00:00 2001
From: administrator <administrator@administrator.com>
Date: 星期二, 16 七月 2024 18:13:35 +0800
Subject: [PATCH] 添加IDS标识列
---
_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl b/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl
index ec7b503..4f22293 100644
--- a/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl
+++ b/_Main/BL/Type_Archive/StaticMethod_GenerateForecast.qbl
@@ -16,7 +16,7 @@
targetStockingPoint_MP := select( macroPlan, StockingPoint_MP, tempSPMP, tempSPMP.ID() = tdd.StockingPointID() );
info( tdd.SalesSegmentName() );
if ( not isnull( targetProduct_MP ) and not isnull( targetStockingPoint_MP ) ) {
- Forecast::Create( targetProduct_MP,
+ forcest := Forecast::Create( targetProduct_MP,
targetStockingPoint_MP,
[String]tdd.ID(),
tdd.StartDate(),
@@ -31,6 +31,7 @@
false,
false
);
+ forcest.Origin( tdd.Origin() );
}
}
*]
--
Gitblit v1.9.3