Спецификация для SW по ГОСТ

[Leon 442]

Пакет макросов SWPlus

 

Здесь представлены VBA версии пакета макросов SWPlus. Также существует .Net ветка пакета, отпочковавшаяся от данной ветки в 2014 г. и поддерживаемая уважаемым @fox1001.

Одной из особенностью данных макросов является то, что все изменения, вносимые ими в документы SW, осуществляются только штатными средствами самого SW. Т.е. чертеж или спецификация, оформленные с помощью данного пакета макросов, могут быть открыты и даже отредактированы на компьютере без установленных макросов.

На данный момент разработка пакета макросов ПРЕКРАЩЕНА. По жалобам пользователей будут устранятся только критические ошибки и проблемы совместимости с новыми версиями SW. 

 

Состав и назначение пакета макросов:
SpecEditor - создание спецификаций (обычной и групповой по варианту Б) и ведомости покупных;
MProp - заполнение свойств моделей;
DProp - управление листами чертежа;
SProp - заполнение свойств моделей из разделов Стандартные изделия, Прочие изделия и Материалы;
SaveDRW - сохранение чертежа;
SaveAsPDF - сохранение чертежа в формате PDF и TIFF;
Master - создание шаблонов основных надписей;
TT - заполнение технических требований;
Roughness - простановка знака неуказанной шероховатости в углу чертежа;
RecordDimM - редактирование текста размеров;
CoolOut - преобразование размеров, проставленных с помощью инструмента "Условное обозначение отверстия", к виду по ЕСКД.

Важные советы:

Совет 1. Прочтите описание.
Совет 2. При возникновении ошибки при первом запуске макросов необходимо нажать кнопку Debug, далее зайти в меню Tools-References, убедиться в отсутствии потерянных библиотек (если таковые есть - подключить их), нажать ОК, закрыть окно с кодом макроса и снова запустить его.

Совет 3. Содержимое архива можно положить в любое место на диске, но нельзя переименовывать и удалять содержащиеся в нем файлы и папки. Макросы связаны между собой и используют общие файлы.

Совет 4. Убедитесь, что папка с макросами доступна SW для записи.

Совет 5. Для работы макроса SaveAsPDF в режиме печати на виртуальный принтер необходимо установить программу PDFCreator версии 1.2.1.

 

Описание архивов:

SWPlus 2014 SP0.0 - версия пакета SWPLus, адаптированная для SW2014 SP5.0.

SWPlus 2017 SP0.0 - версия пакета SWPLus, адаптированная для SW2017 SP4.1.

RecordDimM 2017 SP0.1 - исправленный макрос из пакета SWPlus 2017 SP0.0.

PDFCreator-1_2_1_setup - дистрибутив PDFCreator версии 1.2.1.

 

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

 

 

GriSt прав, пускай будет отдельная тема.
Начало смотри http://fsapr2000.ru/index.php?showtopic=6071&st=40
Итак, кратко:
1. Есть неудовлетворенность существующими на сегоднящний день программами для создания спецификаций под SW.
2. Есть желание взяться за самостоятельную разработку такого продукта.
3. Есть понимание, что дело это долгое и не простое, но интересное и в случае успешного завершения ИМХО устранит последний серьезный пробел в соответствии солида ЕСКД.
4. Если даже все и заглохнет, как неоднократно бывало, то останется информация для более удачливых разработчиков.

Вот некоторые топики этого форума где ранее обсуждались вопросы, связанные со спецификацией:
http://fsapr2000.ru/index.php?showtopic=3525&st=0
http://fsapr2000.ru/index.php?showtopic=2943&st=0
http://fsapr2000.ru/index.php?show...hl=спецификация
http://fsapr2000.ru/index.php?show...hl=спецификация
http://fsapr2000.ru/index.php?show...hl=спецификация

OldCAM
Родная солидовская спецификация не устраивает как минимум по 2 причинам:
1. Нет деления на разделы.
2. Нет разбивки на страницы.
Но воспользоваться ее функциями, которые наверняка представлены в API думаю можно

 

 

SWPlus_v_2014_SP0.0.zip

SWPlus_v_2017_SP0.0.zip

 

RecordDimM_v_2017_SP0.1.zip

PDFCreator-1_2_1_setup.zip

[TUY 1]

Попробуйте сделать специю самим Солидом (без макроса), а затем сравните на какой детальке виснет...

Может та деталька кривая (в смысле её свойства)....

Стандартной все работает

[Sergei 298]

1. В штампе не ставится "Зам."

Не понял что ещё за зам.

2. Как "привязать" надпись к штампу в осносной надписи?

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

3. Не ставится дата выполнения чертежа

Дата ставится только в момент сохранения в pdf макросом SaveAsPDF

