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