Quintiq file version 2.0
#parent: #root
Method SetYearlyPattern (
  Date date_i
) id:Method_LibCal_dlgEvent_SetYearlyPattern
{
  #keys: '[131094.0.1706094820]'
  Body:
  [*
    weekOfMonth := "";
    dayOfWeek   := "" 
    this.GetWeekOfMonthAndDayOfWeek( date_i, weekOfMonth, dayOfWeek );  // output-arguments
    
    // Set week of month.
    ssYearlyPatternWeekOfMonth.Strings( Translations::Pattern_WeekOfMonth() );
    ssYearlyPatternWeekOfMonth.BoundValue( weekOfMonth );
    
    // Set day of week.
    ssYearlyPatternDayOfWeek.Strings( Translations::Pattern_Days() );
    ssYearlyPatternDayOfWeek.BoundValue( dayOfWeek );
    
    // Set month.
    this.SetYearlyPatternMonth( date_i.Month() );
  *]
}