АРМ замдиректора по научной работе

  • Вид работы:
    Курсовая работа (т)
  • Предмет:
    Информационное обеспечение, программирование
  • Язык:
    Русский
    ,
    Формат файла:
    MS Word
    540,44 Кб
  • Опубликовано:
    2012-11-10
Вы можете узнать стоимость помощи в написании студенческой работы.
Помощь в написании работы, которую точно примут!

АРМ замдиректора по научной работе

Министерство образования и науки Республики Хакасия

ГБОУ РХ СПО Хакасский Политехнический Колледж

Специальность 230103

«Автоматизированные системы обработки информации и управления»








Пояснительная записка

к курсовому проекту

По дисциплине: Разработка и эксплуатация АИС

тема: «АРМ зам. директора по научной работе »

Выполнил:

Студентка группы: АИС-41

А.И. Семенов

Руководитель: А.В. Сакерин



Абакан 2012 год

Оглавление

1. Введение

. Основная часть

.1 Описание предметной области

2.2 Выбор средств разработки

.3 Структура данных

.4 Описание продукта

.5 Экономические преимущества от внедрения

. Заключение

. Список использованных источников

. Глоссарий

. Список аббревиатур

. Приложения

1. Введение

До внедрения программного продукта вся информация хранилась в бумажном варианте. Основными недостатками такого подхода являются:

Долгий процесс составления плана мероприятий;

Сложность поиска информации в бумажном архиве;

При длительном хранении документов происходит износ бумаги;

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

Все эти недостатки указывают на необходимость автоматизации (создания программного продукта с удобным интерфейсом и проработанной структурой данных).

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

Для этого поставлены следующие задачи:

Исследование предметной области

Проектирование структуры БД

Разработка алгоритмов

Проектирование интерфейса

Создание и тестирование модулей ПП

Внедрение ПП

2. Основная часть

 

.1 Описание предметной области


Основная задача информационной системы - учет проведения мероприятий.

Для выполнения этой задачи необходимо владеть информацией:

о студентах, участвующих в мероприятии

о научных руководителях этих студентов

о мероприятиях, запланированных и уже прошедших

об организаторах (администраторах) этих мероприятий

Результатами выполнения основной задачи являются:

Прошедшие мероприятия;

Отчеты (по студентам, по научным руководителям и т. д.);

Поставленную задачу выполняют:

Сотрудники, ответственный за учет мероприятий

Рис. 2.1 IDEF0

Задачу можно условно разделить на следующие этапы:

Подобрать участников для проведения мероприятия;

Назначить задание на проведение мероприятия;

провести мероприятие.

Результатами выполнения основной задачи будут:

Прошедшие мероприятия;

Отчет;

Статистика.

Рис. 2.2 IDEF0 - 1 уровень

В системе взаимодействуют следующие сущности:

Студент;

Научный руководитель;

Мероприятие;

Задачи мероприятия;

Место проведения.

Рис. 2.3 ER - диаграмма

В системе взаимодействуют следующие объекты:

Научные руководители;

Администратор по проведению мероприятий;

Зам. Директора по научной работе;

Набор записей и документов по мероприятию (бумажный носитель).

Они взаимодействуют следующим образом:

Научные руководители предоставляют информацию о студентах;

Администратор делает заявку о мероприятии зам. Директору по научной работе;

Зам. Директора по научной работе реализует мероприятие.

Рис. 2.4 DFD до внедрения продукта

2.2 Выбор средств разработки

 

Выбор платформы

В настоящий момент широко распространены 4 программные платформы:

ОС Windows

ОС Linux

ОС MacOS + мобильные версии

ОС Android

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

В поставленной задаче речь идёт о реализации ПП для ПК, а не мобильных устройств, поэтому платформу Android и мобильную версию платформы MacOS можно не рассматривать.

Поставленная задача ориентируется на типичное предприятие республики Хакасия, и, значит, вероятность того, что используется компьютер от компании Apple достаточно мала. Следовательно, платформу MacOS также можно не рассматривать.

По данным статистики, ОС Windows распространена гораздо больше, чем ОС Linux. Поэтому ориентироваться следует на то, что на предприятии установлена именно Windows.

Выбор языка программирования

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

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

Язык Object Pascal - строго типизированный объектно-ориентированный язык.

Преимущества языка программирования Паскаль:

- краткость языка (некоторые называют его “спартанским” языком программирования);

легкость программирования на нем;

мобильность написанных программ;

