Тему нужно придумать.
Заказать уникальную курсовую работу- 60 60 страниц
- 20 + 20 источников
- Добавлена 10.09.2010
- Содержание
- Часть работы
- Список литературы
- Вопросы/Ответы
Введение
1. Аналитическая часть
1.1 Описание деятельности предприятия
1.1.1 Характеристика предприятия и масштаба его деятельности
1.1.2 Программная и техническая архитектура используемых ИС
1.1.3 Структурно-функциональная диаграмма организации деятельности
1.2 Характеристика комплекса задач, задачи и обоснование необходимости автоматизации
1.2.1 Выбор комплекса задач и характеристика существующих бизнес процессов
1.2.2 Определение места и сущности проектируемой задачи
1.2.3 Формализация расчётов показателей в задаче проекта
1.2.4 Технико-экономическое обоснование проекта
1.3 Обоснование проектных решений
1.3.1 Обоснование проектных решений по техническому обеспечению
1.3.2 Обоснование проектных решений по программному обеспечению
2. Проектная часть
2.1Разработка проекта автоматизации: информационный менеджмент
2.1.1 Разработка и описание проекта автоматизации
2.1.2 Оценка стоимостных параметров проекта автоматизации
Затраты на материалы
2.2 Информационное обеспечение задачи
2.2.1 Информационная модель и её описание
2.2.2 Характеристика используемых классификаторов
2.2.3 Характеристика нормативно-справочной и входной информации
2.2.4 Характеристика результатной информации
2.2.5 Характеристика информационной базы проекта
2.3 Программное и технологическое обеспечение задачи
2.3.1 Дерево функций проекта
2.3.2 Программная и техническая архитектура проектируемого решения
2.3.3 Схемы технологического процесса (машинного этапа)
2.4 Контрольный пример реализации проекта и его описание
3 Обоснование экономической эффективности проекта
3.1 Выбор и обоснование методики расчёта экономической эффективности
3.2 Расчёт показателей экономической эффективности проекта
Заключение
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
Специалист вместе с клиентом определит перечень работ, система рассчитает необходимое количество ресурсов и материалов и общую стоимость проекта.3.2 Расчёт показателей экономической эффективности проектаНа рис. 3.1-3.3 изображены сравнительные диаграммы по основным расчетным показателям.Рис. 3.1 – Сравнение трудовых затрат существующей и созданной системыРис. 3.2 – Сравнение стоимостных затрат существующей и созданной системыРис. 3.3 – Сравнение стоимостных затрат на ПП и абсолютного снижения стоимостных затратТаким образом, внедрение ИС ведения проекта компании «СтройИнвест» можно считать целесообразным, так как в ней устранены недостатки существующей системы, ее внедрение позволит автоматизировать расчет необходимого количества ресурсов и материалов для проекта, ИС повысит оперативность и точность вычислений. ИС окупит себя через 3 месяца.ЗаключениеИтак, целью данной работы является – повышение эффективности ведения проектов компании «СтройИнвест» путем разработки ИС ведения проекта.В первой главе ДП дано описание предметной области, рассмотрен процесс ведения проекта компании «СтройИнвест». Выявлены задачи подлежащие автоматизации. Описаны входные и выходные потоки задачи подлежащей автоматизации.Были выявлены недостатки существующей системы.Был выработан перечень требований к проектируемой ИС.Во второй главе описана структура информационного фонда системы, описаны входные и выходные данные. Описана система кодирования и классификации ИС.Дано описание программной реализации системы, а именно: алгоритм работы программы, описаны экранные формы приложения, описан пример работы программы.В третьей главе выбрана методика расчета экономической эффективности.Осуществлено финансово-экономическое обоснование разработки и внедрения ИС ведения проекта компании «СтройИнвест». Период окупаемости ИС составляет 3 месяца.Таким образом, цель КП можно считать достигнутой, а поставленные задачи - решенными.СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВУправление программными проектами: достижение оптимального качества при минимуме затрат.: Пер. с англ. – М.: Издательский дом «Вильямс», 2004. Интернет – маркетинг: Учебник. Успенский И.В. - СПб.: Изд-во СПГУЭиФ, 2003.Экономическая информатика: Введение в экономический анализ информационных систем: Учебник. – М.: ИНФРА-М, 2005.Шафер Д.Ф., Фартрел Т., Шафер Л.И. Управление программными проектами: достижение оптимального качества при минимуме затрат.: Пер. с англ. – М.: Вильямс, 2004.Марка Д. А., МакГоуэн К. Методология структурного анализа и проектирования SADT. Проектирование экономических информационных систем: учеб. / под ред. Ю. Ф. Тельнова. М., 2005Автоматизированные информационные технологии в экономике: Учебник/Под ред. проф. Г.А. Титоренко. – М.: Компьютер, ЮИНИТИ, 2006Маклаков С. В. Моделирование бизнес-процессов с AllFusion Process Modeler (BPwin 4.1). М., 2003Маклаков С.В. Создание информационных систем с AllFusion Modeling Suite. – М.: ДИАЛОГ-МИФИ, 2005 Маклаков С.В. BPwin и Erwin. CASE-средства разработки информационных систем. — М.: ДИАЛОГ–МИФИ, 2004Фаулер М. UML в кратком изложении: применение стандартного языка объектного моделирования: пер. с англ. / М. Фаулер, К. Скотт. М., 2004 Фаулер М. UML – основы. Руководство по стандартному языку объектного моделирования.: Пер. с англ. – СПб.: Символ, 2006Калянов Г.Н. Консалтинг при автоматизации предприятий (подходы, методы, средства) // М.: СИНТЕГ, 2002Петров Ю.А., Шлимович Е.Л., Ирюпин Ю.В. Комплексная автоматизация управления предприятием: Информационные технологии - теория и практика. - М.: Финансы и статистика, 2005Хомоненко А.Д. и др. Базы данных: Учебник для вузов / Под ред. проф. А.Д. Хомоненко. — СПб.: КОРОНА принт, 2004 — 736 с. Смирнова Г.Н. и др. Проектирование экономических информационных систем: Учебник / Под ред. Ю.Ф. Тельнова. — М.: Финансы и статистика, 2002 — 512 с.Смирнов И.Н. и др. Основные СУБД. – М.: Наука, 1999 – 320 с.ГОСТ 34.602-89 «Информационная технология. Комплекс стандартов на автоматизированные системы. Техническое задание на создание автоматизированной системы»;ГОСТ 34.601-90 «Информационная технология. Комплекс стандартов на автоматизированные системы. Автоматизированные системы. Стадии создания».ГультяевА. К., «Microsoft Office Project 2007. Управление проектами: практическое пособие. » - СПб.: КОРОНА-Век, 2008 – 480 с. ил. Приложение 1Установка программыКопируем файл project.db в корень диска C:\Устанавливаем SybaseSQLAnywhere 5.0Создаем источник данныхНажимаем кнопку «Добавить…»Выбираем драйвер SybaseSQLAnywhere 5.0Заполняем следующие пункты:Data Source Name: projectUser ID: DBAPassword: SQLDatabase File: C:\project.db (Browse…- выбираемфайл project.db надискеС:\)Приложение 2unit main;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, SUIImagePanel, SUIPageControl, SUITabControl, ExtCtrls, SUIForm, SUIButton, StdCtrls, SUIEdit, Grids, DBGrids, SUIDBCtrls, SUIComboBox, SUIMemo, DB, ADODB, frxClass, frxDBSet;type TForm1 = class(TForm) suiForm1: TsuiForm; suiPageControl1: TsuiPageControl; suiTabSheet1: TsuiTabSheet; suiTabSheet2: TsuiTabSheet; suiTabSheet3: TsuiTabSheet; suiPanel1: TsuiPanel; suiPanel2: TsuiPanel; suiPanel4: TsuiPanel; suiDBGrid1: TsuiDBGrid; suiPanel3: TsuiPanel; suiDBGrid2: TsuiDBGrid; suiDBGrid3: TsuiDBGrid; Label1: TLabel; suiEdit1: TsuiEdit; Label2: TLabel; suiEdit2: TsuiEdit; suiButton1: TsuiButton; Label3: TLabel; suiEdit3: TsuiEdit; Label4: TLabel; suiEdit4: TsuiEdit; suiButton2: TsuiButton; suiButton3: TsuiButton; suiButton8: TsuiButton; suiPanel9: TsuiPanel; suiDBGrid7: TsuiDBGrid; suiPanel10: TsuiPanel; Label13: TLabel; Label14: TLabel; Label15: TLabel; suiEdit11: TsuiEdit; suiEdit12: TsuiEdit; suiButton9: TsuiButton; suiEdit13: TsuiEdit; suiButton10: TsuiButton; suiButton11: TsuiButton; suiButton12: TsuiButton; suiPanel11: TsuiPanel; suiDBGrid8: TsuiDBGrid; Label18: TLabel; suiComboBox2: TsuiComboBox; Label19: TLabel; suiComboBox3: TsuiComboBox; ADOConnection1: TADOConnection; tzay: TADOTable; tsost_mat: TADOTable; tproject: TADOTable; tsost_res: TADOTable; tusl: TADOTable; tres: TADOTable; zay: TDataSource; project: TDataSource; usl: TDataSource; sost_res: TDataSource; sost_mat: TDataSource; res: TDataSource; suiEdit17: TsuiEdit; tmat: TADOTable; mat: TDataSource; suiPanel5: TsuiPanel; suiDBGrid4: TsuiDBGrid; suiPanel6: TsuiPanel; Label8: TLabel; suiEdit8: TsuiEdit; suiButton5: TsuiButton; suiButton7: TsuiButton; suiEdit9: TsuiEdit; suiPanel7: TsuiPanel; suiDBGrid5: TsuiDBGrid; suiPanel8: TsuiPanel; suiDBGrid6: TsuiDBGrid; Label11: TLabel; Label12: TLabel; suiEdit10: TsuiEdit; suiEdit18: TsuiEdit; suiTabSheet4: TsuiTabSheet; suiPanel12: TsuiPanel; suiDBGrid9: TsuiDBGrid; suiPanel13: TsuiPanel; suiPanel14: TsuiPanel; suiDBGrid10: TsuiDBGrid; suiPanel15: TsuiPanel; suiDBGrid11: TsuiDBGrid; suiPanel16: TsuiPanel; suiDBGrid12: TsuiDBGrid; Label5: TLabel; Label6: TLabel; suiEdit5: TsuiEdit; suiButton4: TsuiButton; suiButton6: TsuiButton; suiComboBox4: TsuiComboBox; suiEdit6: TsuiEdit; Label9: TLabel; Label10: TLabel; Label21: TLabel; suiEdit22: TsuiEdit; Label25: TLabel; suiEdit23: TsuiEdit; suiEdit20: TsuiEdit; suiButton13: TsuiButton; suiButton14: TsuiButton; suiEdit21: TsuiEdit; Label24: TLabel; Label26: TLabel; Label27: TLabel; suiEdit25: TsuiEdit; Label28: TLabel; suiEdit26: TsuiEdit; Label17: TLabel; suiComboBox1: TsuiComboBox; suiButton15: TsuiButton; Label22: TLabel; suiEdit19: TsuiEdit; Label7: TLabel; suiEdit7: TsuiEdit; Label20: TLabel; suiEdit15: TsuiEdit; frxReport1: TfrxReport; frxDBDataset1: TfrxDBDataset; procedure FormCreate(Sender: TObject); procedure suiButton1Click(Sender: TObject); procedure suiButton3Click(Sender: TObject); procedure suiButton2Click(Sender: TObject); procedure suiButton5Click(Sender: TObject); procedure suiButton7Click(Sender: TObject); procedure suiButton13Click(Sender: TObject); procedure suiButton14Click(Sender: TObject); procedure suiButton4Click(Sender: TObject); procedure suiButton6Click(Sender: TObject); procedure suiButton9Click(Sender: TObject); procedure suiButton11Click(Sender: TObject); procedure suiButton12Click(Sender: TObject); procedure suiButton10Click(Sender: TObject); procedure suiDBGrid11CellClick(Column: TColumn); procedure suiDBGrid6CellClick(Column: TColumn); procedure suiDBGrid3CellClick(Column: TColumn); procedure suiButton15Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);var i:integer;beginsuiPageControl1.ActivePageIndex:=0;end;procedure TForm1.suiButton1Click(Sender: TObject);var nom:integer;beginif ((suiEdit1.Text<>'##.##.####') and (suiEdit2.Text<>'##.##.####')) thenbegintzay.Sort:='kod_z';tzay.Last;if (tzay.FieldValues['kod_z']<>null) then nom:=tzay.FieldValues['kod_z']+1 else nom:=1;trytzay.Append;tzay.FieldByName('kod_z').AsInteger:=nom;tzay.FieldByName('data_zaversh').AsString:=suiEdit2.text;tzay.FieldByName('data').AsString:=suiEdit1.text;tzay.FieldByName('stoim').AsInteger:=0;tzay.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end else MessageDlg('Введитедату!',mtInformation,[mbYes],0);end;procedure TForm1.suiButton3Click(Sender: TObject);begintzay.Delete;end;procedure TForm1.suiButton2Click(Sender: TObject);var stoim:integer;beginif ((suiEdit10.Text<>'##.##.####') and (suiEdit17.Text<>'##.##.####')) thenbegintrytproject.Append;tproject.FieldByName('kod_usl').AsInteger:=tusl.FieldValues['kod_usl'];tproject.FieldByName('kod_z').AsInteger:=tzay.FieldValues['kod_z'];tproject.FieldByName('data_okonch').AsString:=suiEdit10.text;tproject.FieldByName('data_start').AsString:=suiEdit17.text;tproject.FieldByName('edin').AsInteger:=strtoint(suiEdit4.text);tproject.FieldByName('stoim').AsInteger:=strtoint(suiEdit4.text)*tusl.FieldValues['stoim'];tproject.Post;stoim:=tzay.FieldValues['stoim'];tzay.Edit;tzay.FieldByName('stoim').AsInteger:=stoim+(strtoint(suiEdit4.text)*tusl.FieldValues['stoim']);tzay.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end else MessageDlg('Введитедату!',mtInformation,[mbYes],0);end;procedure TForm1.suiButton5Click(Sender: TObject);var nom:integer;begintrytsost_res.Append;tsost_res.FieldByName('kod_usl').AsInteger:=tusl.FieldValues['kod_usl'];tsost_res.FieldByName('kod_res').AsInteger:=tres.FieldValues['kod_res'];tsost_res.FieldByName('kolich').AsInteger:=strtoint(suiEdit9.text);tsost_res.FieldByName('stoim').AsInteger:=(strtoint(suiEdit9.text)*strtoint(suiEdit23.text));tsost_res.Post;tusl.Edit;tusl.FieldByName('stoim').AsInteger:=tusl.FieldValues['stoim']+(strtoint(suiEdit9.text)*strtoint(suiEdit23.text));tusl.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton7Click(Sender: TObject);begintsost_res.Delete;end;procedure TForm1.suiButton13Click(Sender: TObject);var nom:integer;begintrytsost_mat.Append;tsost_mat.FieldByName('kod_usl').AsInteger:=tusl.FieldValues['kod_usl'];tsost_mat.FieldByName('kod_mater').AsInteger:=tmat.FieldValues['kod_mater'];tsost_mat.FieldByName('kolich').AsInteger:=strtoint(suiEdit21.text);tsost_mat.FieldByName('stoim').AsInteger:=(strtoint(suiEdit21.text)*strtoint(suiEdit26.text));tsost_mat.Post;tusl.Edit;tusl.FieldByName('stoim').AsInteger:=tusl.FieldValues['stoim']+(strtoint(suiEdit21.text)*strtoint(suiEdit26.text));tusl.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton14Click(Sender: TObject);begintsost_mat.Delete;end;procedure TForm1.suiButton4Click(Sender: TObject);var nom:integer;begintusl.Sort:='kod_usl';tusl.Last;if (tusl.FieldValues['kod_usl']<>null) then nom:=tusl.FieldValues['kod_usl']+1 else nom:=1;trytusl.Append;tusl.FieldByName('kod_usl').AsInteger:=nom;tusl.FieldByName('usl').AsString:=suiEdit5.text;tusl.FieldByName('edin').AsString:=suiComboBox4.text;tusl.FieldByName('stoim').AsInteger:=0;tusl.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton6Click(Sender: TObject);begintusl.Delete;end;procedure TForm1.suiButton9Click(Sender: TObject);var nom:integer;begintmat.Sort:='kod_mater';tmat.Last;if (tmat.FieldValues['kod_mater']<>null) then nom:=tmat.FieldValues['kod_mater']+1 else nom:=1;trytmat.Append;tmat.FieldByName('kod_mater').AsInteger:=nom;tmat.FieldByName('mater').AsString:=suiEdit11.text;tmat.FieldByName('edin').AsString:=suiComboBox3.text;tmat.FieldByName('stoim').AsInteger:=strtoint(suiEdit12.text);tmat.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton11Click(Sender: TObject);begintmat.Delete;end;procedure TForm1.suiButton12Click(Sender: TObject);begintres.Delete;end;procedure TForm1.suiButton10Click(Sender: TObject);var nom:integer;begintres.Sort:='kod_res';tres.Last;if (tres.FieldValues['kod_res']<>null) then nom:=tres.FieldValues['kod_res']+1 else nom:=1;trytres.Append;tres.FieldByName('kod_res').AsInteger:=nom;tres.FieldByName('res').AsString:=suiEdit13.text;tres.FieldByName('edin').AsString:=suiComboBox1.text;tres.FieldByName('type_res').AsString:=suiComboBox2.text;tres.FieldByName('stoim').AsInteger:=strtoint(suiEdit15.text);tres.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiDBGrid11CellClick(Column: TColumn);beginsuiEdit19.text:=tmat.FieldValues['kod_mater'];suiEdit20.text:=tmat.FieldValues['mater'];suiEdit25.text:=tmat.FieldValues['edin'];suiEdit26.text:=tmat.FieldValues['stoim'];end;procedure TForm1.suiDBGrid6CellClick(Column: TColumn);beginsuiEdit7.text:=tres.FieldValues['kod_res'];suiEdit8.text:=tres.FieldValues['res'];suiEdit6.text:=tres.FieldValues['type_res'];suiEdit22.text:=tres.FieldValues['edin'];suiEdit23.text:=tres.FieldValues['stoim'];end;procedure TForm1.suiDBGrid3CellClick(Column: TColumn);beginsuiEdit3.text:=tusl.FieldValues['kod_usl'];suiEdit18.text:=tusl.FieldValues['edin'];end;procedure TForm1.suiButton15Click(Sender: TObject);begintproject.Filter:='kod_z='+inttostr(tzay.FieldValues['kod_z']);tproject.Filtered:=true;frxReport1.ShowReport;tproject.Filtered:=false;end;end.
1.Управление программными проектами: достижение оптимального качества при минимуме затрат.: Пер. с англ. – М.: Издательский дом «Вильямс», 2004.
2.Интернет – маркетинг: Учебник. Успенский И.В. - СПб.: Изд-во СПГУЭиФ, 2003.
3.Экономическая информатика: Введение в экономический анализ информационных систем: Учебник. – М.: ИНФРА-М, 2005.
4.Шафер Д.Ф., Фартрел Т., Шафер Л.И. Управление программными проектами: достижение оптимального качества при минимуме затрат.: Пер. с англ. – М.: Вильямс, 2004.
5.Марка Д. А., МакГоуэн К. Методология структурного анализа и проектирования SADT.
6.Проектирование экономических информационных систем: учеб. / под ред. Ю. Ф. Тельнова. М., 2005
7.Автоматизированные информационные технологии в экономике: Учебник/Под ред. проф. Г.А. Титоренко. – М.: Компьютер, ЮИНИТИ, 2006
8.Маклаков С. В. Моделирование бизнес-процессов с AllFusion Process Modeler (BPwin 4.1). М., 2003
9.Маклаков С.В. Создание информационных систем с AllFusion Modeling Suite. – М.: ДИАЛОГ-МИФИ, 2005
10.Маклаков С.В. BPwin и Erwin. CASE-средства разработки информационных систем. — М.: ДИАЛОГ–МИФИ, 2004
11.Фаулер М. UML в кратком изложении: применение стандартного языка объектного моделирования: пер. с англ. / М. Фаулер, К. Скотт. М., 2004
12.Фаулер М. UML – основы. Руководство по стандартному языку объектного моделирования.: Пер. с англ. – СПб.: Символ, 2006
13.Калянов Г.Н. Консалтинг при автоматизации предприятий (подходы, методы, средства) // М.: СИНТЕГ, 2002
14.Петров Ю.А., Шлимович Е.Л., Ирюпин Ю.В. Комплексная автоматизация управления предприятием: Информационные технологии - теория и практика. - М.: Финансы и статистика, 2005
15.Хомоненко А.Д. и др. Базы данных: Учебник для вузов / Под ред. проф. А.Д. Хомоненко. — СПб.: КОРОНА принт, 2004 — 736 с.
16.Смирнова Г.Н. и др. Проектирование экономических информационных систем: Учебник / Под ред. Ю.Ф. Тельнова. — М.: Финансы и статистика, 2002 — 512 с.
17.Смирнов И.Н. и др. Основные СУБД. – М.: Наука, 1999 – 320 с.
18.ГОСТ 34.602-89 «Информационная технология. Комплекс стандартов на автоматизированные системы. Техническое задание на создание автоматизированной системы»;
19.ГОСТ 34.601-90 «Информационная технология. Комплекс стандартов на автоматизированные системы. Автоматизированные системы. Стадии создания».
20.Гультяев А. К., «Microsoft Office Project 2007. Управление проектами: практическое пособие. » - СПб.: КОРОНА-Век, 2008 – 480 с. ил.
Вопрос-ответ:
Какими ИС пользуется предприятие?
Предприятие использует программные и технические архитектуры для своей деятельности.
Какие бизнес-процессы автоматизируются на предприятии?
На предприятии автоматизируются различные бизнес-процессы, необходимые для эффективного функционирования.
Как выбирают комплекс задач для автоматизации на предприятии?
Выбор комплекса задач для автоматизации на предприятии осуществляется в соответствии с нуждами и целями организации.
Для чего нужно проектировать новую задачу?
Проектирование новой задачи необходимо для повышения эффективности работы предприятия и улучшения бизнес-процессов.
Что включает в себя аналитическая часть организации деятельности предприятия?
Аналитическая часть организации деятельности предприятия включает в себя описание деятельности предприятия, характеристику его масштаба, а также программную и техническую архитектуру используемых ИС.
Чем занимается предприятие, о котором идет речь в статье?
Описание деятельности предприятия.
Какие информационные системы использует предприятие?
Программная и техническая архитектура используемых ИС.
Как выглядит структурно-функциональная диаграмма организации деятельности предприятия?
Структурно-функциональная диаграмма описывает организацию деятельности предприятия.
Почему предприятию нужна автоматизация и комплекс задач?
Обоснование необходимости автоматизации и выбор комплекса задач.