4. При отсутствии изменений проставляется "ОШИБКА Revision". После сохранения проподает, но при открытии заново этого же чертежа появляется опять.

Не понял, может нужно пересохранить форматки.

В Dprop

Рылся в макросе и обнаружил, что должен быть еще файлик Roughness.swp, а его нет. Может забыли положить или я что-то не понял.

Не нужен, Roughness.swp это макрос для простановки знака шероховатости в углу чертежа.

[SAMMY 0]

Не понял что ещё за зам.

При внесении изменений в чертеж в штампе проставляется: номер изменения, "Зам.", дата внесения изменения

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

Дата ставится только в момент сохранения в pdf макросом SaveAsPDF

Спасибо!

Не понял, может нужно пересохранить форматки.

Может быть. Попробую исправить

Не нужен, Roughness.swp это макрос для простановки знака шероховатости в углу чертежа.

А где его взять? Подскажите пожалуйста.

Так макрос я нашел.

Теперь вопросы

Меняю высоту шрифта, сохраняю, выхожу из редактирования - высота меняется на старую (5 мм)

Увеличиваю толщину линий знака - после сохранения и завершения редактирования меняются на прежние

Изменено 23 декабря 2009 пользователем SAMMY

[Crab 4]

TUY

Такая же ситуация.

Проблему не решил.

У меня работает только с вновь созданными сборками, и то не всегда(если даже попадается старая

деталь но сохраненная в новом SW).

Навязчивая мысль что виновники старые детали. Как это исправить и пере конвертировать не знаю.

Пробовал в старых деталях создавать конфигурацию и вставлять в сборку, после чего спец. стала работать.

[Leon 442]

SAMMY

1. В штампе не ставится "Зам."

Частично Sergei вам ответил (спасибо). Что касается "Зам.", то оно ставится макросом DProp при внесении Изменения. Макрос Мастер здесь не причем.

Меняю высоту шрифта, сохраняю, выхожу из редактирования - высота меняется на старую (5 мм)

Увеличиваю толщину линий знака - после сохранения и завершения редактирования меняются на прежние

Это, как я понимаю, вы пытаетесь поправить значки Roughness? Если так, то это обычные блоки солида. И редактируются они штатными средствами солида. Если хотите внести свои правки, то необходимо пересохранить отредактированные блоки с теми же именами.

TUY

Подскажите как исправить вот такую вот проблемку с SpecEditor: зависает в вот таком состоянии и именно только с определенными сборками(с другими работает без проблем)

... SW2010 SP01 W7x64

Я боюсь, что здесь могут помочь только время и сервиспаки. Скорее всего, как вам и писал Crab это связано со "старыми" файлами. Можно попробовать выявить проблемные файлы и полечить их, с помощью "сохранить как" с тем же именем. Обычное сохранение в новой версии может не помочь, а "сохранить как" обновляет структуру файла.

[SAMMY 0]

SAMMY

Частично Sergei вам ответил (спасибо). Что касается "Зам.", то оно ставится макросом DProp при внесении Изменения. Макрос Мастер здесь не причем.

Это, как я понимаю, вы пытаетесь поправить значки Roughness? Если так, то это обычные блоки солида. И редактируются они штатными средствами солида. Если хотите внести свои правки, то необходимо пересохранить отредактированные блоки с теми же именами.

Leon

Спасибо за ответы и конечно за Ваш сборник макросов.

Сегодня закончил адаптацию вашего труда под требования своего предприятия. Буду теперь обкатывать. В связи с пережитым приключением и мозголоманием возникли вопросы:

1. Размеры шрифтов для элементов оформления чертежа жестко регулируются макросом MProp и в настройках документа все изменения сбрасываются на установки макроса после обновления осносной надписи через Dprop? Я правильно понял? Если так, то можно ли сделать это отдельной процедурой с возможностью регулировки руками.

2. Не планируется ли написания какого-нибудь модуля для внесения и редактирования ТТ? Что-то наподобие OsnovnayaNadpis_Beta_2.4.

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

Заранее спасибо.

Изменено 24 декабря 2009 пользователем SAMMY

[Leon 442]

. Размеры шрифтов для элементов оформления чертежа жестко регулируются макросом MProp и в настройках документа все изменения сбрасываются на установки макроса после обновления осносной надписи через Dprop? Я правильно понял? Если так, то можно ли сделать это отдельной процедурой с возможностью регулировки руками.

2. Не планируется ли написания какого-нибудь модуля для внесения и редактирования ТТ? Что-то наподобие OsnovnayaNadpis_Beta_2.4.

3. Не планируется ли написание макроса, который делал бы Ведомости спецификаций и Ведомости держателей подлинников? Было бы здорово, т.к делать их вручную - это такой гемор...

