Quintiq file version 2.0
|
#parent: #root
|
Method OnOK () id:Method_DialogReportArchiveConfirm_OnOK
|
{
|
#keys: '[415136.0.1248982978]'
|
Body:
|
[*
|
this.ApplyChanges();
|
|
//showlabel := '是否存档';
|
//if( cbCustomDemand.Checked()
|
// or cbOfflinePlan.Checked()
|
// or cbShiftPlan.Checked()
|
// or cbAssembleOnlinePlan.Checked()
|
// or cbInventoryPlan.Checked()
|
// or cbTRCDemand.Checked()
|
// or cbTransferPlan.Checked()
|
// or cbPackagePlan.Checked() ){
|
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() );
|
}
|
if( cbTRCDemand.Checked() ){
|
plannames.Add( lblTRCDemand.Label() );
|
}
|
if( cbTransferPlan.Checked() ){
|
plannames.Add( lblTransferPlan.Label() );
|
}
|
if( cbPackagePlan.Checked()){
|
plannames.Add( lblPackagePlan.Label() );
|
}
|
showlabel := showlabel.Concat( plannames.Concatenate( "、" ) ).Concat( '？' );
|
// info( '*****************************' );
|
if( WebMessageBox::Question( this, showlabel, 'OK|Cancel' ) = 0 ){
|
InterfaceDataset.GenerateArchiveData( MacroPlan, RecycleBin, Archive, cbCustomDemand.Checked()
|
, cbOfflinePlan.Checked()
|
, cbShiftPlan.Checked()
|
, cbAssembleOnlinePlan.Checked()
|
, cbInventoryPlan.Checked()
|
, cbTRCDemand.Checked()
|
, cbTransferPlan.Checked()
|
, cbPackagePlan.Checked() );
|
}
|
//}else{
|
// info( '************###########*****************' );
|
// WebMessageBox::Information( this, '未选择任何计划进行存档' )
|
//}
|
this.Close();
|
*]
|
}
|
