Подчет количества размеров на чертеже

[вфм 0]

Добрый день. Необходимо подсчитывать количество размеров  на чертеже инвенторовском. Т.е. на листе сколько проставлено размеров в штуках. Нас заставляют считать для расчета нашей эффективности, как конструкторов. ))) Поскажите, можно ли как то  узнавать это количество не тыкая карандашом в монитор( через илоджик , через свойства...)?

[Bully 1 098]

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

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

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

Изменено 27 марта 2020 пользователем Bully

[вфм 0]

. Считается также количество форматов, пунктов ТТ , шероховатостей, сварки....   Проверяющие не дураки.  Болт  М6х10 на А0 не прокатит. ) 

Но, вернемся к вопросу. Выделить фильтром  все размеры можно. Но как узнать  их количество.  Может как через  iLogic  кто-то подскажет? 

[KorovnikovAV 509]

9 минут назад, вфм сказал:

Проверяющие не дураки. 

Да нет, дэбилы самые настоящие.

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

4 часа назад, Bully сказал:

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

Да вроде тут регулярно подобная «оптимизация» появляется.

 

PS. вместо того, чтобы бороться с менеджерским маразмом вы хотите его автоматизировать 

 

PPS если у inventor'a есть модуль создания контрольных карт то в нем все посчитается автоматом.

Ищите по ключевым словам вроде Autodesk inventor FAI или Inventor inspection report

[vasyam 483]

Гы, надо нашим баранам  командирам показать, им наверняка понравится этот маразм,  этот метод эффективного менеджмента.

Изменено 27 марта 2020 пользователем vasyam

[вфм 0]

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

Вернусь к вопросу.

 Допустим, получили мы   значение в свойствах чертежа. Можно это значение из свойств чертежа передать в спецификацию модели?

Изменено 27 марта 2020 пользователем вфм

[KorovnikovAV 509]

То есть вы не просто не против этого маразма но и приняли его для себя? Ну то есть нормативный документ 82 года и инвентор в 2020. 

Решение я вам уже подсказал. Нумерация размеров и ТТ стандартный инструмент для FAI и например в SW это делается в модуле Inspection. Для инвентора он точно есть вам осталось только найти кто его разработал - Autodesk или кто то сторонний. 

[вфм 0]

Спасибо. Попробуем порыть в этом направлении.

Касаемо не основного вашего вопроса.  Если время, что я реально трачу на разработку  КД, и время которое выдает программа, после вбивания параметров относящихся к  чертежам изделия, совпадает, то таки да.) У нас специально- дрессированный человек  планируется, дабы сидел и эти параметры в  таблицу вбивал. Далее прога считает заготовки, метизы, прочие  и тд. и.т.п.  . Я так понимаю это что-то типа  PLM-системы  для  нашего единичного производства.

 

[Bully 1 098]

1 час назад, вфм сказал:

Проверяющие не дураки.

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

1 час назад, вфм сказал:

Выделить фильтром  все размеры можно. Но как узнать  их количество. 

нажимаешь "del" - показывает сколько удалено элементов. Потом Ctrl-Z или просто выйти без сохранения.

Изменено 27 марта 2020 пользователем Bully

[вфм 0]

Bully , в Автокаде да, это работает. В Инвенторе  нет   командной строки.

Изменено 27 марта 2020 пользователем вфм

[KorovnikovAV 509]

38 минут назад, вфм сказал:

Спасибо. Попробуем порыть в этом направлении.

Касаемо не основного вашего вопроса.  Если время, что я реально трачу на разработку  КД, и время которое выдает программа, после вбивания параметров относящихся к  чертежам изделия, совпадает, то таки да.) У нас специально- дрессированный человек  планируется, дабы сидел и эти параметры в  таблицу вбивал. Далее прога считает заготовки, метизы, прочие  и тд. и.т.п.  . Я так понимаю это что-то типа  PLM-системы  для  нашего единичного производства.

 

Видите ли в чем дело - планирование загрузки и сверка план-факт это менеджерская задача. В данном случае нужно как можно точнее оценить время разработки конструкторской документации (хотя правильно оценивать как раз полный цикл) и сверить время плановое и фактическое. И разница между этими показателями лишь по одной из причин может быть то что конструктор филонит. То есть системную проблему решают точечно. Это не сработает. 

