Создание 3D-модели изделия остекления высокопрочного электрообогреваемого кабины машиниста в программном пакете SolidWorks

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

COSMOSWorks построен на базе метода конечных элементов, что позволяет обрабатывать сложные детали и сборки по одному и томе же алгоритму (каждое тело обрабатывается как отдельная деталь).

Перед созданием модуля-конвертора были выделены следующие этапы, которые должна выполнять программа:

1. Сбор данных о имеющихся деталях и сборках, участвовавших в статическом анализе механического моделирования.

2. Нахождение максимальной нагрузки для каждой из имеющихся деталей.

3. Сортировка полученных данных о нагрузках по убыванию.

4. Запуск программы Microsoft Excel, создание файла-таблицы

5. Заполнение полученными данными файла-таблицы

Полный листинг программы можно посмотреть в Приложении 2.

Основной функцией, которая будет выполнять сбор данных по имеющимся деталям и сборкам, является функция TraverseComponent. С её помощью программа обходит всё дерево деталей начиная с корневого компонента и запоминает, какие составные детали имеются в 3D-модели.

В начале в главной процедуре main(), которая является точкой входа в программу, определяются основные этапы для работы программного модуля, а именно:

· Рабочее приложение SolidWorks;

· Текущий открытый проект в сессии SolidWorks;

· Имеющиеся сборка деталей;

· Компоненты корневой модели.

Здесь также происходит вызов основных функций CriticalElements, Sort, Excel, о которых будет рассказано ниже.

Далее определяются функции и методы, которые взаимодействуют с рабочей средой активной 3D-модели в SolidWorks.

Функция GetEntities предназначена для сбора данных о результирующей коллекции деталей для обхода корневой сборки с помощью метода TraverseComponent:

· CLCTN определяется как Collection, основная сборка\коллекция;

· swModel определяется как SldWorks.Configuration, служит для получения данных о сборке;

· swConf определяется как SldWorks.Component2, позволяет получить доступ к компонентам модели без учета сборки;

· swRootComp определяется как SldWorks.ModelDoc2, запрашивает данные корневой модели, которая является активной в данный момент.

· CmpntName определяется как Entity, получает названия деталей обекта.

Метод TraverseComponent позволяет рекурсивно вычислить все имеющиеся детали, начиная с корневой сборки, а также определить все её подкомпоненты. Родитель в данном случае - корневая сборка, дети - ветви дерева модели. Учитывается то, что в сборке может быть еще одна сборка, в ней еще одна и так далее. В данном случае необходимо применить параметр nLevel, который отвечает за уровень вложенных элементов сборки.

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

Все функции и методы приложения COSMOS относятся к SolidWorks Simulations, работа ведется с библиотеками COSMOSWorks.

Метод CriticalElementsForEE позволяет найти максимальные напряжения в каждом компоненте сборки. С помощью функции COSMOSObject приложения COSMOSWorks можно получить данные об объекте, над которым проводиться статический анализ в SolidWorks Simulations.

COSMOSWORKS.ActiveDoc - с помощью библиотек COSMOSWorks позволяет определить, какое исследование активно в данный момент.

ActDoc.StudyManager - менеджер исследований, используется для загрузки активного исследования.

Study.Results - позволяет получить результаты статического анализа активного исследования.

Основная функция поиска максимальных нагрузок, которая применяется в данном методе, называется MaxCriticalElements. В данной функции мы задаем начальный элемент max равный нулю, далее делаем проходку по массиву данных с полученными единицами нагрузки для каждой детали. Если при нахождении значения элемента i, большего чем значение переменной max, то данной переменной присваивается значение переменной i+1.

Для упорядочивания числовых данных о нагрузках по убыванию был создан метод сортировки Sort. В нём имеется счетчик входящих объектов sorted.Count, для которых определяется максимальная нагрузка .maxCritical.

Переборка объектов происходит до тех пор, пока не будет определен конечный.

Заключительный метод Excel позволяет взаимодействовать с программной Microsoft Excel, в которую передаются данные о компонентах 3D-модели после сортировки. Создается отдельный файл-книга, определяется ячейка первой колонки в самом левом углу. Для вывода данных необходимо два фиксированных столбца под название детали и единицы измерения Паскаль. С помощью обектов .Cells(row, 1).value = "Detail name" и .Cells(row, 2).value = "Pa" для двух ячеек заданы необходимые параметры. Далее в строках должна отображаться выгрузка по нагрузкам из исследования 3D-модели. Определяем переменную Е как объект, и для каждого объекта определяем .Name (название детали) и .MaxCriticalElements (значение максимальной нагрузки для детали).

