Closest Facility Online

This sample demonstrates how to solve the routing problem of finding the closest facility among multiple incidents (i.e. target points to go to). Barriers in the form of points, lines, and polygons, can be placed across the line network to provide alternative optimal routes. A variety of input parameters to modify the routing problem can be adjusted. This is a fairly complex sample that has extensive use of XAML and code-behind to demonstrate the closet facility problem. Some of the main classes used in the sample are SimpleMarkerSymbol.ControlTemplate, Storyboard animation, Editor, GraphicsLayer, RouteTask, RouteClosesFacilityParameters and RouteResult.

To use this sample, click on a button to add facilities, barriers, and incidents. Modify input properties to define closest facility parameters. Click the Solve button to generate results and display them in the map. Hover over route results to see incident and facility ids and travel time.

XAML

<UserControl x:Class="ArcGISWPFSDK.ClosestFacility"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    xmlns:esri="http://schemas.esri.com/arcgis/client/2009">

    <Grid x:Name="LayoutRoot" Background="White">
        <Grid.Resources>

            <esri:SimpleMarkerSymbol x:Key="MyFacilitiesSymbol" Style="Square">
                <esri:SimpleMarkerSymbol.ControlTemplate>
                    <ControlTemplate>
                        <Grid>
                            <Rectangle RenderTransformOrigin="0.5,0.5" Fill="LightBlue" 
                        Width="20" Height="20" Stroke="Black" StrokeThickness="1" />
                            <TextBlock HorizontalAlignment="Center" VerticalAlignment="Center"
                        Text="{Binding Attributes[FacilityNumber]}"
                        FontSize="9" Margin="0" FontWeight="Bold" Foreground="Black" />
                        </Grid>
                    </ControlTemplate>
                </esri:SimpleMarkerSymbol.ControlTemplate>
            </esri:SimpleMarkerSymbol>

            <esri:SimpleMarkerSymbol x:Key="MyIncidentsSymbol" Size="20" Style="Circle" Color="LightGreen">
                <esri:SimpleMarkerSymbol.ControlTemplate>
                    <ControlTemplate>
                        <Grid>
                            <Ellipse Fill="{Binding Symbol.Color}" Width="{Binding Symbol.Size}" Height="{Binding Symbol.Size}" 
                    Stroke="Black" StrokeThickness="1" />
                            <TextBlock HorizontalAlignment="Center" VerticalAlignment="Center"
                    Text="{Binding Path=Attributes[IncidentNumber]}"
                    FontSize="9" Margin="0" FontWeight="Bold" Foreground="Black" />
                        </Grid>
                    </ControlTemplate>
                </esri:SimpleMarkerSymbol.ControlTemplate>
            </esri:SimpleMarkerSymbol>

            <esri:SimpleMarkerSymbol x:Key="BarrierMarkerSymbol" Color="Red" Size="12" Style="Circle" />
            <esri:SimpleLineSymbol x:Key="BarrierLineSymbol" Color="Red" Width="2" Style="Solid" />
            <esri:SimpleFillSymbol x:Key="BarrierFillSymbol" Fill="#44FF0000" BorderBrush="#99000000" BorderThickness="1" />

            <esri:SimpleRenderer x:Key="RouteRenderer">
                <esri:SimpleRenderer.Symbol>
                    <esri:LineSymbol>
                        <esri:LineSymbol.ControlTemplate>
                            <ControlTemplate>
                                <Grid>
                                    <VisualStateManager.VisualStateGroups>
                                        <VisualStateGroup x:Name="CommonStates">
                                            <VisualState x:Name="Normal">
                                                <Storyboard RepeatBehavior="Forever">
                                                    <DoubleAnimation BeginTime="0:0:0" Storyboard.TargetName="Element" 
                                                                                 Storyboard.TargetProperty="StrokeDashOffset" 
                                                                                 To="1000" Duration="0:3:0" />
                                                </Storyboard>
                                            </VisualState>
                                        </VisualStateGroup>
                                    </VisualStateManager.VisualStateGroups>
                                    <!--For polyline and polygon template, a Path 
                                                    element with the name "Element" is required-->
                                    <Path x:Name="Element" StrokeDashArray="2,1" StrokeDashOffset="0"
                                                     Stroke="Green" StrokeThickness="5" />
                                </Grid>
                            </ControlTemplate>
                        </esri:LineSymbol.ControlTemplate>
                    </esri:LineSymbol>
                </esri:SimpleRenderer.Symbol>
            </esri:SimpleRenderer>

            <esri:Editor x:Key="MyBarriersEditor" LayerIDs="MyBarriersGraphicsLayer"/>
            <esri:Editor x:Key="MyFacilitiesEditor" LayerIDs="MyFacilitiesGraphicsLayer"                        
                         SelectionMode="Point" ContinuousMode="True" 
                         EditCompleted="Editor_EditCompleted" />
            <esri:Editor x:Key="MyIncidentsEditor" LayerIDs="MyIncidentsGraphicsLayer"                        
                         SelectionMode="Point" ContinuousMode="True" 
                         EditCompleted="Editor_EditCompleted" />
            <LinearGradientBrush x:Key="PanelGradient" EndPoint="0.5,1" StartPoint="0.5,0">
                <LinearGradientBrush.RelativeTransform>
                    <TransformGroup>
                        <ScaleTransform CenterY="0.5" CenterX="0.5"/>
                        <SkewTransform CenterY="0.5" CenterX="0.5"/>
                        <RotateTransform Angle="176" CenterY="0.5" CenterX="0.5"/>
                        <TranslateTransform/>
                    </TransformGroup>
                </LinearGradientBrush.RelativeTransform>
                <GradientStop Color="#FF145787" Offset="0.16"/>
                <GradientStop Color="#FF3D7FAC" Offset="0.502"/>
                <GradientStop Color="#FF88C5EF" Offset="0.984"/>
            </LinearGradientBrush>

        </Grid.Resources>

        <esri:Map x:Name="MyMap" Background="White" Extent="-117.23,34.03,-117.16,34.08" Loaded="MyMap_Loaded">
            <esri:Map.Layers>
                <esri:ArcGISTiledMapServiceLayer
                      Url="http://services.arcgisonline.com/ArcGIS/rest/services/ESRI_StreetMap_World_2D/MapServer"/>
                <esri:GraphicsLayer ID="MyRoutesGraphicsLayer" Renderer="{StaticResource RouteRenderer}" >
                    <esri:GraphicsLayer.MapTip>
                        <Border CornerRadius="10" Background="#DDFFEEEE" BorderThickness="5" BorderBrush="#7700FF00">
                            <StackPanel Orientation="Vertical" HorizontalAlignment="Center" Margin="10">
                                <StackPanel Orientation="Horizontal">
                                    <TextBlock Text="From Incident " FontWeight="Bold" Foreground="#FF0F274E" FontSize="10" VerticalAlignment="Center"/>
                                    <TextBlock Text="{Binding [IncidentID]}" HorizontalAlignment="Left" VerticalAlignment="Center" Foreground="#FF0F274E"/>
                                </StackPanel>
                                <StackPanel Orientation="Horizontal">
                                    <TextBlock Text="To Facility " FontWeight="Bold" Foreground="#FF0F274E" FontSize="10" VerticalAlignment="Center"/>
                                    <TextBlock Text="{Binding [FacilityID]}" HorizontalAlignment="Left" VerticalAlignment="Center" Foreground="#FF0F274E"/>
                                </StackPanel>
                                <StackPanel Orientation="Horizontal">
                                    <TextBlock Text="Total Time (mins): " FontWeight="Bold" Foreground="#FF0F274E" FontSize="10" VerticalAlignment="Center" />
                                    <TextBlock Text="{Binding [Total_Time], StringFormat=\{0:F\}}" HorizontalAlignment="Left" VerticalAlignment="Center" Foreground="#FF0F274E"/>
                                </StackPanel>
                            </StackPanel>
                        </Border>
                    </esri:GraphicsLayer.MapTip>
                </esri:GraphicsLayer>
                <esri:GraphicsLayer ID="MyIncidentsGraphicsLayer" />
                <esri:GraphicsLayer ID="MyBarriersGraphicsLayer" />
                <esri:GraphicsLayer ID="MyFacilitiesGraphicsLayer" />
            </esri:Map.Layers>
        </esri:Map>

        <Border Background="{StaticResource PanelGradient}" BorderThickness="1" CornerRadius="5"
                HorizontalAlignment="Right"  VerticalAlignment="Top"
                Margin="20,20,20,30" Padding="10" BorderBrush="Black">
            <Border.Effect>
                <DropShadowEffect/>
            </Border.Effect>
            <Grid>
                <Grid.RowDefinitions>
                    <RowDefinition Height="*" />
                    <RowDefinition MinHeight="40"/>
                    <RowDefinition MinHeight="25"/>
                    <RowDefinition MinHeight="100"/>
                </Grid.RowDefinitions>
                <Grid Margin="5" Grid.Row="0">
                    <TextBlock x:Name="ResponseTextBlock" Text="Click on a button to add facilities, barriers, and incidents.  Modify input properties to define closest facility parameters.  Click the Solve button to generate results and display them in the map.  Hover over route results to see incident and facility ids and travel time." 
                       Width="400" Foreground="White" TextAlignment="Left" Margin="0,0,0,5" TextWrapping="Wrap" />
                </Grid>
                <Grid Margin="0" Grid.Row="1" >
                    <StackPanel Orientation="Horizontal" Margin="0">

                        <Button Content="Add Facilities" x:Name="FacilitiesRadioButton" 
                            Foreground="Black" VerticalAlignment="Center" Margin="0,0,5,0"
                            DataContext="{StaticResource MyFacilitiesEditor}"
                            Command="{Binding Add}" CommandParameter="{StaticResource MyFacilitiesSymbol}" 
                                />

                        <Button Content="Add Incidents" x:Name="IncidentsRadioButton"  
                            Foreground="Black" VerticalAlignment="Center" Margin="0,0,5,0" 
                            DataContext="{StaticResource MyIncidentsEditor}"
                            Command="{Binding Add}" CommandParameter="{StaticResource MyIncidentsSymbol}"
                            />

                        <Button x:Name="SolveButton" HorizontalAlignment="Center" VerticalAlignment="Center" 
                            Width="120" Height="40" Click="SolveButton_Click" Content="Solve" IsEnabled="False"  
                            FontSize="14" FontWeight="Bold" Margin="10,0,0,0" />
                    </StackPanel>
                </Grid>

                <StackPanel Orientation="Vertical" Grid.Row="2" Margin="0,0,0,5">
                    <TextBlock Text="Add Barriers:" Foreground="White" VerticalAlignment="Center" Margin="0,0,5,0" />
                    <StackPanel x:Name="BarrierToolsStackPanel" Orientation="Horizontal" 
                                DataContext="{StaticResource MyBarriersEditor}" 
                                Margin="5,0,5,5">
                        <Button x:Name="AddPointButton" Margin="2" 
                                        Content="Point" 
                                        Command="{Binding Add}" 
                                        CommandParameter="{StaticResource BarrierMarkerSymbol}" />
                        <Button x:Name="AddLineButton" Margin="2" 
                                        Content="Line" 
                                        Command="{Binding Add}" 
                                        CommandParameter="{StaticResource BarrierLineSymbol}" />
                        <Button x:Name="AddPolygonButton" Margin="2" 
                                        Content="Polygon"
                                        Command="{Binding Add}"
                                        CommandParameter="{StaticResource BarrierFillSymbol}" />
                    </StackPanel>
                    <Button Content="Clear All Graphics" Click="ClearButton_Click" 
                                    Margin="2,2,0,2" HorizontalAlignment="Left" Width="160" />
                </StackPanel>

                <Border BorderBrush="White" Grid.Row="3" BorderThickness="1" CornerRadius="3" >
                    <ScrollViewer MinHeight="100" BorderThickness="0">
                        <Grid Background="Transparent" Width="328" Margin="12" VerticalAlignment="Center">
                            <Grid.Resources>
                                <Style TargetType="TextBlock">
                                    <Setter Property="Foreground" Value="White"/>
                                    <Setter Property="VerticalAlignment" Value="Center" />
                                </Style>
                                <Style TargetType="CheckBox">
                                    <Setter Property="Foreground" Value="White" />
                                </Style>
                            </Grid.Resources>
                            <Grid.ColumnDefinitions>
                                <ColumnDefinition Width="200" />
                                <ColumnDefinition Width="125" />
                            </Grid.ColumnDefinitions>
                            <Grid.RowDefinitions>
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                                <RowDefinition />
                            </Grid.RowDefinitions>
                            <TextBlock Text="Travel Direction:" Grid.Row="0" Grid.Column="0" />

                            <ComboBox x:Name="TravelDirection2" Grid.Row="0" Grid.Column="1">
                                <ComboBoxItem Content="From Facility" />
                                <ComboBoxItem Content="To Facility" IsSelected="True"/>
                            </ComboBox>

                            <TextBlock Text="Default Cutoff:" Grid.Row="1" Grid.Column="0" />
                            <TextBox x:Name="DefaultCutoff2" Text="10" Grid.Row="1" Grid.Column="1" />

                            <TextBlock Text="Default Target Facility Count:" Grid.Row="2" Grid.Column="0" />
                            <TextBox x:Name="DefaultTargetFacilityCount2" Text="1" Grid.Row="2" Grid.Column="1" />

                            <TextBlock Text="Output Spatial Reference:" Grid.Row="3" Grid.Column="0" />
                            <TextBox x:Name="OutputSpatialReference2" Text="4326" Grid.Row="3" Grid.Column="1" />

                            <TextBlock Text="Accumulate Attribute Names:" Grid.Row="4" Grid.Column="0" />
                            <TextBox x:Name="AccumulateAttributeNames2" Grid.Row="4" Grid.Column="1" />

                            <TextBlock Text="Impedance Attribute Name:" Grid.Row="5" Grid.Column="0" />
                            <TextBox x:Name="ImpedanceAttributeName2" Text="Time" Grid.Row="5" Grid.Column="1" />

                            <TextBlock Text="Restriction Attribute Names:" Grid.Row="6" Grid.Column="0" />
                            <TextBox x:Name="RestrictionAttributeNames2" Text="OneWay,TurnRestriction,Avoid passenger ferries,Non-routeable segments" 
                                        Grid.Row="6" Grid.Column="1" />

                            <TextBlock Text="Attribute Parameter Value:" Grid.Row="7" Grid.Column="0" />
                            <ComboBox x:Name="AttributeParameter2" Grid.Row="7" Grid.Column="1">
                                <ComboBoxItem Content="None" IsSelected="True" />
                                <ComboBoxItem Content="15 MPH" />
                                <ComboBoxItem Content="20 MPH" />
                                <ComboBoxItem Content="25 MPH" />
                                <ComboBoxItem Content="35 MPH" />
                                <ComboBoxItem Content="45 MPH" />
                                <ComboBoxItem Content="50 MPH" />
                                <ComboBoxItem Content="55 MPH" />
                                <ComboBoxItem Content="65 MPH" />
                                <ComboBoxItem Content="Other Roads" />
                            </ComboBox>

                            <TextBlock Text="Restrict U-Turns:" Grid.Row="8" Grid.Column="0" />
                            <ComboBox x:Name="RestrictUTurns2" Grid.Row="8" Grid.Column="1">
                                <ComboBoxItem Content="Allow Backtrack" IsSelected="True" />
                                <ComboBoxItem Content="At Dead Ends Only" />
                                <ComboBoxItem Content="No Backtrack" />
                            </ComboBox>

                            <CheckBox x:Name="UseHierarchy2" Grid.Row="9" Grid.ColumnSpan="2" 
                                              Content="Use Hierarchy" IsChecked="True"/>
                            <CheckBox x:Name="ReturnDirections2" Grid.Row="10" Grid.ColumnSpan="2" 
                                              Content="Return Directions" IsChecked="True"/>
                            <CheckBox x:Name="ReturnRoutes2" Grid.Row="11" Grid.ColumnSpan="2" 
                                              Content="Return Routes" IsChecked="True"/>
                            <CheckBox x:Name="ReturnFacilities2" Grid.Row="12" Grid.ColumnSpan="2" 
                                              Content="Return Facilities" />
                            <CheckBox x:Name="ReturnIncidents2" Grid.Row="13" Grid.ColumnSpan="2" 
                                              Content="Return Incidents" />
                            <CheckBox x:Name="ReturnBarriers2" Grid.Row="14" Grid.ColumnSpan="2" 
                                              Content="Return Barriers"    />
                            <CheckBox x:Name="ReturnPolylineBarriers2" Grid.Row="15" Grid.ColumnSpan="2" 
                                        Content="Return Polyline Barriers" />
                            <CheckBox x:Name="ReturnPolygonBarriers2" Grid.Row="16" Grid.ColumnSpan="2" 
                                        Content="Return Polygon Barriers" />

                            <TextBlock Text="Directions Language:" Grid.Row="17" Grid.Column="0" />
                            <TextBox x:Name="DirectionsLanguage2" Text="en-US" Grid.Row="17" Grid.Column="1" />
                            <TextBlock Text="Output Lines:" Grid.Row="18" Grid.Column="0" />
                            <ComboBox x:Name="OutputLines2" Grid.Row="18" Grid.Column="1">
                                <ComboBoxItem Content="None" />
                                <ComboBoxItem Content="Straight" />
                                <ComboBoxItem Content="True Shape" IsSelected="True" />
                            </ComboBox>
                            <TextBlock Text="Output Geometry Precision:" Grid.Row="19" Grid.Column="0" />
                            <TextBox x:Name="OutputGeometryPrecision2" Grid.Row="19" Grid.Column="1" />
                            <TextBlock Text="Output Geometry Precision Units:" Grid.Row="20" Grid.Column="0" />
                            <ComboBox x:Name="OutputGeometryPrecisionUnits2" Grid.Row="20" Grid.Column="1">
                                <ComboBoxItem Content="Unknown" IsSelected="True" />
                                <ComboBoxItem Content="Decimal Degrees" />
                                <ComboBoxItem Content="Kilometers" />
                                <ComboBoxItem Content="Meters" />
                                <ComboBoxItem Content="Miles" />
                                <ComboBoxItem Content="Nautical Miles" />
                                <ComboBoxItem Content="Inches" />
                                <ComboBoxItem Content="Points" />
                                <ComboBoxItem Content="Feet" />
                                <ComboBoxItem Content="Yards" />
                                <ComboBoxItem Content="Millimeters" />
                                <ComboBoxItem Content="Centimeters" />
                                <ComboBoxItem Content="Decimeters" />
                            </ComboBox>

                            <TextBlock Text="Directions Time Attribute Name:" Grid.Row="21" Grid.Column="0" />
                            <TextBox x:Name="DirectionsTimeAttributeName2" Text="Time" Grid.Row="21" Grid.Column="1" />
                            <TextBlock Text="Directions Length Units:" Grid.Row="22" Grid.Column="0" />
                            <ComboBox x:Name="DirectionsLengthUnits2" Grid.Row="22" Grid.Column="1">
                                <ComboBoxItem Content="Unknown" />
                                <ComboBoxItem Content="Kilometers" />
                                <ComboBoxItem Content="Meters" />
                                <ComboBoxItem Content="Miles" IsSelected="True" />
                                <ComboBoxItem Content="Nautical Miles" />
                            </ComboBox>
                        </Grid>
                    </ScrollViewer>
                </Border>

            </Grid>

        </Border>

    </Grid>

