Quintiq file version 2.0
|
#parent: #root
|
Response OnClick () id:Response_LibCal_gcCalendar_mnuNewEvent_OnClick
|
{
|
#keys: '[131094.1.1224529824]'
|
Body:
|
[*
|
// Create an event - no row selected.
|
// Use the last EventCategory (assuming they are sorted by Name).
|
category := selectsortedset( dhEventCategories.Data(), Elements, cat, true, cat.Name() ).Last();
|
|
LibCal_GlobalState.CreateEvent( this, dhCalendar.Data(), category, this.ContextMenuTime() );
|
*]
|
CanBindMultiple: false
|
DefinitionID => /Responsedef_LibCal_gcCalendar_Menu_OnClick
|
Initiator: 'mnuNewEvent'
|
Precondition:
|
[*
|
feedback := Translations::Calendar_DoesNotExist();
|
return not isnull( dhCalendar.Data() );
|
*]
|
}
|