陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
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
Quintiq file version 2.0
#parent: #root
Method CalculateRemark () const declarative as String
{
  TextBody:
  [*
    // rislai Jun-18-2024 (created)
    values := construct( Strings );
    
    traverse( this.UnitPeriodTime().Unit().UnitCalendar(),Participation,participation,participation.Event().Type() = LibCal_Event::TYPE_UNAVAILABLE()){
        event := participation.Event();
        
        if( this.UnitPeriodTime().Start().Date() >= event.EarliestStart() and this.UnitPeriodTime().End().Date() <= event.LatestEnd() ){
          intervals := selectset( event,LeadingParticipation.ExplicitTimeInterval,interval,LocalTool::IsAnyDurationContained( interval.Start(),interval.End(),this.UnitPeriodTime().Start(),this.UnitPeriodTime().End()));
        
          traverse( intervals,Elements,interval){
            values.Add( interval.Participation().Event().Subject() );
          }
        }
    }
    values := selectuniquevalues( values,Elements,value,true,value );
    
    result := "";
    traverse( values,Elements,value ){
      result := result + value + ";";
    }
    
    return ifexpr( result = "",result,result.SubString( 0,result.Length() - 1 ) );
  *]
}