1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| Quintiq file version 2.0
| #parent: #root
| StaticMethod AssignParents (
| Units children,
| Unit parent
| )
| {
| Description: 'Assign a set of units as children of one unit'
| TextBody:
| [*
| // desmondt Jul-2-2015 (modified)
| traverse( children, Elements, child,
| child <> parent
| and child.Parent() <> parent )
| {
| child.AssignParent( parent );
| }
| *]
| }
|
|
