Автор работы: Пользователь скрыл имя, 23 Мая 2013 в 11:11, курсовая работа
В данной курсовой работе описание разрабатываемой задачи произведено в трех главах.
В первой главе дана характеристика задачи курсовой работы, разработана постановка задачи, осуществлен и обоснован выбор технических и программных средств, необходимых для решения задачи.
Вторая глава посвящена формализованному описанию алгоритма решаемой задачи, построению диаграмм и схемы программы.
В третий главе приводится описание контрольного примера решения задачи и руководство пользователя.
Введение
1. Постановка задачи "Разработать постановку и осуществить программную реализацию одного из модулей задачи "Информационная система магазина АЗ-01" (Магазин "Автозапчасти")
1.1 Характеристика задачи АЗ-01
1.2 Выходная информация задачи АЗ-01
1.3 Входная информация задачи АЗ-01
1.4 Выбор и обоснование состава технических средств и средств программной реализации задачи АЗ-01
2. Разработка алгоритма и программы решения задачи
2.1 Разработка математического алгоритма решения задачи
2.2 Разработка схемы данных программы с описанием задачи
2.3 Разработка схемы программы решения задачи с описанием
3. Разработка руководства пользователя и контрольного примера, демонстрирующего корректность решения задачи "Разработать постановку и осуществить программную реализацию одного из модулей задачи: "Информационная система АЗ-01" (Магазин "Автозапчасти")
Заключение
Список используемых источников
1 Н. И. Полтавцева Правила оформления текста курсовой и дипломной работы, 2008
2 И.И. Мирошниченко
3 Т. А. Гайворонская Базы данных. Методические рекомендации по выполнению практических заданий для студентов 3 курса. - г. Ростов-на-Дону: РГКРИПТ, 2009
4 Освой самостоятельно SQL. 10 минут на урок, 3-е издание.: Пер. с англ. – М.: Издательский дом "Вильямс", 2009
5 Microsoft Access 2003. Эффективный самоучитель/ Пер. с чеш. Серия "Просто о сложном". – СПб.: Наука и Техника, 2010
6 Разработка приложений в Ms Access. Краткое руководство. – М.: Издательский дом "Вильямс", 2009
7 Access: учебно - практ. пособие. – М.: ТК Велби, Изд-во Проспект, 2010
8 Практикум по Access. – М.: Финансы и статистика, 2009
9 http://www.opennet.ru/docs/
10 http://www.lessons-tva.info/
Приложение А
Рисунок А1 - Диаграмма вариантов использования
Приложение Б
Рисунок Б1 - Диаграмма сотрудничества
Таблица Б1. Описание действий
№ действия |
Описание действия |
1 |
Разработчик создает АЗ-01 |
2 |
Продавец вносит данные в АЗ-01 |
3 |
Продавец формирует запросы |
4 |
Продавец получает отчеты |
5 |
Продавец обращается к разработчику на доработку приложения |
6 |
Разработчик дорабатывает приложение |
Приложение В
Рисунок В1 - Диаграмма последовательности
Таблица В1. Описание действий
№ действия |
Описание действия |
1 |
Разработчик создает АЗ-01 |
2 |
Продавец вносит данные в АЗ-01 |
3 |
Продавец формирует запросы |
4 |
Продавец получает отчеты |
5 |
Продавец обращается к разработчику на доработку приложения |
6 |
Разработчик дорабатывает приложение |
Приложение Г
Рисунок Г- ER-диаграмма
Приложение Д
Техническое задание
1 Введение
Настоящее техническое задание распространяется на разработку одного из модулей задачи "Автоматизация работы магазина "Автозапчасти"", предназначенного для использования сотрудниками магазина.
2 Основание для разработки
Задание на курсовую работу по дисциплине "Технология разработки программного продукта" от 23.03.2012 г.
3 Назначение
Основным назначением программы является учет продаваемых автозапчастей, информация о поставщиках и сотрудниках.
4. Требования к программе или программному изделию
4.1Требования к
4.1.1 Программа должна обеспечивать
возможность выполнения
- Ввод и изменение данных;
- Автоматическое обновление данных на основании накладной;
- Удаление данных на основании проданного товара.
4.1.2 Исходные данные:
- накладные;
- квитанции;
4.2Требования к надежности
4.2.1 Предусмотреть контроль вводимой информации.
4.2.2 Предусмотреть блокировку некорректных действий пользователя при работе с системой.
4.3Требования к составу
и параметрам технических
4.3.1 Система должна работать на IВМ совместимых ПК
4.3.2 Минимальная конфигурация:
- тип процессора – Pentium 2 и выше;
- объем ОЗУ – 128 и выше
4.4Требования к
Система должна работать под
управлением семейства
5 Требования к программной документации
5.1Разрабатываемые
5.2В состав сопровождающей документации должны входить:
- Пояснительная записка,
содержащая описание
- Руководство пользователя.
6. Этапы разработки
Название этапа |
Срок |
Отчетность |
Разработка ядра системы |
23.03.2012-30.04.2012 |
Описание внутренних форматов, интерфейса и форматов данных базы. Реализация системы на уровне интерфейса |
Разработка методов и алгоритмов и их реализация для абитуриентов |
1.04.2012- 30.05.2012 |
Описание методов и алгоритмов. Программные модули, реализующие методы |
Тестирование программного продукта и составлением программной документации |
1.05.2012- 1.06.2012 |
Тесты. Документация. Программный продукт |
Приложение Е
Исходный текст задачи АЗ-01
Программный код для Главной формы
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,Menus, unit3,unit4, unit5, unit6, unit7, unit8, unit9, unit10,
ExtCtrls, jpeg, unit11, unit12, unit13, unit14 ;
type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
N11: TMenuItem;
N15: TMenuItem;
N16: TMenuItem;
N17: TMenuItem;
N18: TMenuItem;
N19: TMenuItem;
N20: TMenuItem;
N21: TMenuItem;
N22: TMenuItem;
N23: TMenuItem;
N24: TMenuItem;
N25: TMenuItem;
N26: TMenuItem;
N27: TMenuItem;
N28: TMenuItem;
N29: TMenuItem;
image1: TImage;
procedure N19Click(Sender: TObject);
procedure N20Click(Sender: TObject);
procedure N21Click(Sender: TObject);
procedure N22Click(Sender: TObject);
procedure N23Click(Sender: TObject);
procedure N24Click(Sender: TObject);
procedure N25Click(Sender: TObject);
procedure N26Click(Sender: TObject);
procedure N27Click(Sender: TObject);
procedure N28Click(Sender: TObject);
procedure N29Click(Sender: TObject);
procedure N15Click(Sender: TObject);
procedure N18Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.N25Click(Sender: TObject);
begin
FormProd.Show; //Показать форму "Продажи"
Form1.Visible:=false; //Скрыть Главную форму
end;
procedure TForm1.N27Click(Sender: TObject);
begin
Form12.Show;
Form1.Visible:=false;
end;
procedure TForm1.N28Click(Sender: TObject);
begin
Form13.Show;
Form1.Visible:=false;
end;
procedure TForm1.N29Click(Sender: TObject);
begin
DataModule2.ADOQuery4.
DataModule2.ADOQuery4.Active:=
Form14.Show; // Показать запрос "Перечень проданных деталей в определенный день"
Form1.Visible:=false; // Скрыть Главную форму
end;
procedure TForm1.N15Click(Sender: TObject);
begin
Close; // Закрытие Главной формы
end;
procedure TForm1.N18Click(Sender: TObject);
begin
FormSklad.Show;
Form1.Visible:=false;
end;
procedure TForm1.N19Click(Sender: TObject);
begin
FormPokup.Show;
Form1.Visible:=false;
end;
procedure TForm1.N20Click(Sender: TObject);
begin
FormPostav.Show;
Form1.Visible:=false;
end;
procedure TForm1.N21Click(Sender: TObject);
begin
FormBrak.Show;
Form1.Visible:=false;
end;
procedure TForm1.N22Click(Sender: TObject);
begin
FormZacazi.Show;
Form1.Visible:=false;
end;
procedure TForm1.N23Click(Sender: TObject);
begin
FormZayavki.Show;
Form1.Visible:=false;
end;
procedure TForm1.N24Click(Sender: TObject);
begin
FormDetali.Show;
Form1.Visible:=false;
end;
procedure TForm1.N26Click(Sender: TObject);
begin
DataModule2.ADOQuery1.
DataModule2.ADOQuery1.Active:=
Form11.Show;
Form1.Visible:=false;
end;
end.
Программный код для Формы № 2
Форма для помещения компонентов, позволяющая связать базу данных в Access с Delphi.
unit Unit2;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDataModule2 = class(TDataModule)
TBrak: TADOTable;
Brak: TDataSource;
TDetali: TADOTable;
Detali: TDataSource;
TZayavki: TADOTable;
Zayavki: TDataSource;
TPostav: TADOTable;
Postav: TDataSource;
TZacazi: TADOTable;
Zacazi: TDataSource;
TPokup: TADOTable;
Pokup: TDataSource;
TProd: TADOTable;
Prod: TDataSource;
TSklad: TADOTable;
Sklad: TDataSource;
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
Zapros1: TDataSource;
ADOQuery2: TADOQuery;
Zapros2: TDataSource;
ADOQuery3: TADOQuery;
Zapros3: TDataSource;
ADOQuery4: TADOQuery;
Zapros4: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule2: TDataModule2;
implementation
{$R *.dfm}
end.
Программный код для Формы № 3
Форма таблицы "Склад".
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, unit2, ExtCtrls, DBCtrls, Grids, DBGrids, StdCtrls, ComObj;
type
TFormSklad = class(TForm)
DBGrid1: TDBGrid;
DBNavigator1: TDBNavigator;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
FormSklad: TFormSklad;
implementation
uses Unit1;
{$R *.dfm}
procedure TFormSklad.Button1Click(
begin
FormSklad.Close; // Закрыть форму "Склад"
Form1.Visible:=true; // Показать Главную форму
end;
procedure TFormSklad.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form1.Visible:=true;
end; end.
Программный код для формы № 11
Форма для запроса "Информация о деталях".
unit Unit11;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, unit2, StdCtrls, ExtCtrls, DBCtrls, Grids, DBGrids, ComObj;
type
TForm11 = class(TForm)
DBGrid1: TDBGrid;
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormActivate(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form11: TForm11;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm11.Button1Click(Sender: TObject);
begin
Form11.Close; // Закрыть запрос "Информация о деталях"
Form1.Visible:=true;
end;
procedure TForm11.Button2Click(Sender: TObject); // Процедура выполнения отчета
var
XLApp,Sheet,Column:Variant;
index,i:integer;
begin
XLApp:=CreateOleObject('Excel.
XLApp.Visible:=true;
XLApp.Workbooks.Add(-4167);
XLApp.Workbooks[1].WorkSheets[
Column:=XLApp.Workbooks[1].
Column.Columns[1].ColumnWidth:
Column.Columns[2].ColumnWidth:
Column.Columns[3].ColumnWidth: