From 0b84c9999f07bc46275f5947c4b8ebf5ce0c25cf Mon Sep 17 00:00:00 2001
From: 陈清红 <420599804@qq.com>
Date: 星期一, 14 四月 2025 15:51:58 +0800
Subject: [PATCH] BUG&优化项
---
_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def | 14 ++++++++++++--
1 files changed, 12 insertions(+), 2 deletions(-)
diff --git a/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def b/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
index c2ceec4..181cb35 100644
--- a/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
+++ b/_Main/UI/MacroPlannerWebApp/Component_DialogZEDPPSPIR/Method_OnOk.def
@@ -8,12 +8,22 @@
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(),
+ dhProducts.Data() );
sucproduct := selectuniquevalues( loginfo, SAPResponseLoginfo, e, e.IsSuccess(), e.Msg_v1() );
if( sucproduct.Size() = loginfo.SAPResponseLoginfo( relsize ) ){
WebMessageBox::Success( ApplicationMacroPlanner, '鎺ㄩ�佹垚鍔�' );
}else{
- WebMessageBox::Warning( ApplicationMacroPlanner, msg, 'Yes|No' );
+ // WebMessageBox::Warning( ApplicationMacroPlanner, msg, 'Yes|No' );
+ WebMessageBox::Success( ApplicationMacroPlanner, Translations::A_VWED_Success() );
}
}
Form.Close();
--
Gitblit v1.9.3