1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Function CalcSubscribers 
 |  { 
 |    TextBody: 
 |    [* 
 |      subscribers := ""; 
 |       
 |      if( this.NrOfSubscribers() > 0 ) 
 |      { 
 |        // Get the IDs of the calendars are subscribed to the event. 
 |        ids := selectuniquevalues( this, LeadingParticipation.Subscription.Calendar, calendar, true, calendar.CalendarID() ).Sort(); 
 |        subscribers := ids.ToString( ", " ); 
 |      } 
 |       
 |      this.Subscribers( subscribers ); 
 |    *] 
 |    InterfaceProperties { Accessibility: 'Module' } 
 |  } 
 |  
  |