lihongji
2024-07-31 16fbcd5516b12b5a80260543f13a97706289dbe3
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Quintiq file version 2.0
#parent: #root
StaticMethod Delete (
  LibCal_ExplicitTimeIntervals timeIntervals_i
)
{
  TextBody:
  [*
    traverse( timeIntervals_i, Elements, eti ){
      leadingeti := eti.LeadingETI();
      if( leadingeti.SubscribingETI( relsize ) = 1 ){
        part     := leadingeti.Participation();
        if( part.ExplicitTimeInterval( relsize ) = 1 ){
          part.Event().Delete();
        }
        if( not isnull( leadingeti ) ){
          leadingeti.Delete();
        }
      }
      if( not isnull( leadingeti ) ){
        eti.Delete();
      }
    
    }
  *]
}