| Quintiq file version 2.0 | 
| #parent: #root | 
| FunctionOverride CalcToAndFrom | 
| { | 
|   TextBody: | 
|   [* | 
|     // Calculate initial and final point | 
|      | 
|     x0 := 0; | 
|     x1 := 0; | 
|     y0 := 0; | 
|     y1 := 0; | 
|      | 
|     //OperationOutput -> PISP | 
|     rcv := this.RoutingConfiguratorView(); | 
|     if( not isnull( rcv ) ) | 
|     { | 
|       opwidth := rcv.OperationInputOutputWidth(); | 
|        | 
|       midpispheight := [Number] ( rcv.PISPHeight() / 2 ); | 
|       midopheight := [Number] ( rcv.OperationInputOutputHeight() / 2 ); | 
|      | 
|       fromop := this.OperationOutput(); | 
|       toop := this.OperationOutput(); | 
|      | 
|       if( not isnull( toop ) and not isnull( fromop ) ) | 
|       { | 
|         x0 := fromop.X() + opwidth; | 
|         y0 := fromop.Y() + midopheight; | 
|         x1 := toop.PISPNodeX(); | 
|         y1 := toop.PISPNodeY() + midpispheight; | 
|       } | 
|      | 
|     } | 
|      | 
|     // Set | 
|     this.FromX( x0 ); | 
|     this.FromY( y0 ); | 
|     this.ToX( x1 ); | 
|     this.ToY( y1 ); | 
|   *] | 
| } |