admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
Quintiq file version 2.0
#parent: #root
Method MPSyncUnitCalendarElement (
  Boolean isoverwitemanualconfig,
  IOUnitCalendarElements iounitcalendarelements
)
{
  Description: 'Synchronization of UnitCalendarElement for MPSync'
  TextBody:
  [*
    // Select a set of existing UnitCalendarElement
    existing := selectset( this, Unit.UnitCalendarElement, item, true );
    updates := construct( UnitCalendarElements );
    
    // Traverse the new set of valid UnitCalendarElement
    traverse( iounitcalendarelements , Elements, io, io.IsValid() )
    {
      // Find existing UnitCalendarElement
      objectinstance := UnitCalendarElement::FindUnitCalendarElementTypeIndex( io.UnitID(), io.Start(), io.End() );
      // Find existing Unit
      unit := this.FindUnit( io.UnitID() );
      
      // If no existing UnitCalendarElement is found, create one
      if( isnull( objectinstance ) )
      {
        // Check if there's valid Unit
        if( not isnull( unit ) )
        {
          objectinstance := UnitCalendarElement::Create( unit,
                                                         io.Start(),
                                                         io.End(),
                                                         io.Capacity(),
                                                         io.Description(),
                                                         true  ); 
        }
      }
      // Else if the UnitCalendarElement is not manually configured or the imported instance should overwrite manual configuration,
      // update the existing UnitCalendarElement
      else if( not objectinstance.IsManuallyConfigured() or isoverwitemanualconfig )
      {
        // Update UnitCalendarElement
        objectinstance.Update( io.Capacity(), io.Description(),true  );
        updates.Add( objectinstance );
      }
    }
    
    // Get the set of old UnitCalendarElement to be deleted
    tobedeleteset := existing.Difference( updates );
    
    // Traverse the set of UnitCalendarElement to be deleted
    // Only delete UnitCalendarElement that is not manually configured or the imported instance should overwrite manual configuration
    traverse( tobedeleteset, Elements, ele, not ele.IsManuallyConfigured() or isoverwitemanualconfig)
    {
      ele.Delete();
    }
  *]
}