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
31
32
33
34
35
36
37
38
39
Quintiq file version 2.0
#parent: #root
Method InitializeRecurrencePatternAsNew (
  Date startDate_i
) id:Method_LibCal_dlgEvent_InitializeRecurrencePatternAsNew
{
  #keys: '[131094.0.1357879462]'
  Body:
  [*
    // Daily
    edtEveryNrOfDays.Text( "1" );
    
    // Weekly
    edtEveryNrOfWeeks.Text( "1" );
    
    dayOfWeek := startDate_i.DayOfWeek();
    
         if( dayOfWeek = monday    ) { btnMonday   .Pressed( true ); }
    else if( dayOfWeek = tuesday   ) { btnTuesday  .Pressed( true ); }
    else if( dayOfWeek = wednesday ) { btnWednesday.Pressed( true ); }
    else if( dayOfWeek = thursday  ) { btnThursday .Pressed( true ); }
    else if( dayOfWeek = friday    ) { btnFriday   .Pressed( true ); }
    else if( dayOfWeek = saturday  ) { btnSaturday .Pressed( true ); }
    else if( dayOfWeek = sunday    ) { btnSunday   .Pressed( true ); }
    
    // Monthly
    edtMonthlyDay.Text( [String]startDate_i.Day() );
    edtMonthlyDayEveryNrOfMonths.Text( "1" );
    
    this.SetMonthlyPattern( startDate_i );
    edtMonthlyPatternEveryNrOfMonths.Text( "1" );
    
    // Yearly
    edtEveryNrOfYears.Text( "1" );
    
    this.SetYearlyMonthAndDay( startDate_i );
    this.SetYearlyPattern( startDate_i );
  *]
}