</UserControl>

C#

using System;
using System.Collections.Generic;
using System.Linq;
using System.Windows;
using System.Windows.Controls;
using ESRI.ArcGIS.Client;
using ESRI.ArcGIS.Client.Geometry;
using ESRI.ArcGIS.Client.Symbols;
using ESRI.ArcGIS.Client.Tasks;
using System.Windows.Media;
using System.Windows.Controls.Primitives;

namespace ArcGISWPFSDK
{
    public partial class ClosestFacility : UserControl
    {
        private RouteTask myRouteTask;
        private GraphicsLayer facilitiesGraphicsLayer;
        private GraphicsLayer IncidentsGraphicsLayer;
        private GraphicsLayer barriersGraphicsLayer;
        private GraphicsLayer routeGraphicsLayer;
        List<Graphic> pointBarriers;
        List<Graphic> polylineBarriers;
        List<Graphic> polygonBarriers;
        Random random;

        public ClosestFacility()
        {
            InitializeComponent();

            facilitiesGraphicsLayer = MyMap.Layers["MyFacilitiesGraphicsLayer"] as GraphicsLayer;
            IncidentsGraphicsLayer = MyMap.Layers["MyIncidentsGraphicsLayer"] as GraphicsLayer;
            barriersGraphicsLayer = MyMap.Layers["MyBarriersGraphicsLayer"] as GraphicsLayer;
            routeGraphicsLayer = MyMap.Layers["MyRoutesGraphicsLayer"] as GraphicsLayer;

            myRouteTask = new RouteTask("http://sampleserver3.arcgisonline.com/ArcGIS/rest/services/Network/USA/NAServer/Closest%20Facility");
            myRouteTask.SolveClosestFacilityCompleted += SolveClosestFacility_Completed;
            myRouteTask.Failed += SolveClosestFacility_Failed;

            pointBarriers = new List<Graphic>();
            polylineBarriers = new List<Graphic>();
            polygonBarriers = new List<Graphic>();

            random = new Random();
        }

