Інколи при перевірці файлу XML в XMLCheker пише, що у файлі не знайдено ділянку. Найчастіше причиною такої помилки є те, що якась із точок ділянки просто дублюється два рази.

Скрипт знаходить таку точку, маркуючи її.

@Map.DeselectAll
$Break=-2684354.56 -2684354.56 0
@Map.SelectLayer id70005
$MON=@Map.SelectedObject
@Map.Selected.MarkPoints CLEAR
$XYToch1=@Map.Object[$MON].Point[1]
$PntCount=@Map.Object[$MON].Count
$NP=1
%StartPointZD
$XY=@Map.Object[$MON].Point[$NP]
@if ("$XY"="$XYToch1") and ("$NP"<>"1") then @Goto %NextPointZD
@if $XY=$Break then @Goto %NextPointZD
$NPNext=$NP+1
@if $NP>$PntCount then @Goto %NextPointZD
$XYNext=@Map.Object[$MON].Point[$NPNext]
@if $XY=$XYNext then @Map.Selected.MarkPoints $NP
%NextPointZD
$NP=$NP+1
@if $NP<$PntCount then @Goto %StartPointZD
$Res=Все гаразд!
$Marked=@Map.Object[$MON].GetMarkedPointsCount
@if $Marked>0 then $Res=Знайдено $Marked точок ділянки, які дублюються. Знайдені точки замарковано.
@Dialog.Message $Res