Quintiq file version 2.0
|
#parent: #root
|
Method RemoveOccurrencesAfter (
|
Date date_i
|
)
|
{
|
Description: 'Remove occurrences after a certain date.'
|
TextBody:
|
[*
|
timezone := this.Calendar().GetTimeZone();
|
|
// Based on the date of the LeadingParticipation.
|
occurences := selectset( this, ExplicitTimeInterval, eti,
|
eti.LeadingETI().Start().Date( timezone ) > date_i );
|
|
deleteSubscriptionAllowed := false;
|
LibCal_ExplicitTimeInterval::Delete( occurences, deleteSubscriptionAllowed );
|
*]
|
InterfaceProperties { Accessibility: 'Module' }
|
}
|
