Нужна помощь

[user208]

Спасибо

[user208]

@fendak

@carnivoro

Подскажите пожалуйста как этот скрипт применить для всех выделенных участков?

;цикл по виділених об’єктах
$NS=0
$StartNS
$NS=@Map.NextSelected $NS

тут ваш скрипт

;Список ПІБ і назв співвласників з/д
$EO=@Map.SelectedObject
$PP=@Map.Object[$EO].Parameter[ID7000520]
$PC=@XML.NodeCount /Proprietors ProprietorInfo $PP
@if $PC<1 then @Goto %Exit
$I=0
$Res=
%Loop
$I=$I+1
$IsLE=@XML.NodeCount ProprietorInfo[$I]/Authentication LegalEntity $PP
@if $IsLE=1 then @Goto %LegalEntity
$LN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/LastName $PP
$FN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/FirstName $PP
$MN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/MiddleName $PP
@if $LN= then @Goto %Continue
@if $Res<> then $Res=$Res,
$Res=$Res$LN $FN $MN
@Goto %Continue
%LegalEntity
$N=@XML.XPath ProprietorInfo[$I]/Authentication/LegalEntity/Name $PP
@if $N= then @Goto %Continue
@if $Res<> then $Res=$Res,
$Res=$Res$N
%Continue
;створюємо параметр ID2014000008
$S=@Map.Parameters.Get ID2014000008
@if $S= then @Map.Parameters.Add 7000520 5 Name
;добавляєм параметр ID7000581 в список доступних шару XML : Земельна ділянка
$obj=@Map.SelectedObject
@Map.Object[$obj].Parameter[ID2014000008] $Res
;Этот скрипт показывает кадастровый номер XML- или In4-участка
$SO=@Map.SelectedObject
$CadNumber=
$LID=@Map.Object[$SO].LayerID
@if $LID=20000 then $CadNumber=@Map.Object[$SO].CalculateFormula ParentDS:ParentSD:ParentBC:CUT(4,4,P[SC])
@if $LID=70005 then $CadNumber=@Map.Object[$SO].CalculateFormula ParentID7000300ParentID7000301:ParentID7000401:P[ID7000513]
@if $CadNumber= then @Break Что-то пошло не так
;створюємо параметр ID9266061
$S=@Map.Parameters.Get ID9266061
@if $S= then @Map.Parameters.Add 70005 5 $CadNumber
;добавляєм параметр ID9266061 в список доступних шару XML : Земельна ділянка
$obj=@Map.SelectedObject
@Map.Object[$obj].Parameter[ID9266061] $CadNumber
@if $I<$PC then @Goto %Loop
@if $Res= then @Goto %Exit
@Dialog.Message $Res $CadNumber
$S=@Text.Text
%Exit

@if $NS=0 then @Goto %EndNS
@Goto $StartNS
%EndNS

Чего то не работает?

[Dmitry_Zolotar]

$EO=@Map.SelectedObject
…
$obj=@Map.SelectedObject
…
$SO=@Map.SelectedObject

поміняйте на
$EO=$NS
…
$obj=$NS
…
$SO=$NS

[user208]

@Dmitry_Zolotar

$EO=@Map.SelectedObject
…
$obj=@Map.SelectedObject
…
$SO=@Map.SelectedObject

поміняйте на
$EO=$NS
…
$obj=$NS
…
$SO=$NS

Большое спасибо, но что то не работает.

[user208]

Подскажите пожалуйста.
при формировании отчета в шаблоне dmt текстовый блок вылазит за приделы. Нужно каждый раз заходить в свойства и нажимать ок. Хотя параметры установлены. Как исправить данное неудобство?
Спасибо.

[fendak]

@Виталий

но что то не работает.

