Merge remote-tracking branch 'origin/dev' into dev

lihongji

2024-07-31 8801592d280ff58beb5677a86c263f7c05c0b7c0

 _Main/BL/Type_LibCal_ExplicitTimeInterval/StaticMethod_Delete.qbl

@@ -18,9 +18,13 @@
        }
      }
      if( not isnull( leadingeti ) ){
        eti.Delete();
        subscription := selectobject( eti, Participation.Event.LeadingParticipation.Subscription, subscription, subscription.Calendar().CalendarID() = eti.Participation().Calendar().CalendarID() );
        if( subscription.ExplicitTimeInterval( relsize ) = 1 ){
          subscription.Delete();
        }else{
          eti.Delete();
        }
      }
    
    }
  *]
}