From 8afe90b633046db39042aada36b88193062f8cff Mon Sep 17 00:00:00 2001
From: lazhen <17772815105@139.com>
Date: 星期四, 09 一月 2025 15:52:35 +0800
Subject: [PATCH] 机加管线报表库存计算参数入场离场数量计算

---
 _Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def b/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
index e65ea3c..c2ceec4 100644
--- a/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
+++ b/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
@@ -8,7 +8,7 @@
     Form.ApplyChanges();
     if( WebMessageBox::Question( this, '鏄惁纭鎺ㄩ��', 'OK|Cancel' ) = 0 ){
       msg          := '';
-      loginfo      := AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, ddslFactory.Text(), efVersion.Text(), dsStartDate.Date(), dsEndDate.Date(), QuintiqUser::CurrentUser().DisplayName(), msg );
+      loginfo      := AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, MacroPlan, ddslFactory.Text(), efVersion.Text(), dsStartDate.Date(), dsEndDate.Date(), QuintiqUser::CurrentUser().DisplayName(), msg );
       sucproduct   := selectuniquevalues( loginfo, SAPResponseLoginfo, e, e.IsSuccess(), e.Msg_v1() );
       if( sucproduct.Size() = loginfo.SAPResponseLoginfo( relsize ) ){
         WebMessageBox::Success( ApplicationMacroPlanner, '鎺ㄩ�佹垚鍔�' );

--
Gitblit v1.9.3