Quintiq file version 2.0
|
#parent: #root
|
Method OnOK () id:Method_DialogPublishPlan_OnOK
|
{
|
#keys: '[415136.0.1255982634]'
|
Body:
|
[*
|
this.ApplyChanges();
|
|
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() );
|
ArchiveCell_ScheduleSummary::Create( MacroPlan,Archive );
|
}
|
if( cbOfflinePlanCC.Checked() ){
|
ccplannames.Add( lblOfflinePlanCC.Label() );
|
ArchiveCell_ScheduleSummary::Create( MacroPlan,Archive );
|
}
|
if( cbShiftPlan.Checked() ){
|
dlplannames.Add( lblShiftPlan.Label() );
|
ArchiveCell_ScheduleSummary::Create( MacroPlan,Archive );
|
}
|
if( cbShiftPlanCC.Checked() ){
|
ccplannames.Add( lblShiftPlanCC.Label() );
|
ArchiveCell_ScheduleSummary::Create( MacroPlan,Archive );
|
}
|
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() );
|
}
|
|
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.Replace( showlabel.Length() - 1, 1, '。' );
|
currentuser := QuintiqUser::CurrentUser().DisplayName();
|
if( WebMessageBox::Question( this, showlabel, 'OK|Cancel' ) = 0 ){
|
InterfaceDataset.PublishPlanReportData( MacroPlan,Archive, cbCustomDemand.Checked()
|
, cbCustomDemandCC.Checked()
|
, cbOfflinePlan.Checked()
|
, cbOfflinePlanCC.Checked()
|
, cbShiftPlan.Checked()
|
, cbShiftPlanCC.Checked()
|
, cbAssembleOnlinePlan.Checked()
|
, cbAssembleOnlinePlanCC.Checked()
|
, cbInventoryPlan.Checked()
|
, cbInventoryPlanCC.Checked()
|
, currentuser );
|
}
|
|
this.Close();
|
*]
|
}
|
