>Nasandr
я создал отдельный набор Massa
и в нём формулу см. рис., её вставил в табл. в графу масса.





PS
В свойствах есть такое - Имяпоставщика - Якубович. Леонид, это Вы?

>Nasandr, получилось?

>VitalyF

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

Нет меня зовут не Якубович Л. ??? Очень интересно. Я - Наседкин Андрей. А где конкретно прописана эта характеристика. Я ее вижу только у труб, но у меня она пустая.

А мы решили эту задачку сл. образом, формула для графы масса в спецификации:

' Elem - массив значений масс для разных элементов
Elem = Array ( "[PipeFittingElbowStyles:Масса]", "[PipeFittingTransitionStyles:Масса]", "[PipeFittingTeeStyles:Масса]")

' Подрядряд просматривваем значения в массиве
For Each Val In Elem
Val = Trim(Val) ' Удаление пробелов
' Если значение не равно "" (пусто) и не равно "?"
If (Val <> "" AND Val<>"?") Then
' то переменной `r` дается текущее значение
r = Val
End If
Next

RESULT = r

>Nasandr



хм ... тоже пашет! Интересное решение!!! Надо будет для др. случаев опробовать!

PS ...
Тут есть ещё пара моментов!
1)
Стили, к-рые связаны с каталогом автоматически следуют за вновь созданными
объектами, я бы в них перенёс всё необходимое для формирования таблиц.
Остальные стили нужно будет каждый раз присваивать объектам, что ни есть гут!

2)
Большинство колонок в таблице не требуют тип Формула, только Масса! ))

>VitalyF



Правильное замечание, . Надо будет так и сделать.

Учебное пособие по МЕП 2010 можно скачать здесь. Там же найдёте и на версию 2009.


Руководство по МЕП 2010 можно скачать здесь. Там же найдёте и на версию 2009.

>VitalyF


Перенес все необходимые характеристики из набора НП_ОбъектТрубыДлина в набор, который автоматически следует за трубами, PipeStyles. Внес соотв. изменения в формулу подсчета длины труб, но формула перестала работать (спецификация 2), не суммирует трубы. В чем дело не понимаю? В старом варианте с присвоением набора характеристик все работает (спецификация 1)

А сохранить тот как шаблон?

>pavelP2009



В том смысле, что работает в варианте, когда характеристики для расчета формулы длины труб берутся из набора характеристик который мы присваивали после создания самого трубопровода (спецификация №1).

А не работает формула, когда расчет длины идет при использовании тех же самых характеристик, но из набора, который присваивается трубам автоматически.

Т.е. Создали трубопровод->Присвоили характеристику->Получили спецификацию, а хочется исключить пункт присваивания характеристики , за счет набора, к-ый автоматически цепляется к трубам.

Nasandr

... у тебя MEP2008 RUS!!!
мы тут уже где-то говорили о несовместимости ENG и RUS версий!
Внутренние имена переменных где-то перевели на русский, может ещё что...
У меня 10-ка вообще виснет при попытке изменить формулу в твоей таблице

VitalyF



Да



Да, с переводом немного намудрили, но ничего будем пока работать с присвоением характеристики, когда формула работает. Ничего страшного.
Автоматическое присвоение характеристик пока будем держать в уме...

Nasandr

Выложи здесь код той таблицы, к-рая работает, попробую набрать его вручную, чтобы засечь момент, где зависает

>VitalyF

Работает:

Set acadApp = GetObject(, "AutoCAD.Application")
On Error Resume Next
totLength = 0
n="[НП_ОбъектТрубыДлина:Номинальныйдиаметрпокаталогу]"
h="[НП_ОбъектТрубыДлина:Обработка]"
s= [НП_ОбъектТрубыДлина:Длина]

For Each object In acadApp.ActiveDocument.ModelSpace
If object.ObjectName = "AecbDbPipe" Then
If object.Handle <> h Then
set dict=object.GetExtensionDictionary
Set subdict = Dict.Item("AEC_PROPERTY_SETS")
For Each sch_propset In subdict
If sch_propset.Name = "НП_ОбъектТрубыДлина" Then
For Each sch_prop In sch_propset.Properties
If sch_prop.Name = "Номинальныйдиаметрпокаталогу" Then
If sch_prop.Value= n then
totLength = totLength + object.Length
End If
End If
Next
End If
Next

End If
End If
Next

