Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method ValuesPeriodOK () as Boolean id:Method_LibCal_dlgEvent_ValuesPeriodOK 
 | 
{ 
 | 
  #keys: '[131094.0.1653645720]' 
 | 
  Body: 
 | 
  [* 
 | 
    feedback   := FeedbackObject::LocalFeedback(); 
 | 
    periodKind := "recurrence"; 
 | 
     
 | 
    if( datStartOfPeriod.Date().IsInfinite() ) 
 | 
    { 
 | 
      feedback.AddHard( Translations::Period_InvalidStartOfPeriod( periodKind ) ); 
 | 
    } 
 | 
     
 | 
    if( ckbEndAfter.Checked() and 
 | 
        guard( [Number]edtNrOfOccurrences.Text(), 0 ) = 0 ) 
 | 
    { 
 | 
      feedback.AddHard( Translations::Period_InvalidNrOfOccurrences() ); 
 | 
    } 
 | 
     
 | 
    if( ckbEndBy.Checked() and 
 | 
        datEndOfPeriod.Date().IsInfinite() ) 
 | 
    { 
 | 
      feedback.AddHard( Translations::Period_InvalidEndOfPeriod( periodKind ) ); 
 | 
    } 
 | 
     
 | 
    return feedback.IsAllowed(); 
 | 
  *] 
 | 
} 
 |