Merge branch 'test'

haorenhui

2023-10-25 a5530f694660a51af01c7d9fc6e7453c2286309d

1
2
3
4
5
6
7
8
9
10
11
Quintiq file version 2.0
#parent: #root
Function CalcHasTool
{
  TextBody:
  [*
    value := this.Tool().Length() > 0; 
    this.HasTool( value );
  *]
  InterfaceProperties { Accessibility: 'Module' }
}