@Map.DeselectAll
@Map.SelectLayer id70005
;
;цикл по виділених об’єктах
$NS=0
@Text.Add На карті знайдено такі ділянки:
%StartNS
$NS=@Map.NextSelected $NS
@if $NS=0 then @Goto %EndNS
;Список ПІБ і назв співвласників з/д
$PP=@Map.Object[$NS].Parameter[ID7000520]
$PC=@XML.NodeCount /Proprietors ProprietorInfo $PP
@if $PC<1 then @Goto %Exit
$I=0
$Res=
%Loop
$I=$I+1
$IsLE=@XML.NodeCount ProprietorInfo[$I]/Authentication LegalEntity $PP
@if $IsLE=1 then @Goto %LegalEntity
$LN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/LastName $PP
$FN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/FirstName $PP
$MN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/MiddleName $PP
@if $LN= then @Goto %Continue
@if $Res<> then $Res=$Res,
$Res=$Res$LN $FN $MN
@Goto %Continue
%LegalEntity
$N=@XML.XPath ProprietorInfo[$I]/Authentication/LegalEntity/Name $PP
@if $N= then @Goto %Continue
@if $Res<> then $Res=$Res,
$Res=$Res$N
%Continue
;створюємо параметр ID2014000008
$S=@Map.Parameters.Get ID2014000008
@if $S= then @Map.Parameters.Add 2014000008 5 Назва
;добавляєм параметр ID7000581 в список доступних шару XML : Земельна ділянка
@Map.Object[$NS].Parameter[ID2014000008] $Res
;Этот скрипт показывает кадастровый номер XML- или In4-участка
$CadNumber=
$CadNumber=@Map.Object[$NS].CalculateFormula ParentID7000300ParentID7000301:ParentID7000401:P[ID7000513]
@if $CadNumber= then @Break Что-то пошло не так
;створюємо параметр ID9266061
$S=@Map.Parameters.Get ID9266061
@if $S= then @Map.Parameters.Add 9266061 5 $CadNumber
;добавляєм параметр ID9266061 в список доступних шару XML : Земельна ділянка
@Map.Object[$NS].Parameter[ID9266061] $CadNumber
@if $I<$PC then @Goto %Loop
@if $Res= then @Goto %Exit
;@Dialog.Message $Res $CadNumber
$S=“$Res $CadNumber”
$S=@DequoteText $S
@Text.Add $S
%Exit
@Goto %StartNS
%EndNS
$S=@Text.Text
@Dialog.Message $S

[user208]

@fendak

@Виталий

но что то не работает.

@Map.DeselectAll
@Map.SelectLayer id70005
;
;цикл по виділених об’єктах
$NS=0
@Text.Add На карті знайдено такі ділянки:
%StartNS
$NS=@Map.NextSelected $NS
@if $NS=0 then @Goto %EndNS
;Список ПІБ і назв співвласників з/д
$PP=@Map.Object[$NS].Parameter[ID7000520]
$PC=@XML.NodeCount /Proprietors ProprietorInfo $PP
@if $PC<1 then @Goto %Exit
$I=0
ОТЛИЧНО. СПАСИБО!!
$Res=
%Loop
$I=$I+1
$IsLE=@XML.NodeCount ProprietorInfo[$I]/Authentication LegalEntity $PP
@if $IsLE=1 then @Goto %LegalEntity
$LN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/LastName $PP
$FN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/FirstName $PP
$MN=@XML.XPath ProprietorInfo[$I]/Authentication/NaturalPerson/FullName/MiddleName $PP
@if $LN= then @Goto %Continue
@if $Res<> then $Res=$Res,
$Res=$Res$LN $FN $MN
@Goto %Continue
%LegalEntity
$N=@XML.XPath ProprietorInfo[$I]/Authentication/LegalEntity/Name $PP
@if $N= then @Goto %Continue
@if $Res<> then $Res=$Res,
$Res=$Res$N
%Continue
;створюємо параметр ID2014000008
$S=@Map.Parameters.Get ID2014000008
@if $S= then @Map.Parameters.Add 2014000008 5 Назва
;добавляєм параметр ID7000581 в список доступних шару XML : Земельна ділянка
@Map.Object[$NS].Parameter[ID2014000008] $Res
;Этот скрипт показывает кадастровый номер XML- или In4-участка
$CadNumber=
$CadNumber=@Map.Object[$NS].CalculateFormula ParentID7000300ParentID7000301:ParentID7000401:P[ID7000513]
@if $CadNumber= then @Break Что-то пошло не так
;створюємо параметр ID9266061
$S=@Map.Parameters.Get ID9266061
@if $S= then @Map.Parameters.Add 9266061 5 $CadNumber
;добавляєм параметр ID9266061 в список доступних шару XML : Земельна ділянка
@Map.Object[$NS].Parameter[ID9266061] $CadNumber
@if $I<$PC then @Goto %Loop
@if $Res= then @Goto %Exit
;@Dialog.Message $Res $CadNumber
$S=“$Res $CadNumber”
$S=@DequoteText $S
@Text.Add $S
%Exit
@Goto %StartNS
%EndNS
$S=@Text.Text
@Dialog.Message $S