2.3 Создание функциональной модели прогнозирования ИОВЭ с учетом механического моделирования

2.3.1 Создание статического анализа для исследования механического воздействия на ИОВЭ в дополнительном программном пакете SolidWorks Simulation

Для создания функциональной модели прогнозирования надежности изделия остекления высокопрочного электрообогреваемого кабины машиниста использовался дополнительный расчетный модуль SolidWorks Simulation. В данном модуле производится статический анализ на ударопрочность изделия остекления снарядом (бутылкой тип I по ГОСТ 10117-91 ёмкостью 0.7 литра и массой до 0.5±0.01 кг).

При проведении статического анализа в SolidWorks Simulation в дереве имеющихся деталей необходимо каждому компоненту задать свой материал. Так, например, для детали «Винт В.М3х10.58.016 ГОСТ 17473-80» был задан материал «Простая углеродистая сталь», для детали «Бобышка» - «Литая легированная сталь», а для «Резинового профиля» - материал «Бутил».

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



Рис. 26 Установка фиксированных креплений для статического анализа

Место удара снарядом было выбрано в центре изделия остекления, для чего был создан эскиз окружности на поверхности внешнего остекления диаметром 60мм. К указанному месту удара была применена сила величиной в 5.5 Ньютонов ( рисунок 27 ).

Рис. 27 Применение направленной силы в центр изделия

После установки необходимых опор и применения необходимых нагрузок на изделие создается сетка 3D-модели и запускается анализ конечных элементов. В зависимости от конфигурации ПК, на котором производятся вычисления, время обработки и анализа может занимать от 30 секунд до 2 минут. Как только все вычисления проведены, можно оценить результаты моделирования и визуально осмотреть 3D-модель после применения механического воздействия ( рисунок 28 и рисунок 29).



Рис. 28 Результаты моделирования приложенной силы в 5.5 Ньютонов в центр остекления, вид спереди

Рис. 29 Результаты моделирования приложенной силы в 5.5 Ньютонов в центр остекления, вид сзади

2.2.3 Тесты работы программного модуля

Для запуска программного модуля-конвертора необходимо в меню программного пакета SolidWorks перейти на вкладку «Инструменты», в появившемся меню выбрать дополнительную вкладку «Макрос» - «Выполнить». Откроется окно, где необходимо выбрать файл конвертора. После данных действий автоматически откроется программа Microsoft Excel с готовыми результатами, которые приведены ниже:

Detail name	Pa
Стекло_клей(одной моделью)	1603562
внешнее	1533746
клей2	1490345
среднее	1423587
клей1	1385436
Внутреннее	1365887
Резина	0
Сборка_бобышка	0
Бобышка	0
Крышка бобышки	0
Крышка бобышки2(втулка)	0
Винт 3х10 ГОСТ 17473-80	0
Датчик_1	0
Датчик_2	0

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

Из результатов механического моделирования видно, что изделие остекления высокопрочного электрообогреваемого кабины машиниста выдерживает максимально возможную нагрузку в 1.37 Н/мм² до сквозного пробоя изделия остекления. Соответственно, изделие остекления сможет выдержать прямой удар снарядом массой до 0.5±0.01 кг.

3. Экология и охрана труда

3.1 Общие требования охраны труда к организации рабочих мест

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

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

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

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

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

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

Соответственно, существуют основные нормы по использованию подобной техники:

· Соблюдение чистоты и порядка на рабочем месте;

· Использование сертифицированной аппаратной части ПК;

· Предоставление в пользование исправного оборудования для выполнения трудовых обязанностей;

· Соблюдение расстояния от глаз до монитора ( не менее 50 см от глаз);

· Расстояние между рабочими местами при наличии двух и более ЭВМ должно быть не менее 1 метра;

· В течении рабочего дня каждый час делать 10-15 минутный перерыв для снятия усталости;

· При возникновении неполадок в работе ЭВМ необходимо её обесточить и сообщить об этом руководству или техническому специалисту.



3.2 Вредные факторы, действующие на пользователя ЭВМ. Анализ таких факторов как шум, электромагнитные поля, вибрации, микроклимат, электробезопасность

Работа с электроаппаратурой и ЭВМ всегда подразумевает под собой повышенное воздействие вредных факторов на организм человека, таких как: шум, электромагнитные поля, вибрации, микроклимат, электробезопасность.

