lihongji
2024-10-18 b3b09d31287fc40eecc28d78575ba0bd1d8b03ea
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Quintiq file version 2.0
#parent: #root
Method DeleteObsoleteBasePeriod
{
  Description: 'Delete all obsolete period after base period synchronization (IsDeleted=true).'
  TextBody:
  [*
    // DWE2 May-10-2016 (created)
    
    // Delete all useless periods
    trash := selectset( this, Period_MP, period, period.IsDeleted()
                        or( period.IsSystemCreated()
                            and not period.IsBase()
                            and not period.IsGapPlanning() ) );
    Period_MP::Delete( trash );
  *]
}