возможность эффективной реализации и пригодность с точки зрения формальных методов отладки программ;

Для разработки программного продукта был выбран язык Object Pascal.

Выбор среды разработки

Lazarus - кросс-платформенная среда разработки графических и консольных приложений (IDE) на языке Object Pascal, свободный аналог Borland Delphi. Интерфейс аналогичен Borland Delphi, есть аналогичные наборы компонентов. Использует свой формат проектов, но имеется возможность импорта проектов Delphi.

PascalABC.NET - это современный язык программирования, основанный на Delphi (Object Pascal) и сочетающий простоту языка Паскаль  <#"587292.files/image005.jpg">

Рис. 2.5 Схема данных

 

2.4 Описание продукта


При запуске программы открывается форма аутентификации пользователя, которая предоставляет вписать сотруднику его имя и пароль для дальнейшего входа в программное средство.

Рис 2.4.1 Форма аутентификации

После ввода имени и пароля, пользователь переходит на главную кнопочную форму.

Рис 2.4.2 Главная кнопочная форма

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

Вкладка «справочники» содержит:

·        «Студенты» - содержит информацию о студентах.

·        «Научные руководители» - содержит информацию о научных руководителях.

·        «Администраторы» - содержит информацию о администраторах.

·        «Места проведения» - содержит информацию о местах, где проходили и будут проходить мероприятия.

·        «Задачи мероприятия» - содержит информацию о задачах мероприятия.

Это базовые справочники, в которых предоставляется возможность добавления и сохранения данных

Рис 2.4.3 Форма справочники

Вкладка главного меню « о программе». Содержит краткое описание программного продукта.

Рис 2.4.4 Форма «О программе»

На форме «мероприятия» содержится информация о названии мероприятия, дате проведения, о задачах мероприятия, студентах, научных руководителях, администраторах и об отметке их выполнении. Также можно просмотреть участников конкретного мероприятия. Добавить/сохранить/удалить мероприятие, задачу мероприятия и участников конкретного мероприятия.

Рис. 2.4.3 Форма мероприятия

2.5 Экономические преимущества от внедрения

Временные затраты разработчика на программный продукт:

·        Стоимость 1 часа = 200руб.

·        Время изготовления ПП = 90 дней*3часа * 200 = 54000руб

.        Аренда помещения=2000руб/месяц*3месяца=6000руб

.        Аренда оборудования=2000руб руб/месяц*3месяца=6000руб

.        Консультация специалиста=5000 руб

Итого: себестоимость ПП = 71000руб.

Эффект от внедрения - это в первую очередь сокращение затрат на:

·        копирование и печать документов;

·        ресурсы: люди и оборудование (например, расходные материалы, обновление копировально-множительного оборудования);

·        хранение информации в бумажном виде;

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

Результат - повышение продуктивности труда и количества работ.

 

3. Заключение


В ходе разработки курсового проекта было выполнено исследование предметной области. При этом были выделены взаимодействующие объекты информационной системы:

Заказчик

Проектировщик

Мероприятия

Была поставлена следующая задача автоматизации: учет проведения мероприятий.

Были исследованы платформы, языки и среды разработки. В качестве базиса для создания программного продукта были выбраны:

Платформа: Windows

Язык программирования: Object Pascal

Среда разработки: Borland Delphi 7

СУБД: MS Access

На основании исследования предметной области была разработана структура данных.

Был разработан программный продукт, содержащий 16 экранных форм.

Был произведён анализ экономических преимуществ от внедрения.

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

усовершенствованный интерфейс

создание поисковой системы

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

подготовка инсталляционного модуля

обучение системного администратора

обучение конечных пользователей

4. Список использованных источников


1.Самоучитель Delphi в примерах, играх и программах. От простых приложений, решения задач и до программирования интеллектуальных игр. Автор: В. Рубанцев. Год: 2011.

.Delphi. Готовые алгоритмы. Автор: Род Стивенс. Год: 2004.

.Delphi. Программирование на языке высокого уровня. Автор: В. В. Фаронов. Год: 2009.

.Базы данных в Delphi 7. Самоучитель. Автор: Вячеслав Понамарев. Год: 2003.

.Программирование баз данных в Delphi 7. Автор: В. Фаронов. Год: 2006.

.Программирование баз данных в Delphi 7. Учебный курсАвтор: В. В. Фаронов. Год: 2006.

.Microsoft Access 2007. Автор: А. Днепров. Год: 2008 г.

