陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
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
Quintiq file version 2.0
#parent: #root
Method CreateUpdateSetInterest (LibDMF_Set set_i) as LibDMF_SetInterest
{
  Description:
  [*
    Logic to check if a set interest exists before creating/updating it
    1) We handle checking logic here as it minimizes the risk of forgetting to check if an instance exists before creating it
    2) Instance exists checking is not done in static create as it violates model metrics
  *]
  TextBody:
  [*
    // Timothy Guan Jul-7-2015 (created)
    
    si := LibDMF_SetInterest::FindSetInterest( set_i.ID(),
                                               this.QProductName(),
                                               this.SystemName() );
    
    if( isnull( si ) )
    {
      si := LibDMF_SetInterest::Create( this, set_i );
    }
    
    // Set default values
    si.Update( true );
    
    return si;
  *]
}