        private void SolveButton_Click(object sender, RoutedEventArgs e)
        {
            List<AttributeParameter> aps = new List<AttributeParameter>();
         
            GenerateBarriers();

            RouteClosestFacilityParameters routeParams = new RouteClosestFacilityParameters()
            {
                Incidents = IncidentsGraphicsLayer.Graphics,
                Barriers = pointBarriers.Count > 0 ? pointBarriers : null,
                PolylineBarriers = polylineBarriers.Count > 0 ? polylineBarriers : null,
                PolygonBarriers = polygonBarriers.Count > 0 ? polygonBarriers : null,
                Facilities = facilitiesGraphicsLayer.Graphics,

                AttributeParameterValues = aps,
                ReturnDirections = ReturnDirections2.IsChecked.HasValue ? ReturnDirections2.IsChecked.Value : false,
                DirectionsLanguage = String.IsNullOrEmpty(DirectionsLanguage2.Text) ? new System.Globalization.CultureInfo("en-US") : new System.Globalization.CultureInfo(DirectionsLanguage2.Text),
                DirectionsLengthUnits = GetDirectionsLengthUnits(DirectionsLengthUnits2.SelectionBoxItem.ToString().Trim()),
                DirectionsTimeAttribute = DirectionsTimeAttributeName2.Text,

                ReturnRoutes = ReturnRoutes2.IsChecked.HasValue ? ReturnRoutes2.IsChecked.Value : false,
                ReturnFacilities = ReturnFacilities2.IsChecked.HasValue ? ReturnFacilities2.IsChecked.Value : false,
                ReturnIncidents = ReturnIncidents2.IsChecked.HasValue ? ReturnIncidents2.IsChecked.Value : false,
                ReturnBarriers = ReturnBarriers2.IsChecked.HasValue ? ReturnBarriers2.IsChecked.Value : false,
                ReturnPolylineBarriers = ReturnPolylineBarriers2.IsChecked.HasValue ? ReturnPolylineBarriers2.IsChecked.Value : false,

                ReturnPolygonBarriers = ReturnPolygonBarriers2.IsChecked.HasValue ? ReturnPolygonBarriers2.IsChecked.Value : false,
                FacilityReturnType = FacilityReturnType.ServerFacilityReturnAll,
                OutputLines = GetOutputLines(OutputLines2.SelectionBoxItem.ToString().Trim()),
                DefaultCutoff = string.IsNullOrEmpty(DefaultCutoff2.Text) ? 100 : double.Parse(DefaultCutoff2.Text),
                DefaultTargetFacilityCount = string.IsNullOrEmpty(DefaultTargetFacilityCount2.Text) ? 1 : int.Parse(DefaultTargetFacilityCount2.Text),

                TravelDirection = GetFacilityTravelDirections(TravelDirection2.SelectionBoxItem.ToString()),
                OutSpatialReference = string.IsNullOrEmpty(OutputSpatialReference2.Text) ? null : new SpatialReference(int.Parse(OutputSpatialReference2.Text)),
                AccumulateAttributes = AccumulateAttributeNames2.Text.Split(','),
                ImpedanceAttribute = ImpedanceAttributeName2.Text,
                RestrictionAttributes = RestrictionAttributeNames2.Text.Split(','),

                RestrictUTurns = GetRestrictUTurns(RestrictUTurns2.SelectionBoxItem.ToString().Trim()),
                UseHierarchy = UseHierarchy2.IsChecked.HasValue ? UseHierarchy2.IsChecked.Value : false,
                OutputGeometryPrecision = string.IsNullOrEmpty(OutputGeometryPrecision2.Text) ? 0 : double.Parse(OutputGeometryPrecision2.Text),
                OutputGeometryPrecisionUnits = GetGeometryPrecisionUnits(OutputGeometryPrecisionUnits2.SelectionBoxItem.ToString().Trim()),
            };

            if (myRouteTask.IsBusy)
                myRouteTask.CancelAsync();

            myRouteTask.SolveClosestFacilityAsync(routeParams);
        }

