haorenhui
2023-10-30 6d6cc10d9e8e242661da7fd655dec155a09d676c
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
Quintiq file version 2.0
#parent: #root
StaticMethod CreateMacroPlanMessage (
  MacroPlan macroplan
)
{
  Description: 'create sanity check message for macroplan'
  TextBody:
  [*
    // desmondt Nov-10-2014 (created)
    
    invalidmp := select( macroplan, SanityCheckGroupData.InvalidMacroPlan, im, true );
    
    if( not isnull( invalidmp ) )
    {
      feedbacks := construct( Strings );
      sanitycheckfeedbacks := construct( Strings );
      
      invalidmp.DoSanityCheckData( feedbacks, sanitycheckfeedbacks );
      
      i := 0;
      traverse( feedbacks, Elements, fb )
      {
        if( not exists( invalidmp, SanityCheckMessageData, msg, msg.Description() = fb ) )
        {
          //tokenize msg to retrieve category level and seperate the actual feedback
          sanitycheckmessage := SanityCheckMessageData::Create( invalidmp.AsInvalidMacroPlan(), 
                                                                fb, 
                                                                true,
                                                                sanitycheckfeedbacks.Element( i ) );
          sanitycheckmessage.MacroPlan( relset, macroplan );
        }
        i := i + 1;
      }
    }
  *]
}