1. Я по возможности делал все такие настройки отключаемыми. Если в Общих настройках отключена проверка форматов, то макрос Dprop не будет проверять и менять шрифты. В макросе Mprop задаются размеры только для нескольких заметок основной надписи, таких как Наименование, Материал, Масса и Литера. Это связано с тем, что приходится управлять их положением при различном количестве строк.

2. Такой модуль есть, так и называется ТТ. В теме "Сделай свою работу..." я его выкладывал. Чуть позже выложу здесь, хочу кое-что в нем доделать.

3. Ведомость спецификаций - возможно, а ведомость держателей вряд ли, мне кажется, этот документ тяжело автоматизировать.

[SAMMY 0]

1. Я по возможности делал все такие настройки отключаемыми. Если в Общих настройках отключена проверка форматов, то макрос Dprop не будет проверять и менять шрифты. В макросе Mprop задаются размеры только для нескольких заметок основной надписи, таких как Наименование, Материал, Масса и Литера. Это связано с тем, что приходится управлять их положением при различном количестве строк.

2. Такой модуль есть, так и называется ТТ. В теме "Сделай свою работу..." я его выкладывал. Чуть позже выложу здесь, хочу кое-что в нем доделать.

3. Ведомость спецификаций - возможно, а ведомость держателей вряд ли, мне кажется, этот документ тяжело автоматизировать.

Спасибо за ответ.

ТТ подожду доделанный

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

Как сделать чтобы в специф-и в двухстрочных наименованиях в разделах стандартные изделия, прочие изделияя, материалы ГОСТ(или др. обозн. докум.) писался полностью с новой строки?

Имеется:

Винт .........

ГОСТ Р 50405

-92

Должно быть:

Винт .........

ГОСТ Р 50405-92

На сочтите слишком требовательным

[Leon 442]

Как сделать чтобы в специф-и в двухстрочных наименованиях в разделах стандартные изделия, прочие изделияя, материалы ГОСТ(или др. обозн. докум.) писался полностью с новой строки?

Подобрать коэффициент сжатия шрифта в настройках спецификации.

За предложение помощи спасибо, буду иметь в виду.

[SergSit 0]

"...Подскажите как исправить вот такую вот проблемку с SpecEditor: зависает в вот таком состоянии и именно только с определенными сборками(с другими работает без проблем)

... SW2010 SP0 "

Была аналогичная проблема, вроде удалось решить.

----------------------------------------------------

For j = 1 To nNumRow - 1

If swTable.Text(j, nNumColumn - 1) = sSpecData(i, nNumColumn - 1) Then

strTemp = swTable.Text(j, nNumColumn - 1)

Debug.Print "Перемещаем строку", swTable.Text(j, 4), swTable.Text(j, nNumColumn - 1), sSpecData(i, nNumColumn - 1)

'26/12/09 заменил swTableItemInsertPosition_Last на swTableItemInsertPosition_After

ok = swTable.MoveRow(j, swTableItemInsertPosition_Last, j + 1) ' Перемещаем строку

' Проверяем, не помешала ли удаленная строка

l = 0

While l = 0

If swTable.Text(j, nNumColumn - 1) = strTemp Then

Debug.Print "Перемещаем строку", swTable.Text(j, 4), swTable.Text(j, nNumColumn - 1), sSpecData(i, nNumColumn - 1)

ok = swTable.MoveRow(j, swTableItemInsertPosition_Last, j + 1) ' Перемещаем строку

---------------------------------------------------------------

Сделал простую сборку, для которой в SW2009sp4 спецификация строилась, а в SW2010sp0 макрос зависал.

Затем сравнил в разных версиях SW работу участков макроса на котором происходило зависание.

Разница оказалось в том что строка

ok = swTable.MoveRow(j, swTableItemInsertPosition_Last, j + 1) ' Перемещаем строку

в SW2009sp4 меняет местами строки j и j+1 спецификации, а в SW2010sp0 строка j, как и положено ей,

переносится в конец спецификации. В SW2010sp0 это приводило к тому, что спецификация и массив sSpecData

не соответствовали другу, что на последующих этапах сортировки приводило к зависанию.

Замена строки в SW2010sp0 на

ok = swTable.MoveRow(j, swTableItemInsertPosition_After, j + 1) ' Перемещаем строку

устранило зависание макроса.

Проверку проводил на простых сборках в SW2010sp0. Т.к. не уверен что правильно понял алгоритм работы макроса, собственно вопросы к Leonу:

1. при сортировке спецификации задумывалось, что сортируемые строки меняются местами или одна строка переносится в

конец спецификации.

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

Изменено 26 декабря 2009 пользователем SergSit

[TUY 1]

....

ok = swTable.MoveRow(j, swTableItemInsertPosition_Last, j + 1) ' Перемещаем строку

