Lai,Risheng
2023-11-02 30c02e0c981b16be0918483543f4b812956c45d4
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
Quintiq file version 2.0
#parent: #root
Method SetYearlyDaysOfMonth (
  String month_i
) id:Method_LibCal_dlgEvent_SetYearlyDaysOfMonth
{
  #keys: '[131094.0.2102177665]'
  Body:
  [*
    days := "01;02;03;04;05;06;07;08;09;10;" +
            "11;12;13;14;15;16;17;18;19;20;" +
            "21;22;23;24;25;26;27;28";
    
    nrOfMonth := this.GetNrOfMonth( month_i );
    
    if( nrOfMonth <> 2 )
    {
      days := days + ";29;30";
    }
    
    if( nrOfMonth =  1 or
        nrOfMonth =  3 or
        nrOfMonth =  5 or
        nrOfMonth =  7 or
        nrOfMonth =  8 or
        nrOfMonth = 10 or
        nrOfMonth = 12 )
    {
      days := days + ";31";
    }
    
    ssYearlyDayOfMonth.Strings( days );
  *]
}