From a8b49e963c749cbbcac029fa228d96e4056d501e Mon Sep 17 00:00:00 2001
From: admin <admin@admin.com>
Date: 星期三, 15 一月 2025 14:39:36 +0800
Subject: [PATCH] sap接口优化

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

diff --git a/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def b/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
index c2ceec4..659b1a1 100644
--- a/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
+++ b/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
@@ -8,7 +8,15 @@
     Form.ApplyChanges();
     if( WebMessageBox::Question( this, '鏄惁纭鎺ㄩ��', 'OK|Cancel' ) = 0 ){
       msg          := '';
-      loginfo      := AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, MacroPlan, 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,
+                                                               InterfaceDataset.IsPushSAP_PIR() );
       sucproduct   := selectuniquevalues( loginfo, SAPResponseLoginfo, e, e.IsSuccess(), e.Msg_v1() );
       if( sucproduct.Size() = loginfo.SAPResponseLoginfo( relsize ) ){
         WebMessageBox::Success( ApplicationMacroPlanner, '鎺ㄩ�佹垚鍔�' );

--
Gitblit v1.9.3