yypsybs
2023-09-09 3cb5a54def670d97301f07170fcaad213bfc54f2
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
Quintiq file version 2.0
#parent: #root
Method DetermineEndDate (
  Date startDate_i,
  Number nrOfOccurrences_i
) declarative as Date
{
  TextBody:
  [*
    endDate          := Date::MinDate();
    dateOfRecurrence := this.GetDateOfFirstRecurrence( startDate_i, startDate_i );
    date             := dateOfRecurrence;
    nrOfOccurrences  := 0;
    
    while( nrOfOccurrences < nrOfOccurrences_i )
    { 
      endDate := this.GetDateOfNextOccurrence( dateOfRecurrence, date );
      nrOfOccurrences++;
    
      // Prepare for determining the next occurrence.
      date := endDate + 1;
    }
    
    return endDate;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}