1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| Quintiq file version 2.0
| #parent: #root
| Response OnClick () id:Response_LibCal_gcCalendar_mnuRowCreateEvent_OnClick_384
| {
| #keys: '[146730.0.1340531220]'
| CanBindMultiple: false
| DefinitionID => /Responsedef_LibCal_gcCalendar_WebMenu_OnClick
| Initiator: 'mnuRowCreateEvent'
| QuillAction
| {
| Body:
| [*
| // Create a new 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( dhCalendar.Data(), category, this.ContextMenuTime() );
| *]
| GroupServerCalls: false
| }
| }
|
|
