Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method SetRecurrencePatternDaily ( 
 | 
  Boolean isEveryWeekday_i 
 | 
) as LibCal_Event 
 | 
{ 
 | 
  Description: 'Set a recurrence pattern that (possibly) recurs every weekday.' 
 | 
  TextBody: 
 | 
  [* 
 | 
    // Check if a new RecurrencePattern must be created. 
 | 
    pattern      := guard( this.RecurrencePattern().astype( LibCal_RecurrencePatternDaily ), null( LibCal_RecurrencePatternDaily ) ); 
 | 
    changeOfType := isnull( pattern ); 
 | 
     
 | 
    isChanged := changeOfType  // There was no pattern yet, or it was not a Daily pattern. 
 | 
              or pattern.IsEveryWeekday() <> isEveryWeekday_i; 
 | 
     
 | 
    if( isChanged ) 
 | 
    { 
 | 
      // Create the RecurrencePattern. 
 | 
      LibCal_RecurrencePatternDaily::Create( this, isEveryWeekday_i ); 
 | 
      this.IsChanged( true ); 
 | 
         
 | 
      // Initialize the RecurrencePeriod of the LeadingParticipation if necessary. 
 | 
      this.InitializeRecurrencePeriod(); 
 | 
    } 
 | 
     
 | 
    // Return this to make the API fluent. 
 | 
    return this; 
 | 
  *] 
 | 
} 
 |