Quintiq file version 2.0
#parent: CustomDrawRC/CustomDrawDataLayerOperationInputGroupEdge
Response OnDrawObject (
  OperationInputGroupEdge object
) id:Response_CustomDrawRC_CustomDrawDataLayerOperationInputGroupEdge_OnDrawObject
{
  #keys: '[139394.0.1306647308]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebCustomDrawDataLayer_OnDrawObject'
  QuillAction
  {
    Body:
    [*
      // Draw PISP Operation Input Edge
      rcv := MacroPlan.RoutingConfiguratorView();
      
      // Adjust line based on its orientations
      topdown := object.FromY() < object.ToY();
      leftright := object.FromX() < object.ToX();
      padding := 6;
      
      fromy := region.BoundingRect().Top() + padding;
      toy := region.BoundingRect().Height() - padding;
      
      inputs := selectset( object, OperationInputGroup.OperationInput, input, true );
      if( topdown )
      {
        if( not leftright )
        {
          fromy := region.BoundingRect().Top() + padding;
          toy := region.BoundingRect().Height() - padding;
        }
      }
      else
      {
        if( leftright )
        {
          fromy := region.BoundingRect().Height() - padding;
          toy := region.BoundingRect().Top() + padding;
        }
      }
      
      
      surface.Brush().Reset(); // strange. without this line, the arrow head will not be filled.
      surface.Pen().Color( ColorScheme.RoutingConfigurator_RoutingArrow() );
      surface.Brush().Color( ColorScheme.RoutingConfigurator_RoutingArrow() ); // to paint the solid arrowhead
      
      surface.Pen().Style( PenSpecification::StyleSolid() );
      surface.Pen().Width( rcv.EdgeThickness() );
      
      // Draw the directional line
      line := GraphicalLine::LineTo( region.BoundingRect().Left(), fromy, region.BoundingRect().Width(), toy );
      line.ArrowToEnd( true ).ArrowPos( GraphicalLine::ArrowPosMiddle() );
      surface.Draw( line );
    *]
    GroupServerCalls: false
  }
}