        public void GenerateBarriers()
        {
            foreach (Graphic g in barriersGraphicsLayer)
            {
                Type gType = g.Geometry.GetType();

                if (gType == typeof(MapPoint))
                    pointBarriers.Add(g);
                else if (gType == typeof(Polyline))
                    polylineBarriers.Add(g);
                else if (gType == typeof(Polygon) || gType == typeof(Envelope))
                    polygonBarriers.Add(g);
            }
        }

        void SolveClosestFacility_Completed(object sender, RouteEventArgs e)
        {
            routeGraphicsLayer.Graphics.Clear();

            if (e.RouteResults != null)
            {
                foreach (RouteResult route in e.RouteResults)
                {
                    Graphic g = route.Route;
                    routeGraphicsLayer.Graphics.Add(g);
                }
            }
        }

        void SolveClosestFacility_Failed(object sender, TaskFailedEventArgs e)
        {
            MessageBox.Show("Network Analysis error: " + e.Error.Message);
        }

        private void Editor_EditCompleted(object sender, Editor.EditEventArgs e)
        {
            Editor editor = sender as Editor;

            if (e.Action == Editor.EditAction.Add)
            {
                if (editor.LayerIDs.ElementAt(0) == "MyFacilitiesGraphicsLayer")
                {
                    e.Edits.ElementAt(0).Graphic.Attributes.Add("FacilityNumber",
                            (e.Edits.ElementAt(0).Layer as GraphicsLayer).Graphics.Count);
                }
                else if (editor.LayerIDs.ElementAt(0) == "MyIncidentsGraphicsLayer")
                {
                    e.Edits.ElementAt(0).Graphic.Attributes.Add("IncidentNumber",
                            (e.Edits.ElementAt(0).Layer as GraphicsLayer).Graphics.Count);
                }

                if (facilitiesGraphicsLayer.Graphics.Count > 0 && IncidentsGraphicsLayer.Graphics.Count > 0)
                    SolveButton.IsEnabled = true;
            }
        }