Рассмотрим подробнее каждый из них.

Шум

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

Согласно ГОСТ 12.1.003-83[19], уровень шума не должен превышать установленные показатели.

Вибрации

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

Нормы вибраций при работе с ЭВМ описаны в ГОСТ 12.1.012-90[20]

Микроклимат

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

Минимизировать воздействие этих факторов можно путём искусственного вентилирования рабочего помещения, проведения сухой и влажной уборки не реже 3 раз в неделю, проветривание помещений. Оптимальной температурой в рабочем пространстве принято считать температуру 20-25 °С с относительной влажностью воздуха в 50-60%.

Нормы микроклимата подробно описаны в положениях ГОСТ 12.1.005-88[21].

Электробезопасность

Обеспечение электробезопасности при работе с электрооборудованием и ЭВМ является одним из основных критериев безопасности. Помещения, где установлено рабочее оборудование должно соответствовать нормам пожарной безопасности и правилам эксплуатации электроприборов. Рабочее помещение должно быть вентилируемым ( для минимизации образования пыли ), сухим ( не должно быть никаких токопроводящих жидкостей рядом с рабочим оборудованием, подключенным к источникам тока ), с отрегулированным температурным режимом, провода и кабели должны быть изолированы в специальные коробы и не лежать беспорядочно на полу.

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

Нормы безопасности при работе с электроприборами регламентированы в положениях ГОСТ 12.1.038-82.

Электромагнитные поля

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

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

Предельно допустимая напряжённость ЭМП в течение рабочего дня не должна превышать:

По электрической составляющей, В/м:

- 50 - для частот от 60 кГц до 3 мГц;

- 20 - для частот от 3 до 30 мГц;

- 10 - для частот от 30 до 50 мГц.

По магнитной составляющей, А/м:

- 5 - для частот от 60 кГц до 1,5 мГц;

- 0,3 - для частот от 30 до50 мГц.

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

Нормы и стандарты по предельно допустимым уровням напряженности электрических полей подробно описаны в ГОСТ 12.1.002-84[22].

3.3 Определение оптимальной освещенности при работе с ЭВМ

Для организации оптимальной естественной и искусственной освещенности рабочего места на предприятии используются такие меры как ограничение слепящего воздействия естественного света и устранение бликующих поверхностей внутри рабочего помещения.

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

Искусственное освещение должно быть тщательно продумано таким образом, чтобы отсутствовали засветы и блики на экранах мониторов и других рабочих поверхностях, откуда происходит считывание информации работником. Минимальное расстояние от окна до рабочего места пользователя ЭВМ не должно быть меньше 1,5 метра и не менее 1 метра от стен. Минимальный показатель освещенности экрана - 200 lk, других объектов и рабочего стола не менее 400 lk. Для создания оптимального искусственного освещения рекомендуется использовать люминесцентные лампы типа ЛБ с цветовой температурой и излучением не более 4200К.

Нормы и установленные правила по организации оптимальной освещенности при работе с ЭВМ регламентированы в документе СанПиН 2.2.2.541-96. [23]



3.4 Обеспечение пожарной безопасности при работе оператора ЭВМ

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

Для предотвращения пожароопасных ситуаций следует обеспечить предприятие системами автоматической пожарной сигнализации, средств тушения пожаров (гидранты, огнетушители, порошковые и водные системы тушения пожаров) и самое главное - свободных и доступных путей эвакуации из помещений. Документ, регламентирующий установленные нормы обеспечения пожарной безопасности рабочих помещений определены в ГОСТ 21.1.004-91. [24]

3.5 Ожидаемые болезни и вредные воздействия на человека в ближайшем будущем

В настоящее время почти любой рабочий процесс тесно связан с работой на ЭВМ. Человек все больше времени проводит сидя за компьютером или рабочим оборудованием, не задумываясь или забывая простые правила сохранения своего здоровья. Необходимо совмещать здоровый образ жизни и работу за ЭВМ.

Основные вредные факторы, влияющие на состояние здоровья людей, работающих за компьютером:

· Сидячее положение в течение рабочего дня;

· Отсутствие 10-15-ти минутных перерывов каждый рабочий час при работе за ЭВМ;

· Воздействие электромагнитных полей от электрооборудования;

· Отсутствие вентилируемого помещения и свободной циркуляции свежего воздуха;

· Утомление глаз, чрезмерная нагрузка на зрение;

· Перегрузка суставов кистей;

