Автоматический учет средств вычислительной техники
Разработка информационно-аналитической системы анализа и оптимизации конфигурации вычислительной техники. Структура автоматизированного управления средствами вычислительной техники. Программное обеспечение, обоснование экономической эффективности проекта.
Рубрика | Программирование, компьютеры и кибернетика |
Вид | дипломная работа |
Язык | русский |
Дата добавления | 20.05.2013 |
Размер файла | 831,1 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
- для 1 категории работ через 1.5-2 часа от начала рабочей и через 1.5-2 часа после обеденного перерыва продолжительностью 20 минут каждый или через каждый час работы продолжительностью 15 минут каждый.
При работе с ПЭВМ в ночную смену (с 22 до 6 часов) независимо от вида и категории трудовой деятельности, продолжительность регламентированных перерывов увеличивается на 60 минут.
При 12-часовой рабочей смене регламентированные перерывы рекомендуется установить в первые 8 часов работы аналогично перерывам при 8-часовой рабочей смене, а в течение последних 4 часов, независимо от вида и категории трудовой деятельности, каждый час работы продолжительностью 15 минут.
Во время регламентированных перерывов целесообразно выполнять комплексы упражнений для снижения нервно-эмоционального напряжения, утомления зрительного анализатора, устранения влияния гиподинамии и сипокинезии, развития познотонического утомления. Комплексы рекомендуется менять один раз в 2-3 недели.
С целью уменьшения отрицательного влияния монотонности работы целесообразно изменять ее содержание.
При возникновении у работающих с персональными компьютерами зрительного дискомфорта и других неблагоприятных ощущений, несмотря на соблюдение санитарно-гигиенических, эргономических требований, режима труда и отдыха, применить индивидуальный подход в ограничении времени, коррекцию длительности перерывов для отдыха или проводить смену на другую, не связанную с использованием ПЭВМ.
4.4 Экологичность проекта
Человек оказался в ловушке противоречия между своей консервативной биологической сущностью и нарастающим отчуждением от природы. Используя изобретенные им технологии и средства жизнеобеспечения, человек в большей мере освободился от давления естественного отбора и межвидовой конкуренции. Он на несколько порядков превысил биологическую видовую численность и еще в десятки раз - объем использования веществ и энергии для удовлетворения надбиологических потребностей [12].
Огромное увеличение и продолжение роста количества людей отнюдь не связано с повышением их биологического качества. Наоборот, для людей в целом характерны совершенно немыслимые для диких животных в природе: груз наследственных заболеваний, наследственная предрасположенность к заболеваниям, низкий имунно-биологический статус и огромное число инфекций, возрастная хронизация болезней. Проблемы экологии человека все больше становятся проблемами здравоохранения. В частности состояние здоровья Казахстана ухудшается под прессом неблагоприятных и экологических условий. Наибольшую тревогу вызывают:
- проявления деградации фонда наследственной информации у значительной части населения, что выражается в росте числа наследственных заболеваний;
- заболевания и хронизация, потери трудоспособности и сокращение продолжительности жизни, обусловленные плохими экологическими и гигиеническими условиями проживания и труда, а также курением, алкоголизмом и наркоманией;
- высокая химическая и радиационная нагрузка на значительные контингенты населения, приводящая к широкому спектру экопатологий, в том числе к злокачественным новообразованиям, иммунодефициту и аллергиям;
- большая частота нарушений беременности и родов, тератогенных эффектов - дефектов развития новорожденных, высокая детская заболеваемость и смертность.
Экологические проблемы человечества тесно сопряжены с экономическими и социальными проблемами. Региональные экологические проблемы часто становятся прямым источником имущественного неравенства, социальных и геополитических коллизий [13].
Перечень проблем, рассмотренные выше, позволяют понять многообразие задач экологии. Важнейшие общие задачи современной экологии в ее широком понимании это:
- Всеобъемлющая диагностика состояния природы планеты и ее ресурсов; определение порога выносливости живой природы планеты - биосферы по отношению к антропогенной нагрузке, то есть к тем помехам и утратам - изъятию биологических ресурсов, загрязнению среды, изменениям климата, которые наносятся человеческой деятельностью, и выяснение степени обратимости этих изменений.
- Разработка прогнозов изменений биосферы и состояния окружающей человека среды при разных сценариях экономического и социального развития человечества.
- Отказ от природопокорительной идеологии; формирование новой идеологии и методологии экоцентризма, связанной с переходом к постиндустриальной цивилизации и направленной на экологизацию экономики, производства, политики, образования.
- Выработка критериев оптимизации - выбора наиболее согласованного с экологическим императивом и экологически ориентированного социально - экономического развития общества - экоразвития.
Формирование такой стратегии поведения человеческого общества, такой экономики и таких технологий, которые приведут масштабы и характер хозяйственной деятельности в соответствие с экологической выносливостью природы и остановят глобальный экологический кризис [13].
Под охраной окружающей среды понимают совокупность международных, государственных и региональных правовых актов, инструкций и стандартов, доводящих общие юридические требования до каждого конкретного загрязнителя и обеспечивающих его заинтересованность в выполнении этих требований, конкретных природоохранных мероприятий по претворению в жизнь этих требований.
Охрана окружающей природной среды складывается из:
- правовой охраны, формулирующей научные экологические принципы в виде юридических законов, обязательных для исполнения;
- материального стимулирования природоохранной деятельности, стремящегося сделать её экономически выгодной для предприятий;
- инженерной охраны, разрабатывающей природоохранную и ресурсосберегающую технологию и технику.
Охране подлежат следующие объекты:
- естественные экологические системы, озоновый слой атмосферы;
- земля, ее недра, поверхностные и подземные воды, атмосферный воздух, леса и иная растительность, животный мир, микроорганизмы, генетический фонд, природные ландшафты.
Основными принципами охраны окружающей среды являются: приоритет обеспечения благоприятных экологических условий для жизни, труда и отдыха населения; научно обоснованное сочетание экологических и экономических интересов общества; учет законов природы и возможностей самовосстановления и самоочищения ее ресурсов.
Разнообразное вмешательство человека в естественные процессы в биосфере можно сгруппировать по следующим видам загрязнений, понимая под ними любые нежелательные для экосистем антропогенные изменения:
- ингредиентное (ингредиент - составная часть сложного соединения или смеси) загрязнение как совокупность веществ, количественно или качественно чуждых естественным биогеоценозам;
- параметрическое загрязнение (параметр окружающей среды - одно из ее свойств, например уровень шума, освещенности, радиации и т.д.), связанное с изменением качественных параметров окружающей среды;
- биоценотическое загрязнение, заключающееся в воздействии на состав и структуру популяции живых организмов;
- стациально-деструкционное загрязнение (стация - место обитания популяции, деструкция - разрушение), представляющее собой изменение ландшафтов и экологических систем в процессе природопользования.
Природоохранной является любая деятельность, направленная на сохранение качества окружающей среды на уровне, обеспечивающем устойчивость биосферы. К ней относится как крупномасштабная деятельность, так и деятельность отдельных предприятий по очистке от вредных веществ сточных вод и отходящих газов, снижению норм использования природных ресурсов и т.д.
Существует два основных направления природоохранной деятельности предприятий. Первое - очистка вредных выбросов.
Второе направление - устранение самих причин загрязнения, что требует разработки малоотходных, а в перспективе и безотходных технологий. Однако не для всех производств найдены приемлемые технико-экономические решения по резкому сокращению количества образующихся отходов и их утилизации, поэтому приходится работать по обоим указанным направлениям.
Заключение
Разработанная информационно-аналитическая система учета и анализа вычислительной техники внедрена в ВК ОФ ГЦВП. Пользователями данной системы являются административный персонал и обслуживающий персонал отдела информационных технологий, работающий с большим объемом информации и формируя документы и отчеты имеющейся на предприятии вычислительной техники.
Разработанное программное средство позволит:
хранить, обрабатывать и анализировать хранимую информацию о вычислительной технике;
своевременно собирать сведения, проверять корректность формирования, консолидировать и формировать ежедневные, ежемесячные и ежеквартальные отчеты о вычислительной технике предприятия с целью обеспечения своевременного и качественного обслуживания техники;
анализировать и прогнозировать результаты ежедневных, ежемесячных и ежеквартальных осмотров вычислительной техники.
После аналитического исследования предметной области и информационных объектов была создана база данных в СУБД Access.
Автоматизация процесса регистрации и учета вычислительной техники предприятия позволит оперативно получать полную и достоверную информацию, характеризующую состояние компьютерной техники.
Была решена основная задача автоматизируемой системы - учет и оперативное регулирование хозяйственных операций, подготовки стандартных документов для внешней среды. Автоматизация этих процессов позволила хранить информацию в одной базе данных при помощи спроектированного приложения.
Спроектированная система позволила: увеличить производительность труда обслуживающего персонала за счет уменьшения объема промежуточных документов; сократить время, затрачиваемое на процесс принятия решений по оптимизации распределения при помощи быстрого просмотра информации и разработанного алгоритма приложения.
Это позволяет добиться прямого экономического эффекта за счет снижения трудовых и стоимостных показателей.
Список литературы
1. Автоматизированное рабочее место в системе управления предприятием”, Сборник научных трудов, Ленинград, 1989г.
2. В.В. Шураков. "Автоматизированное рабочее место для статической обработки данных”, 1990г.
3. И.Л. Кантарь. "Автоматизированные рабочие места управленческого аппарата”, 1990г.
4. Джулия Келли. Access 97. Самоучитель - СПб: Питер. - 1999. - 336с.
5. Дженнингс Р. Microsoft Access 97. - СПб.: BHV - Санкт-Петербург. - 1999. - 1270с.
6. Microsoft Access 97. Шаг за шагом: Практ. пособ. /Пер. с англ. - М.: Издательство ЭКОМ. - 1999. - 328с.
Приложения
Листинг кода
VERSION 1.0 CLASS
BEGIN
MultiUse = - 1 'True
END
Attribute VB_Name = "Form_Формирование комплекта модели"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database
Private Sub CD_ROM_AfterUpdate ()
Список66. Requery
End Sub
Private Sub CD_ROM_Change ()
Список66. Requery
End Sub
Private Sub CD_ROM_Dirty (Cancel As Integer)
Список66. Requery
End Sub
Private Sub акустическая_система_AfterUpdate ()
Список70. Requery
End Sub
Private Sub акустическая_система_Change ()
Список70. Requery
End Sub
Private Sub акустическая_система_Dirty (Cancel As Integer)
Список70. Requery
End Sub
Private Sub Видео_карта_AfterUpdate ()
Список54. Requery
End Sub
Private Sub Видео_карта_Change ()
Список54. Requery
End Sub
Private Sub Видео_карта_Dirty (Cancel As Integer)
Список54. Requery
End Sub
Private Sub дисковод_3_5__AfterUpdate ()
Список64. Requery
End Sub
Private Sub дисковод_3_5__Change ()
Список64. Requery
End Sub
Private Sub дисковод_3_5__Dirty (Cancel As Integer)
Список64. Requery
End Sub
Private Sub жесткий_диск_AfterUpdate ()
Список62. Requery
End Sub
Private Sub жесткий_диск_Change ()
Список62. Requery
End Sub
Private Sub жесткий_диск_Dirty (Cancel As Integer)
Список62. Requery
End Sub
Private Sub звуковая_карта_AfterUpdate ()
Список68. Requery
End Sub
Private Sub звуковая_карта_Change ()
Список68. Requery
End Sub
Private Sub звуковая_карта_Dirty (Cancel As Integer)
Список68. Requery
End Sub
Private Sub клавиатура_AfterUpdate ()
Список56. Requery
End Sub
Private Sub клавиатура_Change ()
Список56. Requery
End Sub
Private Sub клавиатура_Dirty (Cancel As Integer)
Список56. Requery
End Sub
Private Sub Кнопка78_Click ()
Поле80. Text = Val (Список46. ItemData (0)) + Val (Список50. ItemData (0)) + Val (Список52. ItemData (0)) + Val (Список54. ItemData (0)) + Val (Список56. ItemData (0)) + Val (Список58. ItemData (0)) + Val (Список60. ItemData (0)) + Val (Список62. ItemData (0)) + Val (Список64. ItemData (0)) + Val (Список66. ItemData (0)) + Val (Список68. ItemData (0)) + Val (Список70. ItemData (0)) + Val (Список74. ItemData (0)) + Val (Список76. ItemData (0))
End Sub
Private Sub модем_AfterUpdate ()
Список76. Requery
End Sub
Private Sub модем_Change ()
Список76. Requery
End Sub
Private Sub модем_Dirty (Cancel As Integer)
Список76. Requery
End Sub
Private Sub монитор_AfterUpdate ()
Список60. Requery
End Sub
Private Sub монитор_Change ()
Список60. Requery
End Sub
Private Sub монитор_Dirty (Cancel As Integer)
Список60. Requery
End Sub
Private Sub мышь_AfterUpdate ()
Список58. Requery
End Sub
Private Sub мышь_Change ()
Список58. Requery
End Sub
Private Sub мышь_Dirty (Cancel As Integer)
Список58. Requery
End Sub
Private Sub Память_AfterUpdate ()
Список52. Requery
End Sub
Private Sub Память_Change ()
Список52. Requery
End Sub
Private Sub Память_Dirty (Cancel As Integer)
Список52. Requery
End Sub
Private Sub принтер_AfterUpdate ()
Список74. Requery
End Sub
Private Sub принтер_Change ()
Список74. Requery
End Sub
Private Sub принтер_Dirty (Cancel As Integer)
Список74. Requery
End Sub
Private Sub Процессор_AfterUpdate ()
Список50. Requery
End Sub
Private Sub Процессор_Change ()
Список50. Requery
End Sub
Private Sub Процессор_Dirty (Cancel As Integer)
Список50. Requery
End Sub
Private Sub Системная_плата_AfterUpdate ()
Список46. Requery
End Sub
Private Sub Системная_плата_Change ()
Список46. Requery
End Sub
Private Sub Системная_плата_Dirty (Cancel As Integer)
Список46. Requery
End Sub
VERSION 1.0 CLASS
BEGIN
MultiUse = - 1 'True
END
Attribute VB_Name = "Form_Остаточная стоимость Запрос"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database
Private Sub Кнопка34_Click ()
On Error GoTo Err_Кнопка34_Click
DoCmd. DoMenuItem acFormBar, acRecordsMenu, acSaveRecord,, acMenuVer70
Exit_Кнопка34_Click:
Exit Sub
Err_Кнопка34_Click:
MsgBox Err. Description
Resume Exit_Кнопка34_Click
End Sub
VERSION 1.0 CLASS
BEGIN
MultiUse = - 1 'True
END
Attribute VB_Name = "Form_Кнопочная форма"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database
Private Sub Form_Open (Cancel As Integer)
' Minimize the database window and initialize the form.
' Move to the switchboard page that is marked as the default.
Me. Filter = " [ItemNumber] = 0 AND [Argument] = 'По умолчанию' "
Me. FilterOn = True
End Sub
Private Sub Form_Current ()
' Update the caption and fill in the list of options.
Me. Caption = Nz (Me! [ItemText], "")
FillOptions
End Sub
Private Sub FillOptions ()
' Fill in the options for this switchboard page.
' The number of buttons on the form.
Const conNumButtons = 8
Dim con As Object
Dim rs As Object
Dim stSql As String
Dim intOption As Integer
' Set the focus to the first button on the form,
' and then hide all of the buttons on the form
' but the first. You can't hide the field with the focus.
Me! [Option1]. SetFocus
For intOption = 2 To conNumButtons
Me ("Option" & intOption). Visible = False
Me ("OptionLabel" & intOption). Visible = False
Next intOption
' Open the table of Switchboard Items, and find
' the first item for this Switchboard Page.
Set con = Application. CurrentProject. Connection
stSql = "SELECT * FROM [Switchboard Items] "
stSql = stSql & " WHERE [ItemNumber] > 0 AND [SwitchboardID] =" & Me! [SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber]; "
Set rs = CreateObject ("ADODB. Recordset")
rs. Open stSql, con, 1 ' 1 = adOpenKeyset
' If there are no options for this Switchboard Page,
' display a message. Otherwise, fill the page with the items.
If (rs. EOF) Then
Me! [OptionLabel1]. Caption = "На странице кнопочной формы нет элементов"
Else
While (Not (rs. EOF))
Me ("Option" & rs! [ItemNumber]). Visible = True
Me ("OptionLabel" & rs! [ItemNumber]). Visible = True
Me ("OptionLabel" & rs! [ItemNumber]). Caption = rs! [ItemText]
rs. MoveNext
Wend
End If
' Close the recordset and the database.
rs. Close
Set rs = Nothing
Set con = Nothing
End Sub
Private Function HandleButtonClick (intBtn As Integer)
' This function is called when a button is clicked.
' intBtn indicates which button was clicked.
' Constants for the commands that can be executed.
Const conCmdGotoSwitchboard = 1
Const conCmdOpenFormAdd = 2
Const conCmdOpenFormBrowse = 3
Const conCmdOpenReport = 4
Const conCmdCustomizeSwitchboard = 5
Const conCmdExitApplication = 6
Const conCmdRunMacro = 7
Const conCmdRunCode = 8
Const conCmdOpenPage = 9
' An error that is special cased.
Const conErrDoCmdCancelled = 2501
Dim con As Object
Dim rs As Object
Dim stSql As String
On Error GoTo HandleButtonClick_Err
' Find the item in the Switchboard Items table
' that corresponds to the button that was clicked.
Set con = Application. CurrentProject. Connection
Set rs = CreateObject ("ADODB. Recordset")
stSql = "SELECT * FROM [Switchboard Items] "
stSql = stSql & "WHERE [SwitchboardID] =" & Me! [SwitchboardID] & " AND [ItemNumber] =" & intBtn
rs. Open stSql, con, 1 ' 1 = adOpenKeyset
' If no item matches, report the error and exit the function.
If (rs. EOF) Then
MsgBox "Ошибка при чтении таблицы Switchboard Items. "
rs. Close
Set rs = Nothing
Set con = Nothing
Exit Function
End If
Select Case rs! [Command]
' Go to another switchboard.
Case conCmdGotoSwitchboard
Me. Filter = " [ItemNumber] = 0 AND [SwitchboardID] =" & rs! [Argument]
' Open a form in Add mode.
Case conCmdOpenFormAdd
DoCmd. OpenForm rs! [Argument],,,, acAdd
' Open a form.
Case conCmdOpenFormBrowse
DoCmd. OpenForm rs! [Argument]
' Open a report.
Case conCmdOpenReport
DoCmd. OpenReport rs! [Argument], acPreview
' Customize the Switchboard.
Case conCmdCustomizeSwitchboard
' Handle the case where the Switchboard Manager
' is not installed (e. g. Minimal Install).
On Error Resume Next
Application.run "ACWZMAIN. sbm_Entry"
If (Err <> 0) Then MsgBox "Команда недоступна. "
On Error GoTo 0
' Update the form.
Me. Filter = " [ItemNumber] = 0 AND [Argument] = 'По умолчанию' "
Me. Caption = Nz (Me! [ItemText], "")
FillOptions
' Exit the application.
Case conCmdExitApplication
CloseCurrentDatabase
' Run a macro.
Case conCmdRunMacro
DoCmd.runMacro rs! [Argument]
' Run code.
Case conCmdRunCode
Application.run rs! [Argument]
' Open a Data Access Page
Case conCmdOpenPage
DoCmd. OpenDataAccessPage rs! [Argument]
' Any other command is unrecognized.
Case Else
MsgBox "Неизвестная команда. "
End Select
' Close the recordset and the database.
rs. Close
HandleButtonClick_Exit:
On Error Resume Next
Set rs = Nothing
Set con = Nothing
Exit Function
HandleButtonClick_Err:
' If the action was cancelled by the user for
' some reason, don't display an error message.
' Instead, resume on the next line.
If (Err = conErrDoCmdCancelled) Then
Resume Next
Else
MsgBox "Ошибка при выполнении команды.", vbCritical
Resume HandleButtonClick_Exit
End If
End Function
Private Sub HorizontalHeaderBox_Click ()
End Sub
Размещено на Allbest.ru
Подобные документы
Проектирование функциональной структуры подсистемы учёта средств вычислительной техники. Применяемые средства защиты информации в БД, базовый алгоритм, программное и техническое обеспечение. Вопросы об экономической эффективности и охране труда.
дипломная работа [7,5 M], добавлен 26.06.2011Диагностический анализ системы управления предприятия, его организационной и функциональной структуры. Разработка проекта подсистемы учёта средств вычислительной техники, описание технического обеспечения базы данных. Характеристика программного продукта.
дипломная работа [7,2 M], добавлен 28.06.2011Аппаратные средства вычислительной техники. Центральный процессор. Память как составляющая компьютера, ее типичная иерархическая структура. Устройства ввода-вывода, шины. История развития средств вычислительной техники. Характеристика систем на основе Р6.
реферат [251,3 K], добавлен 08.02.2014Классификация проектных процедур. История синтеза вычислительной техники и инженерного проектирования. Функции систем автоматизированного проектирования, их программное обеспечение. Особенности применения трехмерных сканеров, манипуляторов и принтеров.
реферат [343,0 K], добавлен 25.12.2012Средства вычислительной техники появились давно, так как потребность в различного рода расчетах существовала еще на заре развития цивилизации. Бурное развитие вычислительной техники. Создание первых ПК, мини-компьютеров начиная с 80-х годов ХХ века.
реферат [32,3 K], добавлен 25.09.2008Понятие и характеристика персонального компьютера, его основные части и их предназначение. Средства обучения информатики и особенности организации работы в кабинете вычислительной техники. Оборудование рабочих мест и применение программного обеспечения.
реферат [29,0 K], добавлен 09.07.2012Ручной этап развития вычислительной техники. Позиционная система счисления. Развитие механики в XVII веке. Электромеханический этап развития вычислительной техники. Компьютеры пятого поколения. Параметры и отличительные особенности суперкомпьютера.
курсовая работа [55,7 K], добавлен 18.04.2012Устройство и принцип работы персонального компьютера (ПК). Диагностика работоспособности ПК и определение неисправностей. Задачи технического обслуживания средств вычислительной техники. Разработка методик поддержания техники в работоспособном состоянии.
курсовая работа [274,5 K], добавлен 13.07.2011Характеристика систем технического и профилактического обслуживания средств вычислительной техники. Диагностические программы операционных систем. Взаимосвязь систем автоматизированного контроля. Защита компьютера от внешних неблагоприятных воздействий.
реферат [24,4 K], добавлен 25.03.2015Изучение зарубежной, отечественной практики развития вычислительной техники, а также перспективы развития ЭВМ в ближайшее будущее. Технологии использования компьютеров. Этапы развития вычислительной индустрии в нашей стране. Слияние ПК и средств связи.
курсовая работа [82,0 K], добавлен 27.04.2013