        private void ClearButton_Click(object sender, RoutedEventArgs e)
        {
            foreach (Layer layer in MyMap.Layers)
                if (layer is GraphicsLayer)
                    (layer as GraphicsLayer).ClearGraphics();

            SolveButton.IsEnabled = false;
        }

        private void MyMap_Loaded(object sender, RoutedEventArgs e)
        {
            (LayoutRoot.Resources["MyBarriersEditor"] as ESRI.ArcGIS.Client.Editor).Map = MyMap;
            (LayoutRoot.Resources["MyFacilitiesEditor"] as ESRI.ArcGIS.Client.Editor).Map = MyMap;
            (LayoutRoot.Resources["MyIncidentsEditor"] as ESRI.ArcGIS.Client.Editor).Map = MyMap;
        }

        private AttributeParameter GetAttributeParameterValue(string attributeParamSelection)
        {
            return new AttributeParameter { value = attributeParamSelection };
        }

        private esriUnits GetDirectionsLengthUnits(string directionsLengthUnits)
        {
            esriUnits units = esriUnits.esriUnknownUnits;
            if (directionsLengthUnits.Equals(string.Empty))
                return units;

            switch (directionsLengthUnits.ToLower())
            {
                case "kilometers":
                    units = esriUnits.esriKilometers;
                    break;
                case "meters":
                    units = esriUnits.esriMeters;
                    break;
                case "miles":
                    units = esriUnits.esriMiles;
                    break;
                case "nautical miles":
                    units = esriUnits.esriNauticalMiles;
                    break;
                case "unknown":
                    units = esriUnits.esriUnknownUnits;
                    break;
                default:
                    break;
            }

            return units;
        }

