Перевод сборки из старой версии в новую

[Дим]

Помню вроде что то такое было на форуме, но не могу найти(или правильно сформулировать) эту тему.
В общем мне нужно из сборки вытащить материал деталей. Сборка сделана в 9-ке.
Чтобы в отчете прописался материал - деталь нужно открыть, перестроить и сохранить.
Но в Сборке более 7000 деталей!

Вроде кто то даже библиотеку написал для такой перегонки "на автомате" - помогите найти ! горю!

[sulyco]

http://forum.ascon.ru/index.php/topic,16941.0.html
это?

[Дим]

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

[chelkar]

Тоже макрос, но попроще.
Открыть сборку и запустить макрос. Он откроет все компоненты "в темную", перестроит их и сохранит.
Не знаю че такое "Чтобы в отчете прописался материал", проверить не могу.
И на 7-ми тыщах тоже, не пробовал

[Дим]

Хорошо, попробую.

Не знаю че такое "Чтобы в отчете прописался материал", проверить не могу.

Материл, вернее масса в отчет не передается пока не перестроится деталь в отдельном окне.

[Дим]

РАБОТАЕТ!!!

Спасибо! проверил на подсборке все ок!
На общей проверю только завтра!

[chelkar]

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

[Дим]

А первый макрос у меня и подсборки сделал!
Правда вложенность была не более трех уровней

А на тысячах - завтра проверю.

[Дим]

 :`(не прошла большая сборка

[chelkar]

Упс!
Чета не получается новый документ для перестроения.
Попробуйте заменить последнюю часть макроса на вот это
-------
#Получаем список компонентов всей сборки с учетом вложенности
sp = PartRec (TopPart)
#Открыть, престроить и сохранить компоненты сборки
for item in sp:
    fileName = item.fileName
    RebuildDocument3D = iKompasObject.Document3D()
    if RebuildDocument3D != None :
        RebuildDocument3D.Open (fileName, 1)
        RebuildDocument3D.RebuildDocument ()
        RebuildDocument3D.Save ()
        RebuildDocument3D.close ()

#Перестраиваем документ
iDocument3D.RebuildDocument ()

iKompasObject.ksMessage ('Готово!')
-----------------
Ну или пересохраните по частям 

[Дим]

УВЫ!

[chelkar]

Ну не знаю в чем беда. Может не учел чего ...
Попробуйте вот в этой строчке поменять 1 на 0
        RebuildDocument3D.Open (fileName, 0)
тогда документы визуально будут открываться, может быть увидете на ком спотыкается.
"Плохой" файл будет сразу за последним открытым перед ошибкой.

А по частям тоже не выходит?