в SW2009sp4 меняет местами строки j и j+1 спецификации, а в SW2010sp0 строка j, как и положено ей,

переносится в конец спецификации. В SW2010sp0 это приводило к тому, что спецификация и массив sSpecData

не соответствовали другу, что на последующих этапах сортировки приводило к зависанию.

Замена строки в SW2010sp0 на

ok = swTable.MoveRow(j, swTableItemInsertPosition_After, j + 1) ' Перемещаем строку

....

Заменил строчки(или надо было одну менять? :) ) как написал SergSitю. Прогнал на сборке(50 дталей), которая раньше зависала,, проигрался со свойствами деталей, багов пока не заметил все работает нормально. Ждем вердикта Leon

P.S. Спасибо ребята за проделанную работу и конечно особо благодарен Leon-у

Изменено 26 декабря 2009 пользователем TUY

[Crab 4]

SerqSit TUY

А старые спецификации редактирует теперь (за 2009).

А более поточней можете подсказать какие строчки менять.

В макросах не силен.

Тоже хочу попробовать.

[Leon 442]

SergSit

26/12/09 заменил swTableItemInsertPosition_Last на swTableItemInsertPosition_After

Проверку проводил на простых сборках в SW2010sp0. Т.к. не уверен что правильно понял алгоритм работы макроса, собственно вопросы к Leonу:

1. при сортировке спецификации задумывалось, что сортируемые строки меняются местами или одна строка переносится в

конец спецификации.

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

1. Да, они должны менятся местами.

2. Не должна нарушать.

Похоже в 10-ой версии изменился API и данные команды стали работать правильно. В предыдущих версиях я не смог заметить разницу между _Last и _After и почему-то выбрал _Last. SergSit, спасибо вам за ценную помощь. Еще раз убеждаюсь, что в макросах, в отличии от dll и exe есть своя прелесть, каждый может поучаствовать в их развитии.

streamdown

После вставки этих макросов, перестал работать макрос "Оснвная надпись Beta v.2.4 SW2007". Т.е. в макросе редактируется текст, а в чертеже не отображается.

Если я правильно помню, то это макрос уважаемого Kelny и работает он со своим набором свойств и форматок. Очень велика вероятность, что вместе так сразу они существовать не смогут. Форматки вы можете использовать для каждого свои, но свойства в файлах будут пересекаться и кофликтовать. Я не помню как все организовано у Kelny, скорее всего там свойства прошиты намертво, но в моих макросах их можно изменить, например добавить для каждого свойства в начале какой-нидь префикс. Этим вы исключите конфликт свойств и возможно все заработает.

[Leon 442]

P.S. Исправленную версию SpecEditor выложу позже. Сейчас не до этого. На работе подхватил какую-то вирусяку и комп перестал видеть любимую флешку, на которой был браузер, аська и последние версии макросов. Дома вирус победил, флешку починил и часть инфы восстановил. Но, к сожалению, некоторые последние наработки по макросам погибли.

Вот еще вопрос, при печати чертежа, линии уж больно тонкие (и прямо серые) - это меняется?

Это у вас наверно режим печати в оттенках серого. Надо ч.б. выставить. Толщина линий тоже настраивается в солиде.

[Leon 442]

streamdown

Не понятно, что значит маленький? В какой момент возникает ошибка?

[Leon 442]

streamdown

Если все ваши форматки созданы с помощью макроса Master, то нет разницы А4 это или А3. Остальное зависит от настроек солида и шаблона чертежа, то что drwdot.

[asasser 0]

Нашёл "фичу".

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

С другой стороны красиво выглядит чертёж с массой в граммах. Возможно ли, чтоб и волки сыты остались и в ведомости деталей путаницы небыло?

[Sergei 298]

LEON, новогоднее обновление макросов ожидается?

[Leon 442]

Нашёл "фичу". Мпроп меняет размерность массы детали. Потом в сводной ведомости деталей возникает путаница, ибо часть деталей в кг, часть в г и тд.

С другой стороны красиво выглядит чертёж с массой в граммах. Возможно ли, чтоб и волки сыты остались и в ведомости деталей путаницы небыло?

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

LEON, новогоднее обновление макросов ожидается?

Вообще да, но до Нового года я не успею. Может на каникулах или после. Ничего капитально нового не будет. Так, мелкие доработки. Есть идея как отвязать форматки от конкретного шрифта. Если заметки форматки сделать со шрифтом по умолчанию, но в начале каждой добавить, например <FONT size=2,5>, то в независимости от того какой размер будет выставлен для заметки в настройках шаблона чертежа, размер заметки будет всегда 2,5 мм, а вот шрифт будет управляться общими настройками шаблона. Как, реализовывать такую штуку?

[asasser 0]

А что за сводная ведомомость деталей?

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