Разработка приложения

Отношения находятся во 2НФ тогда и только тогда, когда отношение находится в 1НФ, и не содержит неполных функциональных зависимостей. Представление таблицы во второй нормальной форме требует, чтобы все столбцы, не являющиеся первичными ключами (столбцы, описывающие объект, но однозначно не идентифицирующие его), зависели от всего первичного ключа, а не от его отдельных компонентов.
В таблице «Товар» атрибуты – «Наименование товара, Единица измерения, Цена товара, Примечание» полностью зависят от атрибута «Код товара», который является первичным ключом. Следовательно, таблица «Товар» удовлетворяет требования 2НФ.
Третья нормальная форма.
Отношение находится в третьей нормальной форме тогда, когда оно находится во 2НФ и ни один не ключевой столбец не зависит от другого не ключевого столбца. Любой не ключевой столбец должен зависеть только от столбца первичного ключа.
Чтобы перейти от 2НФ к 3НФ необходимо [9, 10]:
1. Определить все поля (или группу полей), от которых зависят другие поля.
2. Создать новую таблицу для каждого такого поля (или группы полей) и группы зависящих от него полей и переместить их в эту таблицу. Поле (или группа полей) от которых зависят все перемещаемые поля, станет при этом первичным ключом новой таблицы.
3. Удалить перемещенные поля из исходной таблицы, оставив лишь те из них, которые станут внешним ключом.
В таблице «Товар» каждый не ключевой атрибут логически связан с атрибутом, являющимся первичным ключом.
Четвертая и пятая нормальные формы
Четвертая нормальная форма запрещает независимые отношения типа один-ко-многим между ключевыми и не ключевыми столбцами. Пятая нормальная форма доводит весь процесс нормализации до логического конца, разбивая таблицы на минимально возможные части для устранения в них всей избыточности данных. Нормализованные таким образом таблицы обычно содержат минимальное количество информации, помимо первичного ключа. Таким образом, любой фрагмент не ключевых данных (данных, не являющихся первичным или внешним ключом) встречается в базе данных только один раз, и не возникает никаких проблем при их обновлении. Однако, поскольку каждая таблица в пятой нормальной форме имеет минимальное число столбцов, то в них должны дублироваться одни и те же ключи, обеспечивая возможности для объединения таблиц и получения полезной информации. Нормализованная таблица «Товар» содержит минимальное количество информации, помимо первичного ключа, а значит, она удовлетворяет требованиям 4 и 5 НФ.
Таблицы базы данных создавались при помощи СУБД MS Access.
Логическая структура реляционной БД определяется совокупностью логически взаимосвязанных реляционных таблиц.
Каждая реляционная таблица имеет структуру, определяемую реквизитным составом одного из информационных объектов полученной ИЛМ. Логические связи таблиц соответствуют структурным связям между объектами.
Логическая структура реляционной БД, построена на основе полученной ИЛМ, представлена на рисунке 2.4.

Рисунок 2.4 - Логическая структура реляционной базы данных

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


3 Пользовательский интерфейс для электронного каталога

Пользовательский интерфейс был разработан на языке высокого уровня Delphi.
Данный язык программирования позволяет разработать дружественный интерфейс под стандартные приложения Windows.
Работа с программой начинается с вывода на экран главной формы приложения (рисунок 3.1)


Рисунок 3.1 – Главная форма приложения

На главной форме расположено основное меню работы с программой. Меню содержит следующие пункты: Файл, Справочники, Таблицы.
При нажатии на кнопку Справочники выйдет список справочников, где отображается информация об основной продукции и поставщиках.


Рисунок 3.2 – Пункт меню Справочники

При выборе пункта «Товары» Выйдет окно, где вводится информация о товаре, которым располагает предприятие(рисунок 3.3)


Рисунок 3.3 – Справочник «Товары»

При выборе пункта «Поставщики» появится форма для ввода поставщиков, с которыми работает организация (рисунок 3.4).


Рисунок 3.4 – Справочник «Поставщики»
Пункт меню Таблицы содержит следующие пункты: Заказы, Поставки.
При выборе пункта меню Заказы, выходит форма на которой можно отслеживать какой товар был заказан, сколько товара и на какую стоимость (рисунок 3.5).


Рисунок 3.5 – Форма «Заказы»
Что бы не вводит товар вручную, есть кнопка ,которая открывает справочник Товаров, где можно выбрать необходимый товар, и он автоматически заносится в поле Наименование товара на форме Заказы.
При выборе пункта меню Поставки, открывается форма, где можно отследить какой товар и каким поставщиком был доставлен (рисунок 3.6).


Рисунок 3.6 –Форма Поставки

На данной форме так же автоматически заполняются поля Поставщик и Наименование товара.
Таким образом, разработанное приложение выполняет следующие задачи:
хранит сведения о поставщиках, покупателях фирмы;
хранит сведения об имеющемся товаре;
ведет учет поступлений партий товаров от поставщиков;
ведет учет реализации товаров покупателями;
ведет учет расчетов с поставщиками за поставленные партии товаров.



