Quintiq file version 2.0
|
#parent: #root
|
Method SubscribeToEvent (
|
LibCal_Event event_i,
|
Boolean useLeadingPeriod_i
|
) as LibCal_Subscription
|
{
|
Description: 'Let the calendar subscribe to an event from another calendar.'
|
TextBody:
|
[*
|
subscription := null( LibCal_Subscription );
|
|
if( event_i.Calendar() <> this )
|
{
|
// Add the calendar as subscriber, copying over the event's original participation and recurrence period (if applicable),
|
// and registering it as subscription.
|
subscription := event_i.AddSubscriber( this, useLeadingPeriod_i );
|
}
|
else
|
{
|
LibCal_Util::Warning( "LibCal_Calendar.SubscribeToEvent() : cannot subscribe to an event from the same calendar." );
|
}
|
|
return subscription;
|
*]
|
}
|