1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Quintiq file version 2.0
| #parent: #root
| Method ProcessColumnWeek
| {
| TextBody:
| [*
| // 甄兰鸽 Aug-1-2024 (created)
| day := this.MinWeekDate().StartOfNextWeek();
|
| while( day < this.MaxWeekDate() ){
| if( not exists( this, LibCal_SubscriberEventColumn, column, column.Period() = day and column.TimeUnit() = Translations::MP_GlobalParameters_Week() ) ){
| this.LibCal_SubscriberEventColumn( relnew, Name := day.Format( 'M/D/Y' ), Period := day, TimeUnit := Translations::MP_GlobalParameters_Week() );
| }
| day := day.StartOfNextWeek();
| }
| *]
| }
|
|
