1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod DeleteAllShownMessages ( 
 |    MacroPlan macroplan 
 |  ) 
 |  { 
 |    Description: 'Delete all message which has IsShown = true' 
 |    TextBody: 
 |    [* 
 |      // deleting the shown message, excluding the ignored message 
 |      // deleting all fixed-ignored message, both ignored/unignored 
 |      traverse( macroplan, SanityCheckGroup.SanityCheckMessage, scm, 
 |                scm.IsValid() 
 |                or scm.IsShown() ) 
 |      {               
 |        scm.Delete(); 
 |      } 
 |    *] 
 |  } 
 |  
  |