Quintiq file version 2.0
|
#parent: #root
|
Response OnDrop (
|
LibCal_ExplicitTimeInterval source,
|
LibCal_Calendar droprow
|
) id:Response_LibCal_gcResourceCalendars_OnDrop
|
{
|
#keys: '[131094.0.1866769921]'
|
Body:
|
[*
|
// ExplicitTimeInterval -> Row (SubscribeToEvent)
|
subscriber := droprow;
|
occurrence := source;
|
event := occurrence.Participation().Event();
|
|
if( not occurrence.Participation().IsRecurring() )
|
{
|
subscriber.SubscribeToEvent( event );
|
}
|
else
|
{
|
// Ask if only this occurrence or all occurrences should be subscribed to.
|
selection := MessageBox::Question( this, Translations::MessageBox_SubscribeToQuestion(),
|
Translations::MessageBox_SubscribeToOptions() );
|
|
if( selection = 0 )
|
{
|
subscriber.SubscribeToOccurrence( occurrence );
|
}
|
else if( selection = 1 )
|
{
|
dlg := construct( LibCal_dlgSubscription );
|
dlg.CreateSubscription( this, subscriber, occurrence.Participation().Event().LeadingParticipation() );
|
}
|
}
|
*]
|
CanBindMultiple: false
|
DefinitionID: 'Responsedef_GanttChart_OnDrop'
|
}
|