RESULT =Replace( Round((totLength + s)/1000,2), ".", ",")

В конце мы точки меняем на запятуе
_______________________________________________________________________________

Не работает:

Set acadApp = GetObject(, "AutoCAD.Application")
On Error Resume Next
totLength = 0
n="[PipeStyles:Номинальныйдиаметрпокаталогу]"
h="[PipeStyles:Обработка]"
s= [PipeStyles:Длина]

For Each object In acadApp.ActiveDocument.ModelSpace
If object.ObjectName = "AecbDbPipe" Then
If object.Handle <> h Then
set dict=object.GetExtensionDictionary
Set subdict = Dict.Item("AEC_PROPERTY_SETS")
For Each sch_propset In subdict
If sch_propset.Name = "PipeStyles" Then
For Each sch_prop In sch_propset.Properties
If sch_prop.Name = "Номинальныйдиаметрпокаталогу" Then
If sch_prop.Value= n then
totLength = totLength + object.Length
End If
End If
Next
End If
Next

End If
End If
Next



RESULT = Round((totLength + s)/1000,2)

___________________________________________________________________

Вот что дает в результате
Set acadApp = GetObject(, "AutoCAD.Application")
On Error Resume Next
totLength = 0
n="Труба 273х8,0"
h="** Программная характеристика - Не допустима в текущем контексте **"
s= ** Программная характеристика - Не допустима в текущем контексте **
____________________________________________________________________

Виталий, а может быть загвоздка в том, что у меня НП_ОбъектТрубыДлина - Набор характеристик, а PipeStyles - это набор характеристик стиля?

Nasandr

По теме спецификаций и по этому вопросу в частности терли выше, там и формула прилагалась и методы решения

Nasandr


Да, сов. верно! Стили нужно со стилями, а объекты с объектами использовать

MvParts - огнезадерживающие клапаны для воздуховодов, производимые на территории Российской Федерации.
Приведенные элементы каталога Mechanical сделаны в AutoCAD MEP 2010. Всего 5 типов огнезадерживающих клапанов:
- КЛОП-1 круглого и прямоугольного сечения, с сервоприводом Belimo;
- клапаны фирмы amalva, с сервоприводом Belimo:
а) UVA90M круглого сечения от d100 до d560;
б) UVS90M прямоугольного сечения до размера наибольшей стороны 600 мм вкл., длиной 250 мм;
в) UVS90M прямоугольного сечения с размерами сторон от 650 мм до 1500 мм, длиной 300 мм.

Клапаны КЛОП-1 изготавливаются в г. Балашиха, М.О., а клапаны фирмы amalva производятся, в частности, в г. Рязань.

Все клапаны имеют противопожарные сертификаты МЧС России.

Для переноса элементов в свою базу воспользуйтесь копирование через редакторы каталогов (стандартная процедура, имеется в описании Autodesk).


P.S.

Скорей всего, предлагаемые элементы каталога будут некорректно изображаться в версия МЕП 2009 и в более ранних.

Подскажите, существует ли mep возможность проектировать опоры под трубопроводы?

Да. Фактически будет работа в AutoCAD Architecture. Только надо поместить в папку enu (или rus) со всем контентом каталог из AutoCAD Architecture. Он не поставляется в дистрибутиве AutoCAD MEP. Потом надо в программе указать путь к этой папке. Для этого надо в меню Format выбрать Structural Members, далее Catalog. В открывшемся окне щёлкнуть по клавише Open a Catalog file. И укажите путь к Вашему каталогу (т.е. к файлу ...\Catalogs\Structural\AecStrutural.apc), программа запомнит его.
В приложенном файле каталога строительных элементов из AutoCAD Architecture 2009 имеется достаточный набор стальных профилей для конструирования. Воспользуйтесь для работы в МЕП палеттой Architectural.

))) эт-т-т как эт? Всегда каталог этот поставлялся!
Достаточно его разместить где-то и путь к нему показать!
CSoft даже каталог по ГОСТ распространяла!

Да, интересно. У меня этого каталога нет. Впрочем, не важно... Для моих потребностей вполне хватает того маленького каталога, который я приложил выше.

old patriot



...дык ткни на ГОСТ, под ним ссылка на каталог ~700kb

И все таки, как в mep решается вопрос по проектированию опор (подвесок и прочего), просмотрел топик и ни где не обнаружил креплений. Обычно, в выложенных файлах воздуховоды висят в воздухе… как быть?