Заключение

В ходе курсовой работы была разработана информационная система «Электронный каталог продукции».
Для реализации данного приложения было сделано следующее:
рассмотрены основные особенности информационных систем;
определены требования к информационной системе «Электронный каталог продукции;
разработано клиентское приложение, предназначенное для автоматизации учета товарооборота.
Разработанное клиентское приложение было создано с помощью СУБД MS Access и языка программрования Delphi 7.0.
Приложение «Электронный каталог» позволяет:
хранит сведения о поставщиках, покупателях фирмы;
хранит сведения об имеющемся товаре;
ведет учет поступлений партий товаров от поставщиков;
ведет учет реализации товаров покупателями;
ведет учет расчетов с поставщиками за поставленные партии товаров.
Данное приложение позволяет повысить качество работы персонала фирмы и уменьшить время по обработке документации.




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

Торговые информационные системы [Электронный ресурс]: http://www.tadviser.ru/index.php/
Информационные системы для торговли [Электронный ресурс]: http://www.cnews.ru/
Голицына О.Л. Базы данных: Учебное пособие/ О. Л. Голицына, Н. В. Максимов, И. И. Попов.- 2-е изд., испр. и доп..- М.: ФОРУМ, ИНФРА-М, 2007.- 400с.
Туманов В.Е. Основы проектирования реляционных баз данных: Учеб.пособие для вузов/ В.Е.Туманов.- М.: ИНТУИТ.РУ, 2007.- 420с..-(Основы информационных технологий) 4. Сорокин А.В. Delphi. Разработка баз данных. – СПб.: Питер, 2005. – 477 с.
Вейскас Д. Эффективная работа с Microsoft Access 2000 «Microsoft Press», 2007. - 864с.
Избачков Ю.С., Петров В.Н. Информационные системы: Учебник для вузов. 2-е изд. – СПб.: Питер, 2005. – 656 с.
Голицына О.Л. Системы управления базами данных: Учебное пособие/ О. Л. Голицына, Т. Л. Партыка, И. И. Попов.- М.: ФОРУМ, ИНФРА-М, 2006.- 432с.
Бойко В.В., Проектирование информационной базы автоматизированной системы на основе СУБД: учебное пособие / В. В. Бойко, В. М. Савинков. - М. : Финансы и статистика, 2010. - 174 с.
Дунаев В.В. Базы данных. Язык SQL для студента/ В.В. Дунаев.- 2-е изд..- СПб.: БХВ-Петербург, 2007.- 320с.
Стивенс Р. Программирование баз данных/ Р.Стивенс; Пер.с англ..- 2-е изд..- М.: Бином-Пресс, 2007.- 384с.
Енин А.В. Локальная СУБД своими руками: Учимся на примерах/ А.В.Енин, Н.В.Енин.- М.: СОЛОН-ПРЕСС, 2007.- 464с.
Грофф Дж.Р. Энциклопедия SQL.- 3-е изд..- СПб.: Питер, 2007.- 896с.
Кузин А.В. Базы данных: Учеб.пособие для вузов/ А.В.Кузин, С.В.Левонисова.- 3-е изд.,стереотип..- М.: Академия, 2008.- 320с.
Трещалин М.Ю. Основы информационных технологий: Учеб.пособие для вузов/ М.Ю. Трещалин.- М.: Элит, 2007.- 108с.
15. Михеева В. Д., Microsoft Access 2003 : учебное пособие / В. Д. Михеева, И. А. Харитонова. - СПб. : БХВ- Петербург, 2009. - 1072 с.
























ПРИЛОЖЕНИЕ А
Unit Menu;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus;

type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
procedure N3Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure N7Click(Sender: TObject);
procedure N8Click(Sender: TObject);
procedure N5Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

uses Sprav, Zakaz, Postav;

{$R *.dfm}

procedure TForm1.N3Click(Sender: TObject);
begin
FSprav.Show; //Вызов формы Справка
FSprav.TabSheet2.TabVisible:=false;
FSprav.TabSheet1.TabVisible:=true; //Вызов вкладки Товары
FSprav.Button3.Visible:=false;// Делаем кнопку не активной
FSprav.Button5.Visible:=false;// Делаем кнопку не активной
end;

procedure TForm1.N4Click(Sender: TObject);
begin
FSprav.Show; //Вызов формы Справка
FSprav.TabSheet2.TabVisible:=true;
FSprav.TabSheet1.TabVisible:=false;//Вызов формы Справка, вкладки Поставщики
FSprav.Button4.Visible:=false;// Делаем кнопку не активной
end;
procedure TForm1.N7Click(Sender: TObject);
begin
FZakaz.Show;// Открываем форму
end;
Продолжение ПРИЛОЖЕНИЯ А

procedure TForm1.N8Click(Sender: TObject);
begin
FPost.Show; // Открываем форму
end;