.Microsoft Office Access 2007. Руcская версия. Автор: Стив Ламберт, М. Доу Ламберт III, Джоан Преппернау. Переводчик Владислав Карпюк.

.Проектирование информационных систем. Автор: В. В. Коваленко. Год: 2011.

.Методология проектирования автоматизированных информационных систем. Основы системного подхода. Автор: В. Г. Овчинников. Год: 2005.

11.Сайт Викепедия: #"587292.files/image011.jpg">

Главная кнопочная форма


Форма «Справочники»


Добавление информации в справочник на примере формы «студенты»


После нажатия на кнопку «добавить», появляется форма добавления


Форма «Мероприятия», для учета всей известной информации о мероприятиях


Кнопка на главной кнопочной форме «Завершить сеанс», переводит пользователя на форму «Вход в систему»


Кнопка на главной кнопочной форме «Завершение работы», прекращает работу программного средства


Приложение 3

 

Исходный код

unit Unit1;

var: TForm1;unit2, Unit10, Unit11, Unit12, Unit3, Unit4, Unit5, Unit6, Unit7,, Unit9;

{$R *.dfm}TForm1.btn1Click(Sender: TObject);(edt1.text='semenov') AND (edt2.Text='123') then begin.Show;.Hide;;;TForm1.btn2Click(Sender: TObject);.Terminate;;.

unit Unit2;

var: TForm2;Unit1, Unit3, Unit5, Unit9, Unit10, Unit11, Unit12, Unit4, Unit6,, Unit8;

{$R *.dfm}TForm2.btn1Click(Sender: TObject);.show;.hide;;TForm2.Button1Click(Sender: TObject);.Show;.Hide;;TForm2.btn3Click(Sender: TObject);.Hide;.Show;;TForm2.btn2Click(Sender: TObject);.show;;TForm2.Button2Click(Sender: TObject);.Terminate;;.

unit Unit3;

var: TForm3;unit4, Unit2, Unit1, Unit10, Unit11, Unit12, Unit5, Unit6,, Unit8, Unit9;

{$R *.dfm}TForm3.dbgrd1CellClick(Column: TColumn);.Text:=dbgrd1.Columns[10].Field.AsString;;TForm3.btn1Click(Sender: TObject);.DataSource.DataSet.Last;.DataSource.DataSet.Insert;;TForm3.btn2Click(Sender: TObject);.DataSource.DataSet.Post;;TForm3.btn3Click(Sender: TObject);.DataSource.DataSet.Delete;;TForm3.btn4Click(Sender: TObject);.Hide;.show;;.

unit Unit4;

var: TDataModule4;Unit1, Unit10, Unit11, Unit12, Unit2, Unit3, Unit5, Unit6, Unit7,, Unit9;

{$R *.dfm}.

unit Unit5;

var: TForm5;Unit6, Unit2, Unit10, Unit11, Unit12, Unit1, Unit3, Unit4, Unit7,, Unit9;

{$R *.dfm}TForm5.btn5Click(Sender: TObject);.showmodal;;TForm5.btn6Click(Sender: TObject);.Hide;.show;;TForm5.btn3Click(Sender: TObject);.showmodal;;TForm5.btn4Click(Sender: TObject);.showmodal;;TForm5.btn2Click(Sender: TObject);.showmodal;;TForm5.Button1Click(Sender: TObject);.Showmodal;;.

unit Unit6;

var: TForm6;Unit4, Unit7, Unit8, Unit5, Unit1, Unit10, Unit11, Unit12,, Unit3, Unit9;

{$R *.dfm}TForm6.btn1Click(Sender: TObject);.showmodal;;TForm6.btn4Click(Sender: TObject);.close;;.

unit Unit7;

var: TForm7;unit4, Unit5, Unit1, Unit10, Unit11, Unit12, Unit2, Unit3,, Unit8, Unit9, Unit13;

{$R *.dfm}TForm7.Button1Click(Sender: TObject);.close;;TForm7.Button2Click(Sender: TObject);.showmodal;;.

unit Unit8;

var: TForm8;Unit6;

Form6.DBGrid1.DataSource.DataSet.FieldByName('Ôàìèëèÿ').AsString := Edit1.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName('Èìÿ').AsString := Edt1.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName('Îò÷åñòâî').AsString := Edt2.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName('Äîëæíîñòü').AsString := Edt3.Text;

