yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
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
Method SetAlwaysAvailableAsDefault () as LibCal_CalendarRegistry
{
  Description:
  [*
    Set event "Always available" as default, which means that all new calendars will automatically subscribe to it.
    Note that this is discouraged; the calendars should ideally start closed, i.e. with no capacity available, and events should be used explicitly to make capacity available.
  *]
  TextBody:
  [*
    event := guard( this.CommonCalendar().GetEvent( LibCal_Event::ALWAYS_AVAILABLE() ), null( LibCal_Event ) );
    
    if( not isnull( event ) )
    {
      event.SetIsDefault( true );
    }
    
    return this;
  *]
}