hongji.li
2023-11-03 aefafd2142478d4fb07d6b8b45c3047e247389e0
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
Quintiq file version 2.0
#parent: #root
Method GetHasSameExcludeFromOptimizer (
  Strings feedback_o,
  Strings sanitycheckfeedback_o
) declarative remote as Boolean
{
  Description: 'Check whether all the productss in the input set has same IsExcludeFromOptimizer value'
  TextBody:
  [*
    // cye1 Nov-14-2016 (created)
    isvalid := true;
    
    numberofexclude := counter( this, 
                                OperationInput.ProductInStockingPoint_MP.Product_MP, 
                                p, 
                                p.IsExcludedFromOptimization() );
    
    numberofinput := this.OperationInput( relsize )
    different := numberofinput - numberofexclude;
    
    isvalid := ( different = numberofinput ) or ( different =0 );
                                
                       
    if( not isnull( feedback_o ) and not isvalid )
    {
      instance := Translations::MP_OperationInputSet_Instance( this.Name(), this.Operation().Name() );
      message :=  Translations::MP_OperationInputSet_ViolateHasSameExcludeFromOptimizer()
      feedback_o.Add( SanityCheckMessage::GetFormattedMessage( instance, message ) );
      sanitycheckfeedback_o.Add( SanityCheckCategoryLevel::GetSanityCheckCategoryDataIssue() );
    }
                    
    return isvalid;
  *]
}