Отлично. СПАСИБО!!!

[fendak]

@Виталий

Подскажите пожалуйста.
при формировании отчета в шаблоне dmt текстовый блок вылазит за приделы. Нужно каждый раз заходить в свойства и нажимать ок. Хотя параметры установлены. Как исправить данное неудобство?

1. Ширину текстового блоку задали?
2. При друку (чи попередньому перегляді на максимальному зближенні) також вилазить? Можливо, це тільки візуальний глюк. Наявні такі візуальні глюки в текстових блоках на картах.

[user208]

@fendak

@Виталий

Подскажите пожалуйста.
при формировании отчета в шаблоне dmt текстовый блок вылазит за приделы. Нужно каждый раз заходить в свойства и нажимать ок. Хотя параметры установлены. Как исправить данное неудобство?

1. Ширину текстового блоку задали?
2. При друку (чи попередньому перегляді на максимальному зближенні) також вилазить? Можливо, це тільки візуальний глюк. Наявні такі візуальні глюки в текстових блоках на картах.

1. Все задал как на рисунке. В шаблоне нормально, но при формировании отчета вылазит только эта стековый блок. При нажатии на свойства и нечего там не меняя нажать на ок - все становится на свои места.
2. При печати и визуально

[user24]

1. Яка версiя програми (хоча пробував версiї до 2014 - все нормально формується).
2. Яким чином формуєте (програмним методом чи з пункту меню “Документи”).

[user208]

@Руслан Пархуць

1. Яка версiя програми (хоча пробував версiї до 2014 - все нормально формується).
2. Яким чином формуєте (програмним методом чи з пункту меню “Документи”).

1.лицензия обновление.
2.Шаблон подключил к кнопке.

[Dmitry_Zolotar]

@Виталий

1. Все задал как на рисунке. В шаблоне нормально, но при формировании отчета вылазит только эта стековый блок. При нажатии на свойства и нечего там не меняя нажать на ок - все становится на свои места.

Видимо в шаблон вставлена таблица из другого шаблона с помощью Правка-Специальная вставка-В другом масштабе. Если просто добавить таблицу, то этих аномалий с размерами не будет.

[user208]

@Dmitry_Zolotar

@Виталий

1. Все задал как на рисунке. В шаблоне нормально, но при формировании отчета вылазит только эта стековый блок. При нажатии на свойства и нечего там не меняя нажать на ок - все становится на свои места.

Видимо в шаблон вставлена таблица из другого шаблона с помощью Правка-Специальная вставка-В другом масштабе. Если просто добавить таблицу, то этих аномалий с размерами не будет.

Спасибо!

[carnivoro]

Каким образом можно убрать с панели инструментов, двойную пометку и автосглаживание? Я знаю как убрать кнопку “Печать”. Хочу сделать так же и с этими ненужными мне кнопками.

[fendak]

скачайте файл та помістіть в папку з програмою Digitals, або, якщо у вас там вже є такий файл, то відкрийте його блокнотом та додайте в кінці два рядки:
spbAutoSmooth
spbModesMultiSelection

[klaid]

А як додати свої кнопки в панель. Не окремо а саме в головну панель

[carnivoro]

spbAutoSmooth
spbModesMultiSelection

Дякую!

[13vp]

Чому функція ZOL дає помилку Error Disbalance

[user216]

подскажите как построить ось дороги по полигону?

[Roman_Khomyshynets]

@Артем Сорокін

подскажите как построить ось дороги по полигону?

Можна сполучити кожні 2 протилежні точки бордюрів шаблоном збору Середня точка, виділити отримані точки і натиснути Сервіс - Перетворити - Точки в полілінію.