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