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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
Quintiq file version 2.0
#parent: #root
Method MPSyncOptimizerPuzzles (
  Boolean isoverwritemanualconfig,
  IOOptimizerPuzzles iooptimizerpuzzles
)
{
  Description: 'Synchronization of Optimizer puzzles for MPSync'
  TextBody:
  [*
    // Select a set of existing OptimizerPuzzle, not taking World puzzle
    existing := selectset( this, OptimizerPuzzle, op, not op.IsWorld() );
    updates := construct( OptimizerPuzzles );
    
    // Traverse the new set of valid OptimizerPuzzle, exclude World puzzle that the user import
    traverse( iooptimizerpuzzles , Elements, io, io.IsValid() and not io.Name() = OptimizerPuzzle::WorldName() )
    {
      optimizerpuzzlename := io.Name();
      // Find existing OptimizerPuzzle
      objectinstance := OptimizerPuzzle::FindOptimizerPuzzleTypeIndex( optimizerpuzzlename );
      
      // If no existing OptimizerPuzzle is found, create one
      if( isnull( objectinstance ) )
      { 
        objectinstance := OptimizerPuzzle::Create( this,
                                                   optimizerpuzzlename,
                                                   io.Description(),
                                                   false,     // isLastUsed
                                                   true,      // isFromDB
                                                   null( OptimizerPuzzleWIP ) );
      }
      // Else if the OptimizerPuzzle is not manually configured or the imported instance should overwrite manual configuration,
      // update the existing OptimizerPuzzle
      else if( not objectinstance.IsManuallyConfigured() or isoverwritemanualconfig )
      {
        // Update OptimizerPuzzle
        objectinstance.Update( optimizerpuzzlename,
                               io.Description(),
                               true ); // isFromDB
                               
        updates.Add( objectinstance );
      }
      
      // If OptimizerPuzzle is created or found, synchronize SubsetEntity
      if( not isnull( objectinstance ) )
      {
        // CustomUpdate method is extended
        objectinstance.CustomUpdate( io, isoverwritemanualconfig );
        
        // Sync subsetEntity
        this.MPSyncSubsetEntityOptimizerPuzzle( isoverwritemanualconfig, io, objectinstance );
        // Sync subsetProduct
        this.MPSyncSubsetProductOptimizerPuzzle( isoverwritemanualconfig, io, objectinstance );
      }  
    }
    
    // Get the set of old OptimizerPuzzle to be deleted
    tobedeleteset := existing.Difference( updates );
    
    // Traverse the set of OptimizerPuzzle to be deleted
    // Only delete OptimizerPuzzle that is not manually configured 
    // or the imported instance should overwrite manual configuration 
    traverse( tobedeleteset, Elements, ele,
              not ele.IsManuallyConfigured() or isoverwritemanualconfig )
    {
      ele.Delete();
    }
  *]
}