填产问题修改 优先级因子与明细

limj

2023-09-21 1b82302cdb47f4e7d606233c52345d9b07c0de9b

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
Quintiq file version 2.0
#parent: #root
Method MPSyncRoutingStep (
  Boolean isoverwritemanualconfig,
  IORouting iorouting,
  Routing mprouting
)
{
  Description: 'Synchronization of RoutingStep for MPSync'
  TextBody:
  [*
    // Select a set of existing RoutingStep
    existing := selectset( mprouting, RoutingStep, item, true );
    updates := construct( RoutingSteps );
    
    // Traverse the new set of valid RoutingStep
    traverse( iorouting , IORoutingStep, io, io.IsValid() )
    {
      routingstepname := io.Name(); 
      routingsteptool := io.Tool();
      // Find existing RoutingStep
      objectinstance := RoutingStep::FindRoutingStepTypeIndex( mprouting.ID(), routingstepname );
      
      // If no existing RoutingStep is found, and there's valid Routing, create one
      if( not isnull( mprouting ) )
      {
        if( isnull( objectinstance ) )
        {
            objectinstance := RoutingStep::Create( mprouting, routingstepname, routingsteptool, true );
            objectinstance.SequenceNumberForExcel( io.SequenceNumberForExcel() );
        }
        // Else if the RoutingStep is not manually configured or the imported instance should overwrite manual configuration,
        // update the existing RoutingStep
        else if( not objectinstance.IsManuallyConfigured() or isoverwritemanualconfig )
        {
          // Update RoutingStep
          objectinstance.Update( io.Name(), io.Tool(), true );
          objectinstance.SequenceNumberForExcel( io.SequenceNumberForExcel() );
          
          updates.Add( objectinstance );
        }
        
        if( not isnull( objectinstance ) )
        {
          // CustomUpdate method is extended
          objectinstance.CustomUpdate( io, isoverwritemanualconfig );
        }
      }
    }
    
    // Get the set of old RoutingStep to be deleted
    tobedeleteset := existing.Difference( updates );
    
    // Traverse the set of RoutingStep to be deleted
    // Only delete RoutingStep that is not manually configured or the imported instance should overwrite manual configuration
    traverse( tobedeleteset, Elements, ele,
              not ele.IsManuallyConfigured() or isoverwritemanualconfig )
    {
      ele.Delete();
    }
  *]
}