Inventor 2021. Специфікація українською мовою

[d.grytsenko]

Чи можливо змінити шаблон специфікації, щоб її таблиця та основний напис відображались українською мовою при вставці на кресленику і при збереженні в Excel? Якщо можливо, то як це зробити?

[Alexander_Chernikov]

По iLogic є матеріали у вбудованій довідці, але із-за відсутності відлагоджувача програми, я готовлю код з використанням редактора VBA і потім з мінімальними змінами додаю його у правило.
Найбільш складним є саме вибір параметрів та методів для пошуку потрібного елемента об'єктної моделі Інвентора. 
По VBA також є вбудована довідка - "Довідка з програмування/АРІ.
Також є ресурс  "Inventor API Training" - там більше 20 уроків:  
https://modthemachine.typepad.com/my_weblog/2013/02/inventor-api-training-lesson-1.html
ну і, звісно, форум: 
https://forums.autodesk.com/t5/inventor-ilogic-and-vb-net-forum/bd-p/120

[Alexander_Chernikov · Accepted solution]

Правило оновлено, працює і в англомовній, і в російськомовній версіях.
Розміщує вставлену специфікацію над основним написом!

Sub Main() ' EditPartList()
' Before using PartList change GOST Table Style: Don't Display Trailing Zero
  Dim oDoc As DrawingDocument
  Dim oCurSh As Sheet
  Dim oBOMTable As CustomTable
  Dim oTabN, oShrCond, oShrNorm As String
  Dim oTbPos As Point2d
  oDoc = ThisApplication.ActiveDocument
  oCurSh = oDoc.ActiveSheet
  Select Case oCurSh.Application.LanguageName
    Case "Russian"
      oTabN = "Список деталей по ГОСТ"
      oShrCond = "Сжатый текст (ГОСТ)"
      oShrNorm = "PL обычный текст (ГОСТ)"
    Case "English"
      oTabN = "GOST Parts List"
      oShrCond = "Condensed Text (GOST)"
      oShrNorm = "PL Regular Text (GOST)"
    Case Else
      Debug.Print ("Unknown Language")
      Exit Sub
  End Select
  If oCurSh.CustomTables.Count < 1 Then
    Exit Sub
  End If
  For i = 1 To oCurSh.CustomTables.Count
    If Left(oCurSh.CustomTables.Item(i).Title, Len(oTabN)) = oTabN Then
      oBOMTable = oCurSh.CustomTables.Item(i)
'      oDoc.StylesManager.FeatureControlFrameStyles.Item(7).TrailingZeroDisplay = False
      oBOMTable.ColumnHeaderTextStyle = oDoc.StylesManager.TextStyles.Item(oShrCond)
      oBOMTable.ColumnHeaderTextStyle.FontSize = 0.3
      oBOMTable.ColumnHeaderTextStyle.WidthScale = 0.6
      oBOMTable.DataTextStyle = oDoc.StylesManager.TextStyles.Item(oShrNorm) 
      oBOMTable.DataTextStyle.FontSize = 0.3
      oBOMTable.DataTextStyle.WidthScale = 0.9
      oBOMTable.Columns.Item(1).Title = "Фор- мат"
      oBOMTable.Columns.Item(1).Width = 0.6
      oBOMTable.Columns.Item(2).Title = "Зо- на"
      oBOMTable.Columns.Item(2).Width = 0.6

      oTbPos = ThisApplication.TransientGeometry.CreatePoint2d( _
          oCurSh.Width - 19, oCurSh.TitleBlock.RangeBox.MaxPoint.Y + _
          (oBOMTable.RangeBox.MaxPoint.Y - oBOMTable.RangeBox.MinPoint.Y))
      oBOMTable.Position = oTbPos
      oBOMTable.Update
      oCurSh.Update
      Exit Sub
    End If
  Next
End Sub

[d.grytsenko]

Так дійсно, працює! Налаштував таблицю, вставив специфікацію, запустив правило:

Дякую! Цікаво.

А чи можна додати зміни у ті файли, які знаходяться в архіві, щоб не робити стільки кроків? 

[Alexander_Chernikov]

І для того, щоб закрити питання з вимкненням вручну відображення нулів після крапки в таблицях необхідно замінити файл, що додається:
table.xml 
у теці
C:\Users\Public\Documents\Autodesk\Inventor 20хх\Design Data