Form6.DBGrid1.DataSource.DataSet.FieldByName('Òåëåôîí').AsString := Edt4.Text;.DBGrid1.DataSource.DataSet.Post;;TForm8.btn2Click(Sender: TObject);.close;;.

unit Unit9;

var: TForm9;Unit2, Unit1, Unit10, Unit11, Unit12, Unit3, Unit4, Unit5, Unit6,, Unit8;

{$R *.dfm}TForm9.Button1Click(Sender: TObject);.hide;.show;;.

unit Unit10;

var: TForm10;Unit5, Unit1, Unit11, Unit12, Unit2, Unit3, Unit4, Unit6, Unit7,, Unit9, Unit14;

{$R *.dfm}TForm10.Button1Click(Sender: TObject);.close;;TForm10.Button2Click(Sender: TObject);.showmodal;;.

unit Unit11;

var: TForm11;Unit5, Unit1, Unit10, Unit12, Unit2, Unit3, Unit4, Unit6, Unit7,, Unit9, Unit16;

{$R *.dfm}TForm11.Button1Click(Sender: TObject);.close;;TForm11.Button2Click(Sender: TObject);.showmodal;;.

unit Unit12;

var: TForm12;Unit5, Unit1, Unit10, Unit11, Unit2, Unit3, Unit4, Unit6, Unit7,, Unit9, Unit15;

{$R *.dfm}TForm12.Button1Click(Sender: TObject);.close;;TForm12.Button2Click(Sender: TObject);.showmodal;;.

unit Unit13;

var: TForm13;Unit7;

{$R *.dfm}TForm13.Button1Click(Sender: TObject);.DBGrid1.DataSource.DataSet.Insert;

Form7.DBGrid1.DataSource.DataSet.FieldByName('Ôàìèëèÿ').AsString := Edit1.Text;m7.DBGrid1.DataSource.DataSet.FieldByName('èìÿ').AsString := Edit2.Text;

Form7.DBGrid1.DataSource.DataSet.FieldByName('îò÷åñòâî').AsString := Edit3.Text;

Form7.DBGrid1.DataSource.DataSet.FieldByName('òåëåôîí').AsString := Edit4.Text;.DBGrid1.DataSource.DataSet.FieldByName('äîëæíîñòü').AsString := Edit5.Text;.DBGrid1.DataSource.DataSet.Post;;TForm13.Button2Click(Sender: TObject);.close;;.

unit Unit14;

var: TForm14;Unit10;

{$R *.dfm}TForm14.Button1Click(Sender: TObject);.close;;TForm14.Button2Click(Sender: TObject);.DBGrid1.DataSource.DataSet.Insert;

Form10.DBGrid1.DataSource.DataSet.FieldByName('Ôàìèëèÿ').AsString := Edit1.Text;

Form10.DBGrid1.DataSource.DataSet.FieldByName('èìÿ').AsString := Edit2.Text;

Form10.DBGrid1.DataSource.DataSet.FieldByName('îò÷åñòâî').AsString := Edit3.Text;

Form10.DBGrid1.DataSource.DataSet.FieldByName('òåëåôîí').AsString := Edit4.Text;.DBGrid1.DataSource.DataSet.FieldByName('äîëæíîñòü').AsString := Edit5.Text;.DBGrid1.DataSource.DataSet.Post;;.

unit Unit15;

var: TForm15;Unit6, Unit12;

{$R *.dfm}TForm15.Button1Click(Sender: TObject);.DBGrid1.DataSource.DataSet.Insert;

Form12.DBGrid1.DataSource.DataSet.FieldByName('òåêñò çàäà÷è').AsString := Edit1.Text;.DBGrid1.DataSource.DataSet.Post;;TForm15.Button2Click(Sender: TObject);.close;;.

unit Unit16;

var: TForm16;Unit11;

{$R *.dfm}TForm16.Button2Click(Sender: TObject);.close;;TForm16.Button1Click(Sender: TObject);.DBGrid1.DataSource.DataSet.Insert;

Form11.DBGrid1.DataSource.DataSet.FieldByName('Îðãàíèçàöèÿ').AsString := Edit1.Text;

Form11.DBGrid1.DataSource.DataSet.FieldByName('Òåëåôîí').AsString := Edit2.Text;.DBGrid1.DataSource.DataSet.Post;;..

Похожие работы на - АРМ замдиректора по научной работе

 

Не нашли материал для своей работы?
Поможем написать уникальную работу
Без плагиата!