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 GetAllParents (
| Entitys entitys
| ) declarative remote as owning Entitys
| {
| Description: 'Given units / stocking points, return the all parents'
| TextBody:
| [*
| // TYG2 Jan-11-2017 (created)
|
| parentofstockingpoints := selectset( entitys, Elements.astype( StockingPoint_MP ).Unit, u, true, true );
| entitys := entitys.Union( parentofstockingpoints );
|
| parentofallunits := selectset( entitys, Elements.astype( Unit ).AllParent.AsParent, parent, true );
|
| return &parentofallunits;
| *]
| }
|
|
