1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod Create ( 
 |    SupplyChainView owner, 
 |    Unit unit, 
 |    Boolean isuservisible, 
 |    Number gridx, 
 |    Number gridy, 
 |    String textcolor, 
 |    Boolean istexttop, 
 |    Boolean isnamevisible 
 |  ) as UnitNode 
 |  { 
 |    Description: 'Creates unit node' 
 |    TextBody: 
 |    [* 
 |      un := null( UnitNode ); 
 |      if( not isnull( owner ) ) 
 |      { 
 |        un := owner.UnitNode( relnew, 
 |                              Unit := unit, 
 |                              IsUserVisible := isuservisible, 
 |                              GridX := gridx, 
 |                              GridY := gridy, 
 |                              TextColor := textcolor ); 
 |       
 |      } 
 |      return un; 
 |    *] 
 |  } 
 |  
  |