| 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 ){ | 
|       } | 
|     //}else{ | 
|     //  info( '************###########*****************' ); | 
|     //  WebMessageBox::Information( this, '未选择任何计划进行存档' ) | 
|     //} | 
|     this.Close(); | 
|   *] | 
| } |