· Стресс при работе.

Не обязательно заглядывать в будущее, ведь уже сейчас, в эру распространения всевозможных IT-технологий, можно оценить масштабы влияния работы ЭВМ на человека. Главной проблемой, с которой сталкивается любой работник - так называемая «Дисплейная болезнь», при которой наблюдается ухудшение зрения, синдром сухих глаз, размытие изображения, перенапряжение глазного яблока. Длительная работа за компьютером без перерывов и отдыха может способствовать развитию таких болезней как близорукость, дальнозоркость, глаукома. [27]

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

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

Работа за ЭВМ подразумевает интеллектуальный труд. Основная часть нагрузки идет на нервную систему человека, а именно - на его головной мозг. Часто длительная работа за компьютером может быть причиной головных болей, как и чрезмерное напряжение черепных мышц и мышц лица. Происходит расстройство внимания и невозможность концентрирования, что выливается в переутомление и истощение организма. Может возникать шум в ушах, головокружение и тошнота. [26]

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

Для минимизации рисков заболевания при долгой работе за ЭВМ достаточно соблюдать простые правила:

· При длительной работе за ЭВМ делать перерывы на 10-15 минуты каждый час;

· Следить за осанкой;

· Обустроить или поспособствовать обустройству рабочего места так, чтобы не уставали глаза и не возникало лишнего перенапряжения мышц;

· Больше двигаться в рабочее время;

· Питаться здоровой пищей;

· Делать простые упражнения для кистей рук и позвоночника;

· Устранить посторонние шумы и вибрации, следить за пылеобразованием, температурой и микроклиматом внутри рабочего пространства.[26]



Заключение

В данной дипломной работе были наглядно показаны процессы создания 3D-модели изделия остекления высокопрочного электрообогреваемого кабины машиниста тягового, моторвагонного, специального подвижного состава и путевых самоходных машин железных дорог (ИОВЭ) в программном пакете SolidWorks, разработки программного модуля-конвертора расчетных данных из рабочей среды пакета SolidWorks и SolidWorks Simulation в программу Microsoft Excel для дальнейшей обработки полученных данных в программном комплексе АСОНИКА-К.

В ходе выполнения дипломной работы были решены следующие задачи:

1) Подготовлена теоретическая основа для реализации 3D-модели изделия в программном пакете SolidWorks и программного модуля-конвертора на языке программирования Microsoft Visual Basic;

2)Проведен подробный теоретический расчет надежности ИОВЭ в программном комплексе АСОНИКА-К;

3) Создана подробная 3D-модель ИОВЭ в программном пакете SolidWorks;

4) Проведен статический анализ для определения критических элементов объекта с учетом механического моделирования в дополнительном программном пакете SolidWorks Simulation;

5) На основании методики разработки проведена разработка программного модуля-конвертора для передачи полученных после статического анализа данных в программу Microsoft Excel;

5) Проведено тестирование программного модуля-конвертора;

7) Подведены итоги по проделанной работе, оценены возможные доработки и улучшения программного модуля-конвертора.

Список литературы

1. Тику Ш. «Эффективная работа: SolidWorks» 2004. -- СПб.: Питер

2. Алямовский А. А., Собачкин А. А., Одинцов Е. В., Харитонович А. И., Пономарев Н. Б. «SolidWorks. Компьютерное моделирование в инженерной практике» -- СПб.: БХВ-Петербург, 2005

3. Прохоренко В.П. «SolidWorks. Практическое руководство.» -- М.: ООО «Бином-Пресс», 2004 г.

4. Большаков В.П., Бочков А.Л. «Основы 3D-моделирования. Изучаем работу в AutoCAD, КОМПАС-3D, SolidWorks, Inventor», 2009

5. Викторова В., Степанянц А.С. «Модели и методы расчета надежности технических систем», 2014

6. Изделия приборостроения. Методика расчета показателей безотказности. Рекомендуемый материал РМ 25 446-90. - М., 1990.

7. Ушаков, И.А. Надёжность технических систем: Справочник. / Под ред. И.А. Ушакова. - М.: Изд-во «Радио и связь», 1985. - 608 с.

8. Шавыкин Н.А., Петрухин Б.П., Жидомирова Е.М. Методика оценки безотказности технических средств. - М. Институт проблем управления РАН, 1998.

9. Надёжность ЭРИ: Справочник. - М.: МО РФ, 2006.

10. Надёжность ЭРИ ИП: Справочник. - М.: МО РФ, 2006.

