1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod Event_UsePartialCapacity ( 
 |    String type_i, 
 |    Real capacity_i 
 |  ) as String 
 |  { 
 |    TextBody: 
 |    [* 
 |      msg := ""; 
 |       
 |      type := type_i.TrimBoth(); 
 |      if( type = LibCal_Event::TYPE_PARTIAL() and  
 |          not LibCal_Event::USE_PARTIAL_CAPACITY() ) 
 |      { 
 |        msg := "Type '" + type + "' is not allowed, because partial capacity is not enabled. Type will be changed to '" 
 |             + ifexpr( capacity_i = 0.0, LibCal_Event::TYPE_UNAVAILABLE(), LibCal_Event::TYPE_AVAILABLE() ) + "'"; 
 |      } 
 |       
 |      return msg; 
 |    *] 
 |    InterfaceProperties { Accessibility: 'Module' } 
 |  } 
 |  
  |