1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
| Quintiq file version 2.0
| #parent: #root
| StaticMethod CanMoveUpOneLevel (
| output String feedback_o,
| Units units
| ) declarative remote as Boolean
| {
| Description: 'The set of units belong to the same parent can be moved up to the parent level'
| TextBody:
| [*
| // Wayne Aug-13-2013 (created)
| if( not equal( units, Elements, unit, true, unit.ParentUnitID() ) )
| {
| feedback_o := Translations::MP_Unit_MoveUpOneLevel_HasDifferentParents();
| }
| else if( exists( units, Elements, unit, isnull( unit.Parent() ) ) )
| {
| feedback_o := Translations::MP_Unit_MoveUpOneLevel_IsRoot();
| }
| return feedback_o = '';
| *]
| }
|
|