Автор работы: Пользователь скрыл имя, 16 Марта 2012 в 16:37, курсовая работа
В результате курсового проектирования предполагается получить проектные предложения по автоматизации рабочего места менеджера, реализованные в виде программного продукта.
В процессе проектирования предполагается использование структурно – функциональной методологии (IDEF и DFD) на этапе анализа процессов, программных продуктов ALLFusion Process Modeler и ALLFusion ERwin Data Modeler, на этапе проектирования и реализации предполагается использование MS Visio, MS Access, RAD Borland Delphi 7.0. Оформление пояснительной записки будет выполняться с использованием текстового процессора MS Word и при создании презентации – MS Power Point.
1 ВВЕДЕНИЕ
2 Системный анализ состояния предприятия
2.1 Структура предприятия
2.2 Нормативно-правовая база деятельности агентства по организации мероприятий
2.3 Модель предметной области процессов
2.3.1 Перечень функций
2.3.2 Глоссарий
2.3.3 IDEF0-диаграмма
2.3.4 Контекстная IDEF0-диаграмма "AS IS"
2.3.5 Диаграммы первого уровня
2.3.6 Диаграммы второго уровня
3 Системное проектирование
3.1 Модели "AS TO BE"
3.1.1 Диаграммы IDEF0
3.1.2 DFD модель
3.1.3 IDEF3 модель
3.2 Проектные предложения по автоматизации задач
3.3 ER-диаграмма
3.4 Схема меню
4 ЗАКЛЮЧЕНИЕ
Список использованных источников
(Экранные формы)
Рис 1 Окно изменения пароля пользователя
Рис. 2 Окно входа в систему
Рис 3 Окно таблицы «Мероприятия»
Рис 4 Окно «О программе..»
(Выходные документы)
Выходной документ «Акт выполненных работ»
Выходной документ «Смета мероприятия»
Выходной документ «План мероприятия»
(Листинг фрагмента программы)
« private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
parol: string;
d,t:TDateTime;
F:Tsave;
implementation
uses Unit3, Unit2, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9, Unit10,
Unit11, Unit12, Unit13, Unit14, Unit15, Unit16, Unit17, Unit18, Unit19,
Unit21;
{$R *.dfm}
procedure TForm1.N8Click(Sender: TObject);
begin
Form3.show;
end;
procedure TForm1.N7Click(Sender: TObject);
begin
Form2.show;
end;
procedure TForm1.N28Click(Sender: TObject);
begin
close;
end;
procedure TForm1.N10Click(Sender: TObject);
begin
Form4.show;
end;
procedure TForm1.N11Click(Sender: TObject);
begin
Form5.show;
end;
procedure TForm1.N12Click(Sender: TObject);
begin
Form6.show;
end;
procedure TForm1.N13Click(Sender: TObject);
begin
Form7.show;
end;
procedure TForm1.N14Click(Sender: TObject);
begin
Form8.show;
end;
procedure TForm1.N15Click(Sender: TObject);
begin
Form9.show;
end;
procedure TForm1.N16Click(Sender: TObject);
begin
Form10.show;
end;
procedure TForm1.N17Click(Sender: TObject);
begin
Form11.show;
end;
procedure TForm1.N19Click(Sender: TObject);
begin
Form12.show;
end;
procedure TForm1.N20Click(Sender: TObject);
begin
Form13.show;
end;
procedure TForm1.N21Click(Sender: TObject);
begin
Form14.show;
end;
procedure TForm1.N22Click(Sender: TObject);
begin
Form15.show;
end;
procedure TForm1.N23Click(Sender: TObject);
begin
Form16.show;
end;
procedure TForm1.N25Click(Sender: TObject);
begin
Form17.show;
end;
procedure TForm1.N26Click(Sender: TObject);
begin
Form18.show;
end;
procedure TForm1.N27Click(Sender: TObject);
begin
Form19.show;
end;
procedure TForm1.N29Click(Sender: TObject);
begin
Form21.show;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.N2.Enabled:=false;
Form1.N3.Enabled:=false;
Form1.N8.Enabled:=false;
Form1.N9.Enabled:=false;
Form1.N18.Enabled:=false;
Form1.N5.Enabled:=false;
end;
end.»
69