1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| Quintiq file version 2.0
| #parent: #root
| Function CalcSuggestedName
| {
| TextBody:
| [*
| parentname := '';
| if( this.TG_UIObjectAttribute().TG_UIObject() <> this.TG_UIObject() )
| {
| parentname := this.TG_UIObjectAttribute().TG_UIObject().ModeledType();
| }
|
| value := parentname + this.TG_UIObjectAttribute().CreatedName();
|
| this.SuggestedName( value );
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