glin

- никак! Т.е. никто о нас и наших опорах не позаботился. Нужно самому всё создавать, объединяться, обмениваться...
Создавать их нужно в виде MVPart-ов - т.е. это будут MEP-объекты и значит будет работать скрытие невидимых линий.
Стены, колонны и проч. AEC-объекты не будут маскироваться MEP-объектами!

МЕП позволяет соорудить что-нибудь примитивное (см. рис.). Для этого надо в палетте воспользоваться позицией Structural Braces.
Подвески (шпильки) придётся сделать, как Solid.

Для более детальной проработки требуется приложение для машиностроение, как например, Autodesk Inventor Professional. Из последнего имеется возможность экспорта в МЕП.

P.S.

Нормативные документы не требуют от проектировщика проработки креплений инженерных систем. Поэтому Вы нигде здесь на форуме и не найдёте широкого обсуждения этой темы.

Autodesk Inventor Professional обсуждался здесь в текущей теме на нескольких страницах где-то в январе-апреле. Воспользуйтесь поиском. Некоторые участники форума умудряются в нём проектировать вентиляцию, и весьма успешно. Хотя, на мой взгляд, это чистейший мазохизм.

glin
Скажу короче-Мер поможет смоделировать и нарисовать, а считать надо по СНиПу

old patriot
... я конечно извиняюсь, что постоянно вмешиваюсь, но в MEP эти фигучки, что на рис. выше, автоматом располагаются вдоль объекта с определённым шагом вместе со шпильками, мало того ещё и поз. автоматически проставляются...

PS ... и в табл. собираются, но таблицы эти, как всегда, не адаптированы под ГОСТ

Да-с-с... Удивительные факты, как и Ваши широкие познания в программе. Жаль только нет им применения на просторах России. Не жалуют у нас программу, как и 3-х мерку вообще. Работодатели стараются искоренить её на корню, чтобы зараза не перекинулась на других сотрудников...
Лично я сдался в этой борьбе. Руки в гору...

Возможно детальная проработка и не требуется, а расставить опоры все же надо, ибо монтажники не поймут. А если иметь дело со сложными инженерными сетями, то тогда придется решать проблемы с температурными удлинениями с указанием где и какой тип опор должен находиться.

old patriot



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

Классная функция. Правда, все подвески почему-то вверх тарамашками торчат... Ну, да ладно...



Они без Вас лучше знают, что и как закрепить. Без обид. Не надо делать работу за монтажников, тем более у человека должна оставаться хотя бы толика творчества. А Вы хотите их и этого лишить...

Проектировщик должен заботиться о том, что влияет на реализацию проектных параметров (а 90% и этого не делают), и следить за соблюдением требований нормативных документов.
Подвески и опоры не входят в эту категорию. На них распространяются требования норм. Но вполне будет достаточно сослаться на них в требованиях к монтажу на 1-м листе проекта.



Так в этом и загвоздка, что тормозится производительность и падают прибыли. Директор весь в расстройстве, аж крыша едет.
Проще делать в 2D, не заботясь о соответствии с расположением и с реальной конфигурацией строительных элементов.
Большинство проектировщиков делают от силы 40-50% от требуемого объема. Остальное приходится прорабатывать по месту монтажной организации. Правда, при этом страдает объект, и не выдерживаются заложенные проектные параметры...
Но на это уже не обращают внимание. Главное, что ты сдал проект, а значит - на белом коне и весь в шоколаде.

На заметку...
Сейчас случайно в программе обнаружил неприятность, из-за которой даже немного расстроился.
Функция анализа пересечений объектов перестала нормально работать. При нажатии на любую из строк со списком пересечений программа перестала показывать это место в увеличении и подсвечивать его красным цветом.
Причина оказалась в том, что у меня в окне анализа пересечений случайно нажалась маленькая кнопка на темно-серой полосе рядом с заголовком списка пересечений (см. рис.). Эта кнопка имеет пиктограмму в виде увеличительной лупы с плюсом в середине.
Если по ней ещё раз щёлкнуть, то функция будет работать в привычном режиме.

Все и корректно торчат. Лежат на полочке, а тяги к потолку прикручены! )))

Я, наверное, неправильно выразился. Я имел в виду, что подвески шпильками торчат вниз, словно удерживают от всплытия воздуховоды (возможно, в них пустили гелий).

