From 7c445b476a69ee8083a0e5733565e13dc8c0d109 Mon Sep 17 00:00:00 2001 From: lazhen <17772815105@139.com> Date: 星期四, 14 十一月 2024 14:19:07 +0800 Subject: [PATCH] 计划下发界面区分工厂 --- _Main/UI/MacroPlannerWebApp/Component_DialogPublishPlan/Method_OnOK.def | 73 +++++++++++++++++++++++++----------- 1 files changed, 51 insertions(+), 22 deletions(-) diff --git a/_Main/UI/MacroPlannerWebApp/Component_DialogPublishPlan/Method_OnOK.def b/_Main/UI/MacroPlannerWebApp/Component_DialogPublishPlan/Method_OnOK.def index e0d5650..2e5f44c 100644 --- a/_Main/UI/MacroPlannerWebApp/Component_DialogPublishPlan/Method_OnOK.def +++ b/_Main/UI/MacroPlannerWebApp/Component_DialogPublishPlan/Method_OnOK.def @@ -7,34 +7,63 @@ [* this.ApplyChanges(); - showlabel := '鏄惁鍙戦��'; - plannames := construct( Strings ); - if( cbCustomDemand.Checked() ){ - plannames.Add( lblCustomDemand.Label() ); - } - if( cbOfflinePlan.Checked() ){ - plannames.Add( lblOfflinePlan.Label() ); - } - if( cbShiftPlan.Checked() ){ - plannames.Add( lblShiftPlan.Label() ); - } - if( cbAssembleOnlinePlan.Checked() ){ - plannames.Add( lblAssembleOnlinePlan.Label() ); - } - if( cbInventoryPlan.Checked() ){ - plannames.Add( lblInventoryPlan.Label() ); - } + showlabel := '鏄惁鍙戦��'; + dlplannames := construct( Strings ); + ccplannames := construct( Strings ); + if( cbCustomDemand.Checked() ){ + dlplannames.Add( lblCustomDemand.Label() ); + } + if( cbCustomDemandCC.Checked() ){ + ccplannames.Add( lblCustomDemandCC.Label() ); + } + if( cbOfflinePlan.Checked() ){ + dlplannames.Add( lblOfflinePlan.Label() ); + } + if( cbOfflinePlanCC.Checked() ){ + ccplannames.Add( lblOfflinePlanCC.Label() ); + } + if( cbShiftPlan.Checked() ){ + dlplannames.Add( lblShiftPlan.Label() ); + } + if( cbShiftPlanCC.Checked() ){ + ccplannames.Add( lblShiftPlanCC.Label() ); + } + if( cbAssembleOnlinePlan.Checked() ){ + dlplannames.Add( lblAssembleOnlinePlan.Label() ); + } + if( cbAssembleOnlinePlanCC.Checked() ){ + ccplannames.Add( lblAssembleOnlinePlanCC.Label() ); + } + if( cbInventoryPlan.Checked() ){ + dlplannames.Add( lblInventoryPlan.Label() ); + } + if( cbInventoryPlanCC.Checked() ){ + ccplannames.Add( lblInventoryPlanCC.Label() ); + } - showlabel := showlabel.Concat( plannames.Concatenate( "銆�" ) ).Concat( '锛�' ); - currentuser := QuintiqUser::CurrentUser().DisplayName(); - if( WebMessageBox::Question( this, showlabel, 'OK|Cancel' ) = 0 ){ - InterfaceDataset.PublishPlanReportData( MacroPlan, cbCustomDemand.Checked() + dlshowname := '澶ц繛宸ュ巶鐨�'; + if( dlplannames.Size() > 0 ){ + showlabel := showlabel.Concat( dlshowname.Concat( dlplannames.Concatenate( "銆�" ) ) ).Concat( "锛�"); + } + ccshowname := '闀挎槬宸ュ巶鐨�'; + if( ccplannames.Size() > 0 ){ + showlabel := showlabel.Concat( ccshowname.Concat( ccplannames.Concatenate( "銆�" ) ) ).Concat( "锛�"); + } + showlabel := showlabel.Concat( '銆�' ); + currentuser := QuintiqUser::CurrentUser().DisplayName(); + if( WebMessageBox::Question( this, showlabel, 'OK|Cancel' ) = 0 ){ + InterfaceDataset.PublishPlanReportData( MacroPlan, cbCustomDemand.Checked() + , cbCustomDemandCC.Checked() , cbOfflinePlan.Checked() + , cbOfflinePlanCC.Checked() , cbShiftPlan.Checked() + , cbShiftPlanCC.Checked() , cbAssembleOnlinePlan.Checked() + , cbAssembleOnlinePlanCC.Checked() , cbInventoryPlan.Checked() + , cbInventoryPlanCC.Checked() , currentuser ); - } + } this.Close(); *] -- Gitblit v1.9.3