chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
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: '[131092.0.2141055217]'
  Body:
  [*
    // Daily
    edtEveryNrOfDays.Text( "1" );
    
    // Weekly
    edtEveryNrOfWeeks.Text( "1" );
    
    dayOfWeek := startDate_i.DayOfWeek();
    
         if( dayOfWeek = monday    ) { btnMonday   .IsPressed( true ); }
    else if( dayOfWeek = tuesday   ) { btnTuesday  .IsPressed( true ); }
    else if( dayOfWeek = wednesday ) { btnWednesday.IsPressed( true ); }
    else if( dayOfWeek = thursday  ) { btnThursday .IsPressed( true ); }
    else if( dayOfWeek = friday    ) { btnFriday   .IsPressed( true ); }
    else if( dayOfWeek = saturday  ) { btnSaturday .IsPressed( true ); }
    else if( dayOfWeek = sunday    ) { btnSunday   .IsPressed( 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 );
  *]
}