Conseils & Astuces ArcGIS Online - N°190

Expects($feature,"*")

// Nom du champ qui contient le libellé des entités, ici il
// s'agit du champ contenant la raison sociale des pharmacies
var field_name = "rs"

// Nombre d'entités à proximité que l'on souhaite rexhercher
var count_feature = 3
// Distance minimum pour la recherche, choisir une valeur priche de la Distance
// moyenne séparant les entité de la couche
var searchDist = 200

// Cette fonction permet de trier le tableau de résultat par distance croissantes
function compareDistances(a,b){
  if (a['Distance']<b['Distance'])
    return -1;
  if (a['Distance']>b['Distance'])
    return 1;
  return 0;
}

// récupération de la géométrie ponctuelle de l'entité
var pt = Geometry($feature)
// On recherche d'un premier rayon minimum autour du point
var result_featureset = Intersects($layer,Buffer(pt, searchDist,"meters"))
// On compte le nombre de points trouvés
var cnt = Count(result_featureset)

// Tant que l'on a pas le nombre suffisant de résultats 
// avec l'entité elle-même en plus de count_feature
while(cnt<=(count_feature+1)){
    searchDist = searchDist*2
    result_featureset =Intersects($layer,Buffer(pt, searchDist,"meters"))
    cnt = Count(result_featureset)
}

// Création d'un tableau avec les résultats de la recherche pour pouvoir
// les trier par ordre de distances croissantes
var result_array = []
for (var feat in result_featureset){
  // On exclut l'entité elle-même des résultats finaux  
  if(Text(feat[field_name])!=Text($feature[field_name])){
    var result_dict={}
    // On construit un dictionnaire "Nom","Distance" pour la fonction de tri
    result_dict[field_name]=feat[field_name]
    result_dict["Distance"]=Distance(pt, Geometry(feat), "kilometers") 
    Push(result_array,result_dict)
  }
}

// On récupère un tableau trié sur les distances
result_array = Sort(result_array, compareDistances)

// On construit la chaîne HTML à renvoyer
var str_HTML = "Les " + Text(count_feature) +
               " phamarcies les plus proches sont les suivantes :<br/>"

// On démarre une liste HTML               
str_HTML += "<ul>"

// On boucle uniquement sur le nombre "count_feature" d'entités à retourner
var i=0
while (i<count_feature){
    str_HTML += "<li>" + Text(result_array[i][field_name]) + 
    " (" + Text(result_array[i]["Distance"],"0.0")  + " km)</li><br/>"
    i+=1
  }
// On termine la liste HTML
str_HTML += "</ul>"

// On renvoie la chaîne HTML
return { 
  type : 'text', 
  text : str_HTML 
}