Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method DeleteAllCustomerOrder ( 
 | 
  MacroPlan macroplan 
 | 
) 
 | 
{ 
 | 
  TextBody: 
 | 
  [* 
 | 
    if ( not isnull( macroplan ) ) 
 | 
    { 
 | 
     customerorders := selectset( macroplan, SalesDemand.astype( CustomerOrder ), co, true ); 
 | 
     CustomerOrder::Delete( customerorders );    
 | 
       
 | 
    } 
 | 
    else 
 | 
    { 
 | 
      key := DatasetController::Find( DatasetFindOptions::Construct( this.GetUTFDatasetname() ) ); 
 | 
      if ( key.Size() =0 ) 
 | 
      { 
 | 
         wait := stream[Void]::Wait( Duration::Seconds( 10 ) ); 
 | 
         this->After( wait )->DeleteAllCustomerOrder( null( MacroPlan )) 
 | 
      } 
 | 
      else 
 | 
      {  
 | 
        opt := DatasetFindOptions::Construct( this.GetUTFDatasetname() ); 
 | 
        mp := MDSMacroPlan::Find( opt ); 
 | 
        mp->( macroplan ) 
 | 
        { 
 | 
          this.DeleteAllCustomerOrder( macroplan );   
 | 
        } 
 | 
      }  
 | 
    } 
 | 
  *] 
 | 
  InterfaceProperties { Accessibility: 'Module' } 
 | 
} 
 |