admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Quintiq file version 2.0
#parent: #root
Method CreateEvent (
  internal[GUIComponent] parent_i,
  LibCal_Calendar owner_i,
  LibCal_EventCategory category_i,
  DateTime contextMenuTime_i
) as LibCal_Event id:Method_LibCal_GlobalState_CreateEvent_184
{
  #keys: '[146730.0.1353182528]'
  Body:
  [*
    // Create a new Event.
    event := null( LibCal_Event );
    
    // Use the time if possible.
    if( contextMenuTime_i.IsFinite() )
    {
      start := LibCal_GlobalState.DetermineStartOfEvent( contextMenuTime_i, owner_i.GetTimeZone() );
      end   := LibCal_GlobalState.DetermineEndOfEvent( start );
      event := LibCal_GlobalState.CreateEvent( parent_i, owner_i, category_i, start, end );
    }
    else
    {
      event := LibCal_GlobalState.CreateEvent( this, owner_i, category_i );
    }
    
    return event;
  *]
}