Разработка программы регистрации расходных материалов и оборудования в Кемеровском горно-техническом техникуме

Автор работы: Пользователь скрыл имя, 14 Июня 2014 в 11:09, дипломная работа

Краткое описание

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

Содержание

Введение 7
1. Обзорно – аналитическая часть 9
1.1. Современное состояние автоматизации рассматриваемой предметной области 9
1.2. Характеристика предметной области 12
1.3. Организационная структура предприятия 12
1.4. Основные бизнес – процессы предприятия 18
1.5. Программное и техническое обеспечение предприятия 24
1.6. Постановка задачи 28
1.6.1. Проблемы возникающие при функционировании отдела 28
1.6.2. Автоматизируемые задачи 28
1.6.3. Выбор и обоснование задачи автоматизации 29
1.7. Информационный анализ предметной области 30
1.7.1. Форматы входных документов 30
1.7.2. Описание выходной информации 31
1.8. Бизнес-правила 32
2. Техническое задание 33
2.1. Назначение и цели создания (развития) системы 33
2.2. Характеристики объекта автоматизации 33
2.3. Требования к системе 33
2.3.1. Требования к структуре и функционированию системы 34
2.3.2. Требования к режимам функционирования системы 34
2.3.3. Перспективы развития, модернизации системы 36
2.3.4. Требования к численности и квалификации персонала обслуживающего систему, режиму работы персонала 36
2.3.5. Показатели назначения 36
2.3.6 Требования к надежности 37
2.3.7. Требования к эргономике и технической эстетике 38
2.3.8. Требование к функциям 38
2.3.9. Требования к видам обеспечения 39
2.4. Источники разработки 40
2.5. Обоснование средств разработки 40
3. Экспериментально-проектная часть 43
3.1. Проектирование информационного обеспечения системы 43
3.1.1. Построение модели процессов 43
3.1.2. Построение логической модели данных 43
3.1.3. Описание таблиц базы данных 46
3.1.4. Типовые запросы базы данных 50
3.2. Проектирование программного обеспечения системы 51
3.3. Тестирование и оценка программного продукта 55
3.3.1. Тестирование программного продукта 55
3.3.2. Оценка технико-экономических показателей 57
3.4. Руководство пользователя 59
3.6. Руководство администратора 71
Заключение 74
Список использованных источников 77
Приложение А 78
Приложение Б 81

Скачать в ZIP архиве (4.80 Мб) Сколько стоит заказать работу?
Вложенные файлы: 1 файл

Диплом.docx

— 5.13 Мб (Скачать файл)

 

 

 

 

 

Приложение А

Код основного модуля программы

 

Public Class Main

 

    Private Sub ЕдиницаИзмеренияToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ЕдиницаИзмеренияToolStripMenuItem.Click

 

        Dim NewMDIChild As New EdUzm()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub НоменклатураToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles НоменклатураToolStripMenuItem.Click

        Dim NewMDIChild As New Nomenklatura()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub ПодразделенияToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ПодразделенияToolStripMenuItem.Click

        Dim NewMDIChild As New Podrazdelenue()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub ПоставщикиToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ПоставщикиToolStripMenuItem.Click

        Dim NewMDIChild As New Postavwuku()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub ОПрограммеToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ОПрограммеToolStripMenuItem.Click

        Dim NewMDIChild As New AboutBox1()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub ПроверитьАктуальныеЗаказызаявкиToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ПроверитьАктуальныеЗаказызаявкиToolStripMenuItem.Click

        Dim NewMDIChild As New CheckZauvkaZakaz()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub НайтиЗаявкизаказыToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles НайтиЗаявкизаказыToolStripMenuItem.Click

        Dim NewMDIChild As New FindZauvkaZakaz()

 

        NewMDIChild.MdiParent = Me

 

        NewMDIChild.Show()

    End Sub

 

    Private Sub РеестрЗаявокToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles РеестрЗаявокToolStripMenuItem.Click

 

        Dim NewMDIChild As New Reectr()

        NewMDIChild.MdiParent = Me

        NewMDIChild.Show()

        NewMDIChild.Text = "Реестр заявок"

    End Sub

 

    Private Sub РеестрЗаказовToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles РеестрЗаказовToolStripMenuItem.Click

        Dim NewMDIChild As New Reectr()

        NewMDIChild.MdiParent = Me

        NewMDIChild.Show()

        NewMDIChild.Text = "Реестр заказов"

    End Sub

 

    Private Sub РеестрДокументовПоступленияToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles РеестрДокументовПоступленияToolStripMenuItem.Click

        Dim NewMDIChild As New Reectr()

        NewMDIChild.MdiParent = Me

        NewMDIChild.Show()

        NewMDIChild.Text = "Реестр документов поступления"

    End Sub

 

    Private Sub РеестрАктовСписанияToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles РеестрАктовСписанияToolStripMenuItem.Click

        Dim NewMDIChild As New Reectr()

        NewMDIChild.MdiParent = Me

        NewMDIChild.Show()

        NewMDIChild.Text = "Реестр актов списания"

    End Sub

 

    Private Sub ОтчетОПроделаннойРаботеToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ОтчетОПроделаннойРаботеToolStripMenuItem.Click

        Dim NewMDIChild As New Reports()

        NewMDIChild.MdiParent = Me

        NewMDIChild.Show()

 

        NewMDIChild.Label2.Visible = True

        NewMDIChild.Label3.Visible = True

        NewMDIChild.Button2.Visible = True

        NewMDIChild.DateTimePicker1.Visible = True

      

    End Sub

 

    Private Sub ПроверитьНаличиеТоваровВОтделеToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles ПроверитьНаличиеТоваровВОтделеToolStripMenuItem.Click

        Dim NewMDIChild As New Reports()

        NewMDIChild.MdiParent = Me

        NewMDIChild.Show()

 

        NewMDIChild.Label1.Visible = True

        NewMDIChild.Button1.Visible = True

    End Sub

End Class

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение Б

Выходные документы

 

Рисунок Б.1. – Отчет  «Списанные материалы/оборудование»

 

 

Рисунок Б.2. – Отчет о проделанной работе

 

 

 

 

 

 

 

 

 

 

 

 

 

Продолжение приложения Б

 

 

Рисунок Б.3. – Печатная форма заказа

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 


Информация о работе Разработка программы регистрации расходных материалов и оборудования в Кемеровском горно-техническом техникуме