1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method AddError ( 
 |    String errorstring 
 |  ) 
 |  { 
 |    Description: 'Add error information' 
 |    TextBody: 
 |    [* 
 |      errormessage := ifexpr( this.Error().Length() > 0, 
 |                              this.Error() + String::NewLine() + errorstring, 
 |                              errorstring ); 
 |       
 |      this.Error( errormessage ); 
 |    *] 
 |  } 
 |  
  |