temp

yypsybs

2023-09-07 82fbb0b3f3b20241315b13893abf36872fb921c0

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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Quintiq file version 2.0
#parent: #root
FunctionOverride CalcToAndFrom
{
  TextBody:
  [*
    // Calculate initial and final point
    x0 := 0;
    x1 := 0;
    y0 := 0;
    y1 := 0;
    
    rcv := this.RoutingConfiguratorView();
    if( not isnull( rcv ) )
    {
      xmid := [Number](rcv.OperationInputOutputWidth() / 2);
    
      fromop := this.OperationOutput();
      toop := this.OperationInput();
    
      if( not isnull( toop ) and not isnull( fromop ) )
      {
        x0 := fromop.X() + xmid;
        y0 := fromop.Y() + rcv.OperationInputOutputHeight();
        x1 := toop.X() + xmid;
        y1 := toop.Y();
    
        if( toop.IsElementOfInputGroup() )
        {
          xminimid := [Number](toop.MinWidth() / 2);
    
          // Taken care of by the If-stmt. No need to guard for null operation input group.
          x1 := toop.MinX() + xminimid;
          y1 := toop.OperationInputGroup().Y();
        }
    
    
      }
    }
    
    // Set
    this.FromX( x0 );
    this.FromY( y0 );
    this.ToX( x1 );
    this.ToY( y1 );
  *]
}