        private string GetOutputLines(string outputLines)
        {
            string result = "";
            if (outputLines.Equals(string.Empty))
                return result;

            switch (outputLines.ToLower())
            {
                case "none":
                    result = "esriNAOutputLineNone";
                    break;
                case "straight":
                    result = "esriNAOutputLineStraight";
                    break;
                case "true shape":
                    result = "esriNAOutputLineTrueShape";
                    break;
                default:
                    break;
            }
            return result;
        }

        private FacilityTravelDirection GetFacilityTravelDirections(string direction)
        {
            FacilityTravelDirection ftd = FacilityTravelDirection.TravelDirectionToFacility;
            switch (direction.ToLower())
            {
                case "to facility":
                    ftd = FacilityTravelDirection.TravelDirectionToFacility;
                    break;
                case "from facility":
                    ftd = FacilityTravelDirection.TravelDirectionFromFacility;
                    break;
                default:
                    break;
            }
            return ftd;
        }

        private string GetRestrictUTurns(string restrictUTurns)
        {
            string result = "esriNFSBAllowBacktrack";
            switch (restrictUTurns.ToLower())
            {
                case "allow backtrack":
                    result = "esriNFSBAllowBacktrack";
                    break;
                case "at dead ends only":
                    result = "esriNFSBAtDeadEndsOnly";
                    break;
                case "no backtrack":
                    result = "esriNFSBNoBacktrack";
                    break;
                default:
                    break;
            }
            return result;
        }

        private esriUnits GetGeometryPrecisionUnits(string outputGeometryPrecisionUnits)
        {
            esriUnits units = esriUnits.esriUnknownUnits;
            switch (outputGeometryPrecisionUnits.ToLower())
            {
                case "unknown":
                    units = esriUnits.esriUnknownUnits;
                    break;
                case "decimal degrees":
                    units = esriUnits.esriDecimalDegrees;
                    break;
                case "kilometers":
                    units = esriUnits.esriKilometers;
                    break;
                case "meters":
                    units = esriUnits.esriMeters;
                    break;
                case "miles":
                    units = esriUnits.esriMiles;
                    break;
                case "nautical miles":
                    units = esriUnits.esriNauticalMiles;
                    break;
                case "inches":
                    units = esriUnits.esriInches;
                    break;
                case "points":
                    units = esriUnits.esriPoints;
                    break;
                case "feet":
                    units = esriUnits.esriFeet;
                    break;
                case "yards":
                    units = esriUnits.esriYards;
                    break;
                case "millimeters":
                    units = esriUnits.esriMillimeters;
                    break;
                case "centimeters":
                    units = esriUnits.esriCentimeters;
                    break;
                case "decimeters":
                    units = esriUnits.esriDecimeters;
                    break;
                default:
                    break;
            }
            return units;
        }
    }
}

VB.NET

Imports System.Collections.Generic
Imports System.Linq
Imports System.Windows
Imports System.Windows.Controls
Imports ESRI.ArcGIS.Client
Imports ESRI.ArcGIS.Client.Geometry
Imports ESRI.ArcGIS.Client.Symbols
Imports ESRI.ArcGIS.Client.Tasks
Imports System.Windows.Media
Imports System.Windows.Controls.Primitives

