lazhen
2025-01-09 8afe90b633046db39042aada36b88193062f8cff
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Quintiq file version 2.0
#parent: #root
Method ValuesWeeklyPatternOK () as Boolean id:Method_LibCal_dlgEvent_ValuesWeeklyPatternOK
{
  #keys: '[131092.1.1299579]'
  Body:
  [*
    feedback := FeedbackObject::LocalFeedback();
    
    if( btnWeekly.IsPressed()
        and not btnMonday   .IsPressed()
        and not btnTuesday  .IsPressed()
        and not btnWednesday.IsPressed()
        and not btnThursday .IsPressed()
        and not btnFriday   .IsPressed()
        and not btnSaturday .IsPressed()
        and not btnSunday   .IsPressed() )
    {
      feedback.AddHard( Translations::Pattern_Weekly_NoDaySelected() );
    }
    
    return feedback.IsAllowed();
  *]
}