Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Response OnClick ( 
 | 
  Object row 
 | 
) id:Response_LibCal_gcCalendar_mnuRowNewEvent_OnClick 
 | 
{ 
 | 
  #keys: '[131094.0.605214145]' 
 | 
  Body: 
 | 
  [* 
 | 
    // Create a new event. 
 | 
    // The row is either an EventCategory or a Participation. 
 | 
    category := ifexpr( row.istype( LibCal_EventCategory ), row.astype( LibCal_EventCategory ), 
 | 
                                                            row.astype( LibCal_Participation ).Event().EventCategory() ); 
 | 
                                                             
 | 
    LibCal_GlobalState.CreateEvent( this, dhCalendar.Data(), category, this.ContextMenuTime() ); 
 | 
  *] 
 | 
  CanBindMultiple: false 
 | 
  DefinitionID => /Responsedef_LibCal_gcCalendar_Menu_OnClick 
 | 
  Initiator: 'mnuRowNewEvent' 
 | 
  Precondition: 
 | 
  [* 
 | 
    feedback := Translations::Calendar_DoesNotExist(); 
 | 
    return not isnull( dhCalendar.Data() ); 
 | 
  *] 
 | 
} 
 |