Чомусь тільки для стиля "Таблиця ГОСТ" цей параметр виявився ввімкненим (...

[Alexander_Chernikov]

Для того, щоб для кожного складального кресленика не завантажувати це правило (або й інші, коли вони з'являться), треба його розташувати у окремій теці і вказати її адресу для "Зовнішніх правил".
Це робиться в налаштуваннях iLogic:

Я обрав теку Macros за шляхом
C:\Users\Public\Documents\Autodesk\Inventor 2023\Macros

додав її до списку

та скопіював туди правило.

Тепер воно завжди доступно для запуска.

[d.grytsenko]

Дякую! Створив теку для правил. 

Тепер ще одна проблема вилізла. Після заміни файлу table.xml при створенні кресленика на основі свого шаблону вилізає повідомлення:

Тепер потрібно відкрити дозвіл на редагування стилів і внести зміни стилю в програму?

[Alexander_Chernikov]

Треба відредагувати налаштування стилів саме у шаблоні - відкрити його та змінити стиль таблиці.

[makcik_s81]

будьте ласкаві , для 2021го інвентора. дякую.

[Alexander_Chernikov]

Вітаємо на форумі!
Необхідні файли розміщено у теці "AI2021_Spec_ESKD" за посиланням:
https://drive.google.com/drive/folders/1HojU_UUTBuSF7OqBd6cwrtJoRpQqBium?usp=sharing

Про всяк випадок в архиві розміщені вихідні файли (для англомовної та російськомовної локалізацій) - з суфіксами *_00, *_ru, *_en відповідно.

Тека Bin зазвичай розташована у місці встановлення програми: за замовчуванням -
C:\Program Files\Autodesk\Inventor 2021\Bin

Шаблон специфікації (і деякі додаткові файли, адаптовані на кафедрі, зокрема, технічні умови) слід розмістити у теці GOST -
C:\Users\Public\Documents\Autodesk\Inventor 2021\Design Data\GOST\

[makcik_s81]

дякую. поступово вивчаю. напрямок поки що зрозумілий.

є декілька пропозицій, на що звернути увагу: у українізованих файлах соять ГОСТ, які давно не діють в Україні.

я перевіряю статус ГОСТ та його заміну на ДСТУ на сервісі http://online.budstandart.com/ua/catalog/doc-page.html?id_doc=28657

[Alexander_Chernikov]

Так, @makcik_s81 звісно, це треба виправляти,
в першу чергу для матеріалів, технічних вимог та процесів (зварювання та ін.).
Але, на жаль, не завжди вказаний ДСТУ / ISO, на який слід замінити ГОСТ.
Якщо у Вас вже є відповідні таблиці, давайте будемо вносити зміни та пропонувати ці файли.

[makcik_s81]

поки що нічим похвалитися щодо технічних вимог до зварювання.

є деякі чернетки:

Зварювання 111, 135 або 141 по ДСТУ ISO 4063:2014.
Електроди УОНИ 13/55 або дріт Св-08Г2С по СОУ ВЕА.200.1.1/01:2016.

шукаю, де лежать "Обрані матеріали", там є деякі листові матеріали. я користуюся цим функціоналом, щоб контролювати матеріал в кресенні (текстова замітка, властивість "матеріал" моделі)

[makcik_s81]

в мене майже всі складальні та монтажні креслення мають специфікацію на листі. я пристосувався правити таблицю так: "формат" має ширину 14мм, "зона" має ширину 8мм, ""Поз." без змін, "Позначення"  має ширину 60мм, інші без змін. разом 185мм. а потімвручну по обставинам розміщаю специфікацію або вгорі або внизу, благо що овна примагнічується до кутових точок.

так, це відхилення від ЄСКД, але маємо те що маємо.

трішки поекспериментував із правилом, підібрав для себе параметри. "Зо- на" спеціально залишив, щоб так сформувалася шапка таблиці.

Sub Main() ' EditPartList()
' Before using PartList change GOST Table Style: Don't Display Trailing Zero
  Dim oDoc As DrawingDocument
  Dim oCurSh As Sheet
  Dim oBOMTable As CustomTable
  Dim oTabN, oShrCond, oShrNorm As String
  Dim oTbPos As Point2d
  oDoc = ThisApplication.ActiveDocument
  oCurSh = oDoc.ActiveSheet
  Select Case oCurSh.Application.LanguageName
    Case "Russian"
      oTabN = "Список деталей по ГОСТ"
      oShrCond = "Сжатый текст (ГОСТ)"
      oShrNorm = "PL обычный текст (ГОСТ)"
    Case "English"
      oTabN = "GOST Parts List"
      oShrCond = "Condensed Text (GOST)"
      oShrNorm = "PL Regular Text (GOST)"
    Case Else
      Debug.Print ("Unknown Language")
      Exit Sub
  End Select
  If oCurSh.CustomTables.Count < 1 Then
    Exit Sub
  End If
  For i = 1 To oCurSh.CustomTables.Count
    If Left(oCurSh.CustomTables.Item(i).Title, Len(oTabN)) = oTabN Then
      oBOMTable = oCurSh.CustomTables.Item(i)
'      oDoc.StylesManager.FeatureControlFrameStyles.Item(7).TrailingZeroDisplay = False
      oBOMTable.ColumnHeaderTextStyle = oDoc.StylesManager.TextStyles.Item(oShrCond)
      oBOMTable.ColumnHeaderTextStyle.FontSize = 0.33
      oBOMTable.ColumnHeaderTextStyle.WidthScale = 0.8
      oBOMTable.DataTextStyle = oDoc.StylesManager.TextStyles.Item(oShrNorm) 
      oBOMTable.DataTextStyle.FontSize = 0.3
      oBOMTable.DataTextStyle.WidthScale = 0.95
      oBOMTable.Columns.Item(1).Title = "Формат"
      oBOMTable.Columns.Item(1).Width = 1.4
      oBOMTable.Columns.Item(2).Title = "Зо- на"
      oBOMTable.Columns.Item(2).Width = 0.8
      oBOMTable.Columns.Item(3).Title = "Поз."
      oBOMTable.Columns.Item(3).Width = 0.8
      oBOMTable.Columns.Item(4).Title = "Позначення"
      oBOMTable.Columns.Item(4).Width = 6.0

      oTbPos = ThisApplication.TransientGeometry.CreatePoint2d( _
          oCurSh.Width - 19, oCurSh.TitleBlock.RangeBox.MaxPoint.Y + _
          (oBOMTable.RangeBox.MaxPoint.Y - oBOMTable.RangeBox.MinPoint.Y))
      oBOMTable.Position = oTbPos
      oBOMTable.Update
      oCurSh.Update
      Exit Sub
    End If
  Next
End Sub

[makcik_s81]

на монтажному кресленні інвентор 2021 аварійно закривається, при спробі сформувати відривну специфікацію.

в специфікації присутні близько 10 поз. віртуальних компонентів.

[makcik_s81]

коли у специфікації більше 2 аркушів, виникає помилка як у мене. 

я в шаблоні скопіював наступні листи. але, після 2го арк., нумерація автоматично не проставляється.

[makcik_s81]

виплив ще один нюанс в специфікації. в розділ складальних одиниць заноситься фантомна збірка (а не повинна), і одночасно ця збірка розкривається на компоненти. звісно що таке вручну виправляється, але треба враховуввати.

[Alexander_Chernikov]

На жаль, все це "сховане" у модулі "Annotate (ESKD) - Gost.dll", який останніми роками майже не розвивався.

Взагалі невідомо, чи залишиться підтримка цього стандарту.
Мабуть, слід дивитись на загальний модуль оформлення креслеників та розробляти нові правила, що будуть полегшувати роботу (.

[anton.mashkin.ua]

Доброго дня. Але вже вийшов Inventor 24 - а для 2024 є спеціфікації? Я спробував - від 23 не працюють. 

[Alexander_Chernikov]

На жаль, ще ні.
Але працюємо...

До речі, оновлено специфікацію для 2023.4
https://drive.google.com/file/d/1cTAfQ8f552TW7nd_IWy30du6YHsblnJI/view?usp=sharing

[Alexander_Chernikov · Accepted solution]

Адаптація для специфікації у АІ 2024.1 - за посиланням:

https://drive.google.com/file/d/1p6QpsEZpz2-xxXyC9ksTq3vKGLiPvs_Q/view?usp=sharing