Namespace ArcGISWPFSDK
    Partial Public Class ClosestFacility
        Inherits UserControl
        Private myRouteTask As RouteTask
        Private facilitiesGraphicsLayer As GraphicsLayer
        Private IncidentsGraphicsLayer As GraphicsLayer
        Private barriersGraphicsLayer As GraphicsLayer
        Private routeGraphicsLayer As GraphicsLayer
        Private pointBarriers As List(Of Graphic)
        Private polylineBarriers As List(Of Graphic)
        Private polygonBarriers As List(Of Graphic)
        Private random As Random

        Public Sub New()
            InitializeComponent()

            facilitiesGraphicsLayer = TryCast(MyMap.Layers("MyFacilitiesGraphicsLayer"), GraphicsLayer)
            IncidentsGraphicsLayer = TryCast(MyMap.Layers("MyIncidentsGraphicsLayer"), GraphicsLayer)
            barriersGraphicsLayer = TryCast(MyMap.Layers("MyBarriersGraphicsLayer"), GraphicsLayer)
            routeGraphicsLayer = TryCast(MyMap.Layers("MyRoutesGraphicsLayer"), GraphicsLayer)

            myRouteTask = New RouteTask("http://sampleserver3.arcgisonline.com/ArcGIS/rest/services/Network/USA/NAServer/Closest%20Facility")
            AddHandler myRouteTask.SolveClosestFacilityCompleted, AddressOf SolveClosestFacility_Completed
            AddHandler myRouteTask.Failed, AddressOf SolveClosestFacility_Failed

            pointBarriers = New List(Of Graphic)()
            polylineBarriers = New List(Of Graphic)()
            polygonBarriers = New List(Of Graphic)()

            random = New Random()
        End Sub

        Private Sub SolveButton_Click(sender As Object, e As RoutedEventArgs)
            Dim aps As New List(Of AttributeParameter)()

            GenerateBarriers()






            Dim routeParams As New RouteClosestFacilityParameters() With { _
             .Incidents = IncidentsGraphicsLayer.Graphics, _
             .Barriers = If(pointBarriers.Count > 0, pointBarriers, Nothing), _
             .PolylineBarriers = If(polylineBarriers.Count > 0, polylineBarriers, Nothing), _
             .PolygonBarriers = If(polygonBarriers.Count > 0, polygonBarriers, Nothing), _
             .Facilities = facilitiesGraphicsLayer.Graphics, _
             .AttributeParameterValues = aps, _
             .ReturnDirections = If(ReturnDirections2.IsChecked.HasValue, ReturnDirections2.IsChecked.Value, False), _
             .DirectionsLanguage = If([String].IsNullOrEmpty(DirectionsLanguage2.Text), New System.Globalization.CultureInfo("en-US"), New System.Globalization.CultureInfo(DirectionsLanguage2.Text)), _
             .DirectionsLengthUnits = GetDirectionsLengthUnits(DirectionsLengthUnits2.SelectionBoxItem.ToString().Trim()), _
             .DirectionsTimeAttribute = DirectionsTimeAttributeName2.Text, _
             .ReturnRoutes = If(ReturnRoutes2.IsChecked.HasValue, ReturnRoutes2.IsChecked.Value, False), _
             .ReturnFacilities = If(ReturnFacilities2.IsChecked.HasValue, ReturnFacilities2.IsChecked.Value, False), _
             .ReturnIncidents = If(ReturnIncidents2.IsChecked.HasValue, ReturnIncidents2.IsChecked.Value, False), _
             .ReturnBarriers = If(ReturnBarriers2.IsChecked.HasValue, ReturnBarriers2.IsChecked.Value, False), _
             .ReturnPolylineBarriers = If(ReturnPolylineBarriers2.IsChecked.HasValue, ReturnPolylineBarriers2.IsChecked.Value, False), _
             .ReturnPolygonBarriers = If(ReturnPolygonBarriers2.IsChecked.HasValue, ReturnPolygonBarriers2.IsChecked.Value, False), _
             .FacilityReturnType = FacilityReturnType.ServerFacilityReturnAll, _
             .OutputLines = GetOutputLines(OutputLines2.SelectionBoxItem.ToString().Trim()), _
             .DefaultCutoff = If(String.IsNullOrEmpty(DefaultCutoff2.Text), 100, Double.Parse(DefaultCutoff2.Text)), _
             .DefaultTargetFacilityCount = If(String.IsNullOrEmpty(DefaultTargetFacilityCount2.Text), 1, Integer.Parse(DefaultTargetFacilityCount2.Text)), _
             .TravelDirection = GetFacilityTravelDirections(TravelDirection2.SelectionBoxItem.ToString()), _
             .OutSpatialReference = If(String.IsNullOrEmpty(OutputSpatialReference2.Text), Nothing, New SpatialReference(Integer.Parse(OutputSpatialReference2.Text))), _
             .AccumulateAttributes = AccumulateAttributeNames2.Text.Split(","c), _
             .ImpedanceAttribute = ImpedanceAttributeName2.Text, _
             .RestrictionAttributes = RestrictionAttributeNames2.Text.Split(","c), _
             .RestrictUTurns = GetRestrictUTurns(RestrictUTurns2.SelectionBoxItem.ToString().Trim()), _
             .UseHierarchy = If(UseHierarchy2.IsChecked.HasValue, UseHierarchy2.IsChecked.Value, False), _
             .OutputGeometryPrecision = If(String.IsNullOrEmpty(OutputGeometryPrecision2.Text), 0, Double.Parse(OutputGeometryPrecision2.Text)), _
             .OutputGeometryPrecisionUnits = GetGeometryPrecisionUnits(OutputGeometryPrecisionUnits2.SelectionBoxItem.ToString().Trim()) _
            }

            If myRouteTask.IsBusy Then
                myRouteTask.CancelAsync()
            End If

            myRouteTask.SolveClosestFacilityAsync(routeParams)
        End Sub

        Public Sub GenerateBarriers()
            For Each g As Graphic In barriersGraphicsLayer
                Dim gType As Type = g.Geometry.[GetType]()

                If gType Is GetType(MapPoint) Then
                    pointBarriers.Add(g)
                ElseIf gType Is GetType(Polyline) Then
                    polylineBarriers.Add(g)
                ElseIf gType Is GetType(Polygon) OrElse gType Is GetType(Envelope) Then
                    polygonBarriers.Add(g)
                End If
            Next
        End Sub

        Private Sub SolveClosestFacility_Completed(sender As Object, e As RouteEventArgs)
            routeGraphicsLayer.Graphics.Clear()

            If e.RouteResults IsNot Nothing Then
                For Each route As RouteResult In e.RouteResults
                    Dim g As Graphic = route.Route
                    routeGraphicsLayer.Graphics.Add(g)
                Next
            End If
        End Sub

        Private Sub SolveClosestFacility_Failed(sender As Object, e As TaskFailedEventArgs)
            MessageBox.Show("Network Analysis error: " & e.[Error].Message)
        End Sub

        Private Sub Editor_EditCompleted(sender As Object, e As Editor.EditEventArgs)
            Dim editor__1 As Editor = TryCast(sender, Editor)

            If e.Action = Editor.EditAction.Add Then
                If editor__1.LayerIDs.ElementAt(0) = "MyFacilitiesGraphicsLayer" Then
                    e.Edits.ElementAt(0).Graphic.Attributes.Add("FacilityNumber", TryCast(e.Edits.ElementAt(0).Layer, GraphicsLayer).Graphics.Count)
                ElseIf editor__1.LayerIDs.ElementAt(0) = "MyIncidentsGraphicsLayer" Then
                    e.Edits.ElementAt(0).Graphic.Attributes.Add("IncidentNumber", TryCast(e.Edits.ElementAt(0).Layer, GraphicsLayer).Graphics.Count)
                End If

                If facilitiesGraphicsLayer.Graphics.Count > 0 AndAlso IncidentsGraphicsLayer.Graphics.Count > 0 Then
                    SolveButton.IsEnabled = True
                End If
            End If
        End Sub

        Private Sub ClearButton_Click(sender As Object, e As RoutedEventArgs)
            For Each layer As Layer In MyMap.Layers
                If TypeOf layer Is GraphicsLayer Then
                    TryCast(layer, GraphicsLayer).ClearGraphics()
                End If
            Next

            SolveButton.IsEnabled = False
        End Sub

        Private Sub MyMap_Loaded(sender As Object, e As RoutedEventArgs)
            TryCast(LayoutRoot.Resources("MyBarriersEditor"), ESRI.ArcGIS.Client.Editor).Map = MyMap
            TryCast(LayoutRoot.Resources("MyFacilitiesEditor"), ESRI.ArcGIS.Client.Editor).Map = MyMap
            TryCast(LayoutRoot.Resources("MyIncidentsEditor"), ESRI.ArcGIS.Client.Editor).Map = MyMap
        End Sub

        Private Function GetAttributeParameterValue(attributeParamSelection As String) As AttributeParameter
            Return New AttributeParameter() With { _
             .value = attributeParamSelection _
            }
        End Function

        Private Function GetDirectionsLengthUnits(directionsLengthUnits As String) As esriUnits
            Dim units As esriUnits = esriUnits.esriUnknownUnits
            If directionsLengthUnits.Equals(String.Empty) Then
                Return units
            End If

            Select Case directionsLengthUnits.ToLower()
                Case "kilometers"
                    units = esriUnits.esriKilometers
                    Exit Select
                Case "meters"
                    units = esriUnits.esriMeters
                    Exit Select
                Case "miles"
                    units = esriUnits.esriMiles
                    Exit Select
                Case "nautical miles"
                    units = esriUnits.esriNauticalMiles
                    Exit Select
                Case "unknown"
                    units = esriUnits.esriUnknownUnits
                    Exit Select
                Case Else
                    Exit Select
            End Select

            Return units
        End Function

        Private Function GetOutputLines(outputLines As String) As String
            Dim result As String = ""
            If outputLines.Equals(String.Empty) Then
                Return result
            End If

            Select Case outputLines.ToLower()
                Case "none"
                    result = "esriNAOutputLineNone"
                    Exit Select
                Case "straight"
                    result = "esriNAOutputLineStraight"
                    Exit Select
                Case "true shape"
                    result = "esriNAOutputLineTrueShape"
                    Exit Select
                Case Else
                    Exit Select
            End Select
            Return result
        End Function

        Private Function GetFacilityTravelDirections(direction As String) As FacilityTravelDirection
            Dim ftd As FacilityTravelDirection = FacilityTravelDirection.TravelDirectionToFacility
            Select Case direction.ToLower()
                Case "to facility"
                    ftd = FacilityTravelDirection.TravelDirectionToFacility
                    Exit Select
                Case "from facility"
                    ftd = FacilityTravelDirection.TravelDirectionFromFacility
                    Exit Select
                Case Else
                    Exit Select
            End Select
            Return ftd
        End Function

        Private Function GetRestrictUTurns(restrictUTurns As String) As String
            Dim result As String = "esriNFSBAllowBacktrack"
            Select Case restrictUTurns.ToLower()
                Case "allow backtrack"
                    result = "esriNFSBAllowBacktrack"
                    Exit Select
                Case "at dead ends only"
                    result = "esriNFSBAtDeadEndsOnly"
                    Exit Select
                Case "no backtrack"
                    result = "esriNFSBNoBacktrack"
                    Exit Select
                Case Else
                    Exit Select
            End Select
            Return result
        End Function

        Private Function GetGeometryPrecisionUnits(outputGeometryPrecisionUnits As String) As esriUnits
            Dim units As esriUnits = esriUnits.esriUnknownUnits
            Select Case outputGeometryPrecisionUnits.ToLower()
                Case "unknown"
                    units = esriUnits.esriUnknownUnits
                    Exit Select
                Case "decimal degrees"
                    units = esriUnits.esriDecimalDegrees
                    Exit Select
                Case "kilometers"
                    units = esriUnits.esriKilometers
                    Exit Select
                Case "meters"
                    units = esriUnits.esriMeters
                    Exit Select
                Case "miles"
                    units = esriUnits.esriMiles
                    Exit Select
                Case "nautical miles"
                    units = esriUnits.esriNauticalMiles
                    Exit Select
                Case "inches"
                    units = esriUnits.esriInches
                    Exit Select
                Case "points"
                    units = esriUnits.esriPoints
                    Exit Select
                Case "feet"
                    units = esriUnits.esriFeet
                    Exit Select
                Case "yards"
                    units = esriUnits.esriYards
                    Exit Select
                Case "millimeters"
                    units = esriUnits.esriMillimeters
                    Exit Select
                Case "centimeters"
                    units = esriUnits.esriCentimeters
                    Exit Select
                Case "decimeters"
                    units = esriUnits.esriDecimeters
                    Exit Select
                Case Else
                    Exit Select
            End Select
            Return units
        End Function
    End Class
End Namespace