yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
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
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
Quintiq file version 2.0
#parent: #root
Method MPSyncCampaign_MP (
  Boolean isoverwritemanualconfig,
  IOCampaign_MPs iocampaign_mps
)
{
  Description: 'Synchronization of Campaign_MP for MPSync'
  TextBody:
  [*
    // Select a set of existing Campaign_MP
    existing := selectset( this, Unit.Campaign_MP, item, true );
    updates := construct( Campaign_MPs );
    tobereset := construct( Campaign_MPs );
    
    // Traverse the new set of valid Campaign_MP
    traverse( iocampaign_mps , Elements, io, io.IsValid() )
    {
      // Find existing Campaign_MP
      objectinstance := Campaign_MP::FindCampaignTypeIndex( io.UnitID(), io.CampaignID() );
      //Find existing Unit
      unit := Unit::FindUnitTypeIndex( io.UnitID() );
      // Find existing CampaignType_MP
      campaigntype := CampaignType_MP::FindCampaignTypeTypeIndex( io.CampaignTypeName(), io.UnitID() );
      
      // If no existing Campaign_MP is found and the Unit is found, create one
      if( isnull( objectinstance ) )
      {
        if( not isnull( campaigntype ) and not isnull( unit ) )
        {
          objectinstance := Campaign_MP::Create( unit,
                                                 io.EarliestStart(),
                                                 io.Duration(),
                                                 io.SequenceNumber(),
                                                 io.MinQuantity(),
                                                 io.MaxQuantity(),
                                                 io.MinDuration(),
                                                 io.MaxDuration(),
                                                 campaigntype.Name(),
                                                 io.CampaignID(),
                                                 io.Comment(),
                                                 io.HasInputMaxQuantity(),
                                                 io.HasInputMaxDuration(),
                                                 true );
        }
      }
      // Else if the Campaign_MP is not manually configured or the imported instance should overwrite manual configuration,
      // update the existing Campaign_MP
      else if( not objectinstance.IsManuallyConfigured() or isoverwritemanualconfig )
      {
        // Update Campaign_MP
        if( not isnull( campaigntype ) and not isnull( unit) )
        {
          if( objectinstance.SequenceNumberForExcel() <> io.SequenceNumber() )
          {
            tobereset.Add( objectinstance );  
          }
          objectinstance.Update( unit,
                                 io.EarliestStart(),
                                 io.Duration(),
                                 io.SequenceNumber(),
                                 io.MinQuantity(),
                                 io.MaxQuantity(),
                                 io.MinDuration(),
                                 io.MaxDuration(),
                                 campaigntype.Name(),
                                 io.CampaignID(),
                                 io.Comment(),
                                 io.HasInputMaxQuantity(),
                                 io.HasInputMaxDuration(),
                                 true )
          updates.Add( objectinstance );
        }
      }
      
      if( not isnull( objectinstance ) )
      {
        objectinstance.CustomUpdate( io, isoverwritemanualconfig );  
      }
    }
    
    if( tobereset.Size() > 0 )
    {
      Unit::ResetAndDeletePeriodTasks( tobereset );
    }
    // Get the set of old Campaign_MP to be deleted
    tobedeleteset := existing.Difference( updates );
    
    // Traverse the set of Campaign_MP to be deleted
    // Only delete Campaign_MP that is not manually configured or the imported instance should overwrite manual configuration
    traverse( tobedeleteset, Elements, ele,
              not ele.IsManuallyConfigured() or isoverwritemanualconfig )
    {
      ele.Delete();
    }
  *]
}