procedure TForm1.N5Click(Sender: TObject);
begin
Close; // Выход из проекта
end;
end.
unit Sprav;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Mask, DBCtrls, ComCtrls, DB, Grids, DBGrids, ExtCtrls,
ADODB;
type
TFSprav = class(TForm)
PageControl1: TPageControl;
TabSheet1: TTabSheet;
TabSheet2: TTabSheet;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
DBMemo1: TDBMemo;
DataSource1: TDataSource;
DBNavigator1: TDBNavigator;
DBGrid1: TDBGrid;
DBNavigator2: TDBNavigator;
ADOTable2: TADOTable;
DataSource2: TDataSource;
ADOTable2Id_postav: TAutoIncField;
ADOTable2Naimen: TWideStringField;
ADOTable2Adress: TWideStringField;
ADOTable2Tel: TIntegerField;
Button1: TButton;
Button2: TButton;
Button3: TButton;
ADOQuery1: TADOQuery;
ADOQuery1Kod_tovara: TAutoIncField;
ADOQuery1Naim_tovara: TWideStringField;
ADOQuery1Cena_tovara: TIntegerField;
ADOQuery1Ed_izm: TWideStringField;
ADOQuery1Prim: TWideStringField;
Button4: TButton;
Button5: TButton;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
private
{ Private declarations }
Продолжение ПРИЛОЖЕНИЯ А
public
{ Public declarations }
end;

var
FSprav: TFSprav;

implementation

uses DM, Zakaz, Postav;

{$R *.dfm}

procedure TFSprav.Button2Click(Sender: TObject);
begin
FSprav.Close; //Закрыть форму
end;

procedure TFSprav.Button1Click(Sender: TObject);
begin
FSprav.Close; //Закрыть форму
end;

procedure TFSprav.Button3Click(Sender: TObject);
begin
FZakaz.Edit1.Text:=ADOQuery1Naim_tovara.Value; //Присваиваем Edit1 товара
FZakaz.Edit1.Tag:=ADOQuery1Kod_tovara.Value; //Запоминаем код товара
FSprav.Close;// Закрываем справочник Товары
FSprav.Button5.Visible:=false;// Делаем кнопку не активной
end;


procedure TFSprav.Button4Click(Sender: TObject);
begin
FPost.Edit1.Text:=ADOTable2Naimen.Value; //Присваиваем Edit1 поставщика
FPost.Edit1.Tag:=ADOTable2Id_postav.Value; //Запоминаем код поставщика
FSprav.Close;// Закрываем справочник Поставщиков
end;

procedure TFSprav.Button5Click(Sender: TObject);
begin
FPost.Edit2.Text:=ADOQuery1Naim_tovara.Value; //Присваиваем Edit1 товара
FPost.Edit2.Tag:=ADOQuery1Kod_tovara.Value; //Запоминаем код товара
FSprav.Close;// Закрываем справочник Товары
FSprav.Button3.Visible:=false;// Делаем кнопку не активной
end;

end.
unit Zakaz;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Mask, DBCtrls, DB, ADODB, ExtCtrls;
type
TFZakaz = class(TForm)
DataSource1: TDataSource;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
Продолжение ПРИЛОЖЕНИЯ А
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
DBEdit6: TDBEdit;
ADOQuery1: TADOQuery;
Button1: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Edit1: TEdit;
DBNavigator1: TDBNavigator;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
FZakaz: TFZakaz;

implementation

uses DM, Sprav;

{$R *.dfm}

procedure TFZakaz.Button1Click(Sender: TObject);
begin
FSprav:=TFSprav.Create(self); //Создаем форму
FSprav.Tag:=0; // Устанавливаем значение Tag, чтобыбыли доступны все кнопки
FSprav.ADOQuery1.Open;// Открываем набор данных
FSprav.Show;// Показываем окно
FSprav.Button5.Visible:=false;// Делаем кнопку не активной
end;

end. unit Postav;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB, Mask, DBCtrls, ExtCtrls;

type
TFPost = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Продолжение ПРИЛОЖЕНИЯ А
Label6: TLabel;
Label7: TLabel;
DataSource1: TDataSource;
ADOQuery1: TADOQuery;
Button1: TButton;
Button2: TButton;
Button3: TButton;
DBNavigator1: TDBNavigator;
procedure Button2Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
FPost: TFPost;

implementation

uses DM, Sprav;

{$R *.dfm}

procedure TFPost.Button2Click(Sender: TObject);
begin
FSprav:=TFSprav.Create(self); //Создаем форму
FSprav.Tag:=0; // Устанавливаем значение Tag, чтобыбыли доступны все кнопки
FSprav.ADOQuery1.Open;// Открываем набор данных
FSprav.Show;// Показываем окно
FSprav.Button3.Visible:=false;// Делаем кнопку не активной
end;

procedure TFPost.Button1Click(Sender: TObject);
begin
FSprav:=TFSprav.Create(self); //Создаем форму
FSprav.Tag:=0; // Устанавливаем значение Tag, чтобыбыли доступны все кнопки
FSprav.ADOTable2.Open;// Открываем набор данных
FSprav.Show;// Показываем окно
end;

procedure TFPost.Button3Click(Sender: TObject);
begin
FPost.Close;
end;

end.









2