1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method CleanupSnapshots 
 |  { 
 |    Description: 
 |    [* 
 |      Will auto delete snapshots if the run has more than `LibOpt_Optimizer.MaxNrOfSnapshotsPerRun`. 
 |      Starts with oldest leaf snapshot and goes backup the chain 
 |    *] 
 |    TextBody: 
 |    [* 
 |      // benlong Mar-8-2022 (created) 
 |      if( this.IsAutoCleanupSnapshots() and this.Snapshot( relsize ) > this.Optimizer().MaxNrOfSnapshotsPerRun() ) 
 |      { 
 |        nr_to_delete := this.Snapshot( relsize ) - this.Optimizer().MaxNrOfSnapshotsPerRun(); 
 |        this.RecursiveDeleteSnapshots( this.FirstSnapshot(), nr_to_delete ); 
 |      } 
 |    *] 
 |  } 
 |  
  |