Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Response OnClick ( 
 | 
  Object row 
 | 
) id:Response_LibCal_gcCalendar_mnuRowCreateEvent_OnClick 
 | 
{ 
 | 
  #keys: '[146730.0.1530122109]' 
 | 
  CanBindMultiple: false 
 | 
  DefinitionID => /Responsedef_LibCal_gcCalendar_WebMenu_OnClick 
 | 
  Initiator: 'mnuRowCreateEvent' 
 | 
  QuillAction 
 | 
  { 
 | 
    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( dhCalendar.Data(), category, this.ContextMenuTime() ); 
 | 
    *] 
 | 
    GroupServerCalls: false 
 | 
  } 
 | 
} 
 |