From aefafd2142478d4fb07d6b8b45c3047e247389e0 Mon Sep 17 00:00:00 2001
From: hongji.li <hongji.a.li@capgemini.com>
Date: 星期五, 03 十一月 2023 16:31:17 +0800
Subject: [PATCH] Merge branch 'dev' of http://47.101.211.7:10101/r/TIANMA_JITUAN into dev_lhj

---
 _Main/UI/MacroPlannerWebApp/Component_DialogCreateEditScenario/Method_OnOk.def |   26 ++++++++++++++++++++------
 1 files changed, 20 insertions(+), 6 deletions(-)

diff --git a/_Main/UI/MacroPlannerWebApp/Component_DialogCreateEditScenario/Method_OnOk.def b/_Main/UI/MacroPlannerWebApp/Component_DialogCreateEditScenario/Method_OnOk.def
index 5d283ea..fe1ca3b 100644
--- a/_Main/UI/MacroPlannerWebApp/Component_DialogCreateEditScenario/Method_OnOk.def
+++ b/_Main/UI/MacroPlannerWebApp/Component_DialogCreateEditScenario/Method_OnOk.def
@@ -6,7 +6,7 @@
   [*
     // Disabled button to prevent the possibility of multiple firing
     
-    macroPlanOld := MacroPlan;
+    //macroPlanOld := MacroPlan;
     
     btnOK.Enabled( false, '' )
     
@@ -19,18 +19,27 @@
     
     // New version
     globalotdtable := GlobalOTDTable;
+    globalotdsop := GlobalOTDSOP;
     testbusinesstype := "闆嗗洟";
     if( data.IsCreateNewVersion() ){
-      VersionControl::CreateNewSceneVersion( globalotdtable, testbusinesstype );
+      VersionControl::CreateNewSceneVersion( globalotdsop, testbusinesstype );
       }else{
-        VersionControl::CopyVersion( globalotdtable, testbusinesstype );
+        VersionControl::CopyVersion( globalotdsop, testbusinesstype );
         }
-    versionname := VersionControl::GetVersionInfo( globalotdtable, testbusinesstype ).Element( 3 );
+    versionname := VersionControl::GetVersionInfo( globalotdsop, testbusinesstype ).Element( 3 );
     
     // Get Version Name
     if( data.Name() = "" ){
       data.Name( versionname );
       }
+    
+    // Get Business Type from Scenario Name
+    businesstype := guard( select( globalotdtable, 
+                                   BusinessType, 
+                                   b, 
+                                   b.ScenarioName()=data.ScenarioName() ).BusinessTypeName(), 
+                           "" );
+    data.BusinessType( businesstype );
     
     // Copy scenario
     if( isnull( data.WrappedInstance() ) )
@@ -103,13 +112,18 @@
     }
     
     macroPlanNew := MacroPlan;
-    ManufactureLTImputation::Transfer( macroPlanOld, macroPlanNew );
+    //ManufactureLTImputation::Transfer( macroPlanOld, macroPlanNew );
     
     // sync data
     if( data.EnableSync() ) {
         MacroPlan::DoSync( macroPlanNew, 
-                           data.BusinessType(), data.IsKeyProduct(), data.CreatePurchaseSupplyMaterial() );
+                           data.BusinessType(), data.IsKeyProduct(), data.CreatePurchaseSupplyMaterial() ,GlobalOTDTable);
     }
+    macroPlanNew.BusinessType( businesstype );
+    macroPlanNew.IsKeyProduct( data.IsKeyProduct() );
+    macroPlanNew.CreatePurchaseSupplyMaterial( data.CreatePurchaseSupplyMaterial() );
+    
+    MacroPlan.UpdateStartOfPlanning( dsPlanningStart.Date().DateTime() );
     
     this.Close();
   *]

--
Gitblit v1.9.3