11. Абрамешин, А.Е. Информационная технология обеспечения надёжности электронных средств наземно-космических систем: научное издание. / А.Е. Абрамешин, В.В. Жаднов, С.Н. Полесский. // Отв. ред. В.В. Жаднов. - Екатеринбург: Форт Диалог-Исеть, 2012. - 565 с.

12. ТУ 592344-001-23448989-2013. Изделие остекления высокопрочного электрообогреваемого кабины машиниста тягового, моторвагонного, специального подвижного состава и путевых самоходных машин железных дорог. Технические условия.

13. ГОСТ 4-012.013-84. Аппаратура радиоэлектронная. Определение показателей долговечности.

14. ГОСТ Р 27.301-95. Расчёт надёжности. Основные положения.

15. ГОСТ 17473-80. Винты с полукруглой головкой.

16. ГОСТ 34.602-89. Техническое задание на создание автоматизированной системы

17. ГОСТ 10117-91. Бутылки стеклянные для пищевых жидкостей.

18. Трудовой кодекс (ТК РФ) ч.3, раздел 10 «Охрана труда», глава 33. «Общие положения»

19. ГОСТ 12.1.003-83. Шум. Общие требования безопасности.

20. ГОСТ 12.1.012-90. Вибрационная безопасность.

21. ГОСТ 12.1.005-88. Общие санитарно-гигиенческие требования к воздуху рабочей зоны.

22. ГОСТ 12.1.002-84. Электрические поля промышленной частоты. Допустимые уровни напряжённости и требования к проведению контроля на рабочих местах.

23. СанПиН 2.2.2.541-96. Гигиенические требования к микроклимату производственных помещений.

24. ГОСТ 21.1.004-91. Требования к пожарной безопасности рабочих помещений.

25. ГОСТ 4Г 0.012.242-84. Аппаратура радиоэлектронная. Методика расчёта показателей надёжности.

26. Гунн Г.Е. Компьютер: как сохранить здоровье : Рекомендации для детей и взрослых, СПб.: Нева; М. : Олма-Пресс, 2003

27. Как сохранить и улучшить зрение : Сб. М. : КРОН-ПРЕСС, 1995

Приложение 1

Результаты расчёта характеристик надёжности ИОВЭ

Расчет Изделия

Название Изделия: ИОВЭ

Децимальный номер: ЧС7-1074.01.00.000

Интенсивность отказов в режиме эксплуатации: 1,18391803111903E-5

Интенсивность отказов в режиме ожидания (хранения): 1,07130923738742E-6

Наименование компонента	Дец. номер / Тип изделия	Эксплуатационная интенсивность отказов	Интенсивность отказов в режиме ожидания
Стекло среднее	ЧС7-1074.01.000.020	2,28e-06	2,28e-07
Стекло внутреннее	ЧС7-1074.01.000.010	2,28e-06	2,28e-07
Стекло наружное	ЧС7-1074.01.000.030	2,28e-06	2,28e-07
Бобышка	2М62-1031.01.00.040	2,25e-06	2,25e-07
Винт В.М3х10.58.016	ГОСТ 17473-80	6,75e-08	6,75e-09
Винт В.М3х10.58.016	ГОСТ 17473-80	6,75e-08	6,75e-09
Винт В.М3х10.58.016	ГОСТ 17473-80	6,75e-08	6,75e-09
Винт В.М3х10.58.016	ГОСТ 17473-80	6,75e-08	6,75e-09
Профиль резиновый	Резина марок 7-6190П, 60-2675	1,32e-06	1,32e-07
Датчик температуры	1	1,15e-06	2,28e-09



Компонент второго уровня 'Датчик температуры' в Изделии 'ИОВЭ'

Наименование компонента	Дец. номер / Тип изделия	Эксплуатационная интенсивность отказов	Интенсивность отказов в режиме ожидания
T2	Термопара	4,00e-07	7,90e-10
T1	Термопара	4,00e-07	7,90e-10
X1	ПВ1 1 кв. мм. 200 мм.	3,49e-07	6,98e-10

Приложение 2

Option Explicit

Sub Main()

Dim swApp As SldWorks.SldWorks

Set swApp = Application.SldWorks

Dim entities As Collection

Set entities = GetEntities(swApp)

Call ComputeStressesForEntites(entities, swApp)

Call Sort(entities)

Call ExportEntitiesToExcel(entities)

End Sub

Sub TraverseComponent(ByRef entities As Collection, swComp As SldWorks.Component2, nLevel As Long)

