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