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
| Quintiq file version 2.0
| #parent: #root
| StaticMethod CheckTolerance (
| Real tolerance
| ) declarative remote as Boolean
| {
| Description: 'Precondition method for attribute in application dialog'
| TextBody:
| [*
| feedbackobject := FeedbackObject::LocalFeedback();
|
| lb := 0;
| ub := 1;
|
| value := ( tolerance >= lb ) and ( tolerance <= ub );
|
| text := Translations::MEIO_Parameters_Between( Translations::MEIO_Parameters_Tolerance(),
| [String] lb,
| [String] ub );
|
| feedbackobject.AddHard( value, text );
|
| return feedbackobject.IsAllowed();
| *]
| }
|
|