Я попробовал задать отрицательную высоту подвесок, но программа отказалась принять такое число. Я просто махнул на это рукой, т.к. мне никогда эта функция не пригодится (если и МЕП когда-либо потребуется).
Не до этой ерунды. То, что требуется, не успеваешь сделать...

Ещё раз обращаю внимание, что размещение крепелений инж. систем не входит в обязанности проектировщика.
Как я понимаю, такая необходимость может возникнуть только в фирме, занимающейся кроме проектных работ и монтажными также. И то, только в том случае, если прораб по каким-либо причинам "встал в позу", или же решил таким образом проучить проектировщика...

old patriot
??? - как это понимать???

До сих пор вы разве не MEP-ом восторгались? Проверка пересечений, рисование, редактирование, моделирование в конце концов... столько было восторгов...???

Про 3-х мерку я вспоминаю когда какой нить вертикальный канал надо показать и всё!
Но тем не менее от MEP пока не могу отказаться, т.к. ничего более подходящего для своей работы не вижу!!! Примерно 20 лет из 30-ти я проработал в голом акаде и хорошо знаю что это такое. )))

Опоры в виде MVPart-ов. AutoCADMEP 2008 RUS/
ОСТ 34-10-616-93 Опоры приварные скользящие и неподвижные
ОСТ 34-10-620-93 Опоры скользящие и неподвижные с направляющим хомутом.

Пробовали в настройках блоков поставить привязку якорем к трубопроводам. Но в этом случае не удавалось правильно сориентировать опору при установке на трубопровод, в итоге отказались от якоря.

Но каталоги еще требуют доработки . Замечания и пожелания приветствуются.
Добавление через копирование в редакторе каталогов, как писал выше Old Patriot.

Не в нем дело. Просто я меняю род деятельности.
Дезертирую...
-----------------------------

Коллеги, кто-нибудь может объяснить, к какой операции относится значок в виде крупной голубой стрелки (см. рис.)?
Он сегодня уже дважды появлялся на экране. После выполнения регенерации значок исчезает. Раньше никогда с таким не сталкивался...

Я туплю или что?-каталоги VitalyF и old patriot не открываются (МЕР 2008 и 2010).
>old patriot цвет стрелки не голубой (Cyan)

Что говорят?

>pavelP2009
У меня AutoCADMEP 2008 RUS.
Каталог по ГОСТ от VitalyF загрузился нормально.

никогда не задумывался что автокад такой древний.за 20 лет прогресс небольшой.

VitalyF

Сейчас дословно не помню-хоть убей, после напишу, но там не пишет ошибку с красным крестом, что что-то не возможно...Пробовал открывать редактором каталогов

Вот что пишет в 2008



в 2010 тоже

http://video.yandex.ru/users/pavelp2009/view/2

кстати, а почему каждый раз при входе в МЕР появляется такое окно?:

>pavelP2009
Для каталога по ГОСТ от VitalyF в AutoCADMEP 2008 попробуй Формат->Несущие элементы->Каталог->Файл->Открыть (для RUS)

>pavelP2009



... дык обновить просит.

Почему каталоги не грузятся не знаю, это спасибо нужно сказать нашим пакистанским братьям,
плюс cool хацкеры сделали обрезание вашим дискам

Nasandr
Спасибо, вечером попробую

VitalyF

... дык заколебался обновлять)))


как-нибудь можно узнать что вообще должно быть в МЕРе (типа списка файлов)

Блин, достала меня эта голубая стрелка. Возможно, она ничего угрожающего не несёт, но просто непрятно само по себе "непонятное явление". Может кто-нибудь дать ей объяснение? И что от неё ждать?

P.S.

Кстати, теперь она уже не исчезает после операции регенирации. Может быть это вирус?

Всё я понял, что это за стрелка. Это значок опции FLIP, который оторвался от какого-то элемента и стал "самостоятельным".
Обычный глюк программы. У бедного МЕП от натуги крыша помаленьку едет...
Пора завязывать издеваться над бедолагой.

pavelP2009

... дык не там обновляешь поди?! Обнови в шаблоне к-рый грузится по умолчанию.
Плюс, проверь его и сам шаблон на предмет ошибок!


по весу можно прикинуть, скока твой инсталлятор целиком весит?

VitalyF

Как не там? Там же в окошке и надпись имеется подчеркнутая, через нее и обновляю)

вечером отпишу

pavelP2009



... а не пробовал шаблон сменить, будет сообщение появляться?