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/UI/MacroPlannerWebApp/Component_FrmOrderForecast/Response_OnCreated.def |   10 ++++++----
 1 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/_Main/UI/MacroPlannerWebApp/Component_FrmOrderForecast/Response_OnCreated.def b/_Main/UI/MacroPlannerWebApp/Component_FrmOrderForecast/Response_OnCreated.def
index 5cb899a..700b61d 100644
--- a/_Main/UI/MacroPlannerWebApp/Component_FrmOrderForecast/Response_OnCreated.def
+++ b/_Main/UI/MacroPlannerWebApp/Component_FrmOrderForecast/Response_OnCreated.def
@@ -9,13 +9,15 @@
   {
     Body:
     [*
-      // 鍒濆鍖栨煡璇㈠弬鏁版湀浠�
-      ds_Month_FOF.Date(Date::ActualDate());
       // 鍒濆鍖栭娴嬫暟鎹�
-      JResult := H_FunctionClass::SM_InitialForcastData( MacroPlan);
+      JResult := H_FunctionClass::SM_InitialForcastDataEx( MacroPlan,true,"-");
       if(not JResult.Get( "Status").GetBoolean())
       {
-          WebMessageBox::Warning( JResult.Get( "Msg").GetString());
+        WebMessageBox::Warning( JResult.Get( "Msg").GetString());
+      }
+      else
+      {
+        WebMessageBox::Information( JResult.Get( "Msg").GetString());
       }
     *]
     GroupServerCalls: false

--
Gitblit v1.9.3