hongjli
2023-09-13 5cca3f17019ad86a7c09de1e3d4947d52dff9667
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 );
  *]
}