Тем более что вы пишите что производство у вас единичное. 

А теперь вернёмся к мотивации конструктора. Он знает что платить ему будут не за готовое изделие и его вклад в него а за количество размеров и пунктов в ТТ. Что начинает делать конструктор если он не дурак? Множить то что увеличивает его KPI. 

Я уже сталкивался с подобным подходом в 2015 году когда новый ГД что то такое внедрял у нас на позапрошлой работе в компании которая занималась как раз единичными заказами. 

Время на подобную ерунду увеличило сроки на 30-40% и пошли начались проблемы с потребителями по поводу срыва сроков. Отменили через месяц. 

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

Предлагаю вам все же плотно копнуть в сторону FAI и считать размеры на плане контроля которые пригодятся на приемке, чтобы не черкаться на КД. Это позволит отделу качества и отделу контроля качества улучшить свою работу. 

[frei 458]

19 часов назад, вфм сказал:

можно ли как то  узнавать это количество не тыкая карандашом в монитор( через илоджик , через свойства...)?

Sub dimcount()
    ' Set a reference to the drawing document.
    oDocType = ThisApplication.ActiveDocumentType
    If oDocType <> kDrawingDocumentObject Then
        MsgBox "This is not a drawing document." + vbCrLf + "Please open a drawing document.", vbOKOnly, "Drawing Document Error"
        Exit Sub
    End If
    Dim oDrawDoc As DrawingDocument
    Set oDrawDoc = ThisApplication.ActiveDocument
    ' Set a reference to the active sheet.
    Dim oSheet As Sheet
    Set oSheet = oDrawDoc.ActiveSheet
    oGenDimCount = oSheet.DrawingDimensions.GeneralDimensions.Count
    MsgBox "General Dims Count = " + CStr(oGenDimCount) & vbNewLine & "Drawing Dims Count = " + CStr(oSheet.DrawingDimensions.Count)
End Sub

Макросом. С типами размеров на чертеже не разбирался.

 

PS референс: https://forums.autodesk.com/t5/inventor-customization/count-inspection-dimensions-for-use-in-custom-inspection-dim/td-p/5074368

 

Изменено 27 марта 2020 пользователем frei

[вфм 0]

frei,  большое спасибо!

[frei 458]

36 минут назад, вфм сказал:

frei,  большое спасибо!

для iLogic басню можно сократить в одну строку

MessageBox.Show("Dims Count = " + CStr(ThisApplication.ActiveDocument.ActiveSheet.DrawingDimensions.Count))

 

[frei 458]

ну и что бы закрыть тему - в случае если листов в чертеже больше  от 1-го и более

macros:

Sub dimcount()

    ' Set a reference to the drawing document.
    oDocType = ThisApplication.ActiveDocumentType
    If oDocType <> kDrawingDocumentObject Then
        MsgBox "This is not a drawing document." + vbCrLf + "Please open a drawing document.", vbOKOnly, "Drawing Document Error"
        Exit Sub
    End If
    Dim oDrawDoc As DrawingDocument
    allDimCount = 0
    Set oDrawDoc = ThisApplication.ActiveDocument
    For Each Sheet In oDrawDoc.Sheets
        oGenDimCount = Sheet.DrawingDimensions.Count
        allDimCount = allDimCount + oGenDimCount
    Next
    MsgBox "Dims Count = " + CStr(allDimCount)

End Sub

правило iLogic:

    oDocType = ThisApplication.ActiveDocumentType
    If oDocType <> kDrawingDocumentObject Then
        MsgBox ("This is not a drawing document." + vbCrLf + "Please open a drawing document.", vbOKOnly, "Drawing Document Error")
        Exit Sub
    End If
    allDimCount = 0
    oDrawDoc = ThisApplication.ActiveDocument
    For Each Sheet In oDrawDoc.Sheets
        oGenDimCount = Sheet.DrawingDimensions.Count
        allDimCount = allDimCount + oGenDimCount
    Next
    MsgBox ("Dims Count = " + CStr(allDimCount))

Изменено 27 марта 2020 пользователем frei

[Fedorly 19]

когда то писали программу для определения трудоемкости работы конструктора
за основу был взят норматив на расчет времени на разработку КД http://www.libussr.ru/doc_ussr/usr_13220.htm
в итоге получилось нечто подобное