Dim sPadStr As String

Dim i As Long

For i = 0 To nLevel - 1

sPadStr = sPadStr + " "

Next i

Dim vChildCompArr As Variant

vChildCompArr = swComp.GetChildren

Dim oChild As Variant

For Each oChild In vChildCompArr

Dim swChildComp As SldWorks.Component2

Set swChildComp = oChild

Dim vChildArr As Variant

vChildArr = swChildComp.GetChildren

If UBound(vChildArr) = -1 Then

Dim e As Entity

Set e = New Entity

Set e.Component = swChildComp

e.Name = sPadStr & swChildComp.Name2

entities.Add e

End If

TraverseComponent entities, swChildComp, nLevel + 1

Next

End Sub

Sub CriticalElementsForEE (ByRef entities As Collection, swApp As SldWorks.SldWorks)

Dim COSMOSObject As CosmosWorksLib.CwAddincallback

Set COSMOSObject = swApp.GetAddInObject("SldWorks.Simulation")

Dim COSMOSWORKS As CosmosWorksLib.COSMOSWORKS

Set COSMOSWORKS = COSMOSObject.COSMOSWORKS

Dim ActDoc As CosmosWorksLib.CWModelDoc

Set ActDoc = COSMOSWORKS.ActiveDoc

Dim StudyMngr As CosmosWorksLib.CWStudyManager

Set StudyMngr = ActDoc.StudyManager

Dim Study As CosmosWorksLib.CWStudy

Set Study = StudyMngr.GetStudy(StudyMngr.ActiveStudy)

Dim Results As CosmosWorksLib.CWResults

Set Results = Study.Results

Dim e As Entity

For Each e In entities

Dim selEnt(1) As Object

Set selEnt(0) = e.Component

Dim varArray As Variant

varArray = selEnt

Dim ErrorCode As Long

ErrorCode = 0

Dim value As Variant

value = Results.GetStressForEntities3(False, swsStressComponentVON, 1, Nothing, (varArray), swsStrengthUnitPascal, swsShellFace_Top, 5, 1, ErrorCode)

Dim max As Long

max = MaxCriticalElements(value)

Debug.Print e.Component.Name2 & ": max : " & max

e.maxStress = max

Next

End Sub

Sub Sort(ByRef entities As Collection)

Dim sorted As Collection

Set sorted = New Collection

Dim ENT As Entity

For Each ENT In entities

Dim v As Long

v = ENT.maxCritical

If (sorted.Count > 0) Then

Dim i As Long

For i = 1 To sorted.Count

Dim s_value As Long

s_value = sorted.Item(i).maxCritical

If (s_value < v) Then

sorted.Add Item:=ENT, Before:=i

GoTo next_entity

End If

Next i

End If

sorted.Add ENT

next_entity:

Next

Set entities = sorted

End Sub

Sub ExportEntitiesToExcel(ByRef entities As Collection)

Dim xlApp As Object

Dim xlWB As Object

Set xlApp = CreateObject("Excel.Application")

xlApp.Visible = True

Set xlWB = xlApp.Workbooks.Add

Dim row As Long

row = 1

With xlWB.Worksheets(1)

.Cells(row, 1).value = "Название детали"

.Cells(row, 2).value = "Па"

End With

row = row + 1

Dim MaxCriticalElements As Long

MaxCriticalElements = entities.Item(1).MaxCriticalElements

Dim e As Entity

For Each e In entities

With xlWB.Worksheets(1)

.Cells(row, 1).value = e.Name

.Cells(row, 2).value = e.MaxCriticalElements

row = row + 1

End With

Next

End Sub

Function GetEntities(swApp As SldWorks.SldWorks) As Collection

Dim entities As Collection

Set entities = New Collection

Dim swRootComp As SldWorks.Component2

Set swRootComp = swConf.GetRootComponent

Dim swModel As SldWorks.ModelDoc2

Set swModel = swApp.ActiveDoc

Dim swConf As SldWorks.Configuration

Set swConf = swModel.GetActiveConfiguration

TraverseComponent entities, swRootComp, 0

Set GetEntities = entities

End Function

Function MaxCriticalElements(ByRef arr As Variant) As Long

Dim i As Long

Dim max As Long

max = 0

For i = 0 To UBound(arr) Step 2

If arr(i + 1) > max Then max = arr(i + 1)

Next i

MaxCriticalElements = max

End Function

Размещено на Allbest.ru

...