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

Характеристика принципов автоматизированного рабочего места. Определение структурной схемы и программного обеспечения. Обоснования создания информационной системы "Компьютерная фирм". Особенность выявления основных задач возложенных на базу данных.

Рубрика Программирование, компьютеры и кибернетика
Вид дипломная работа
Язык русский
Дата добавления 01.10.2015
Размер файла 1,6 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Следующим пунктом меню является Справочники: Подразделения, Склад, Контрагенты, Вид деятельности, Счет, Комплектующие и Номенклатура.

Подразделения - имеет вид:

Рисунок 7. Форма Подразделения

При загрузки данной формы выполняется следующая процедура:

procedure TForm11.FormShow(Sender: TObject);

begin

DM.ADOQuery4.Close;

DM.ADOQuery4.SQL.Clear;

DM.ADOQuery4.SQL.Add('select * from SPodraz');

DM.ADOQuery4.Open;

end;

Данная процедура обновляет запрос к базе данных. При помощи навигатора можно добавлять, редактировать и удалять записи из справочника.

Остальные справочники представлены в приложении А.

Следующий пункт меню Операции: Реализация товара, Списания товара.

Реализация товара - открывает следующую форму:

Рисунок 8. Форма Реализация товара

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

procedure TForm27.sButton1Click(Sender: TObject);

var k,s,sbn,ssn:integer; S0:string;

begin

if (sEdit1.Text='') or (sEdit2.Text='') or (sEdit3.Text='') or (sEdit4.Text='') or (sEdit5.Text='') or (sComboBox1.Text='') or (sComboBox2.Text='') or (sComboBox3.Text='') or (sComboBox4.Text='') or (sComboBox5.Text='') or (sDateEdit1.Date=0) then ShowMessage('Заполните пустые поля') else begin

DM.ADOQuery10.Close;

DM.ADOQuery10.SQL.Clear;

DM.ADOQuery10.SQL.Add('select * from Sklad');

DM.ADOQuery10.SQL.Add('where Name="'+sComboBox5.Text+'" and Sklad="'+sComboBox3.Text+'" and Profit="'+sEdit5.Text+'"');

DM.ADOQuery10.Open;

if DM.ADOQuery10.RecordCount=1 then begin

k:=strtoint(DM.ADOQuery10.FieldValues['Koll'])-strtoint(sEdit1.Text);

s:=strtoint(DM.ADOQuery10.FieldValues['Sebest'])-strtoint(sEdit2.Text);

sbn:=strtoint(DM.ADOQuery10.FieldValues['SummaBN'])-strtoint(sEdit3.Text);

ssn:=strtoint(DM.ADOQuery10.FieldValues['SummaSN'])-strtoint(sEdit4.Text);

if k>=0 then begin DM.ADOQuery10.Edit;

DM.ADOQuery10.FieldValues['Koll']:=inttostr(k);

DM.ADOQuery10.FieldValues['Sebest']:=inttostr(s);

DM.ADOQuery10.FieldValues['SummaBN']:=inttostr(sbn);

DM.ADOQuery10.FieldValues['SummaSN']:=inttostr(ssn);

DM.ADOQuery10.Post;

DM.ADOQuery12.Close;

DM.ADOQuery12.SQL.Clear;

DM.ADOQuery12.SQL.Add('select * from Realiz');

DM.ADOQuery12.Open;

DM.ADOQuery12.Append;

S0:=inttostr(PDJXPEditDate1.Month)+'.'+inttostr(PDJXPEditDate1.Year);

DM.ADOQuery12.FieldValues['Data0']:=S0;

DM.ADOQuery12.FieldValues['Podraz']:=sComboBox1.Text;

DM.ADOQuery12.FieldValues['VidD']:=sComboBox2.Text;

DM.ADOQuery12.FieldValues['Sklad']:=sComboBox3.Text;

DM.ADOQuery12.FieldValues['Nomen']:=sComboBox4.Text;

DM.ADOQuery12.FieldValues['Name']:=sComboBox5.Text;

DM.ADOQuery12.FieldValues['Koll']:=sEdit1.Text;

DM.ADOQuery12.FieldValues['Sebest']:=sEdit2.Text;

DM.ADOQuery12.FieldValues['SummaBN']:=sEdit3.Text;

DM.ADOQuery12.FieldValues['SummaSN']:=sEdit4.Text;

DM.ADOQuery12.FieldValues['Profit']:=sEdit5.Text;

DM.ADOQuery12.FieldValues['Data']:=datetostr(sDateEdit1.Date);

DM.ADOQuery12.Post;

ShowMessage('Товар реализован в количестве '+sEdit1.Text+' шт');

End else

ShowMessage('Количество товара недостаточно для реализации');

End else ShowMessage('Товар нет на складе'); end;

end;

Данная процедура позволяет реализовать товар со склада.

При выборе списка выполняется следующая процедура:

procedure TForm27.sComboBox1Enter(Sender: TObject);

var i,ItemWidth:Integer;

begin

sComboBox1.Clear;

DM.ADOQuery6.Close;

DM.ADOQuery6.SQL.Clear;

DM.ADOQuery6.SQL.Add('select * from SPodraz');

DM.ADOQuery6.Open;

DM.ADOQuery6.First;

while not DM.ADOQuery6.Eof do begin

sComboBox1.Items.Add(DM.ADOQuery6.FieldValues['Name']);

DM.ADOQuery6.Next;

end;

ItemWidth := 0;

with sCombobox1 do begin

for i := 0 to Items.Count - 1 do

if (Form27.Canvas.TextWidth(Items[i]) <> ItemWidth) then

ItemWidth := Form27.Canvas.TextWidth((Items[i])) + 20;

Perform(CB_SETDROPPEDWIDTH, ItemWidth, 0);

end;

end;

Данная процедура выполняет запрос к таблице и заполняет список.

Форма Списания товара похожа на предыдущую формы. Она изображена в приложении А.

Предпоследний пункт меню Отчеты: Материальный отчет, Прайс, Отчет о реализации. Материальный отчет - открывает соответствующую форму:

Рисунок 9. Форма Материальный отчет

На данной форме находятся кнопки Выход и Сформировать. Кнопка сформировать выполняет следующую процедуру:

procedure TForm14.sButton1Click(Sender: TObject);

var Sheet,Colum:Variant; i,i1:integer; S,SS,SS1:string;

begin

SS:=sComboBox4.Text+'.'+sComboBox5.Text;

DM.ADOQuery13.Close;

DM.ADOQuery13.SQL.Clear;

DM.ADOQuery13.SQL.Add('select * from Nomenklatur');

DM.ADOQuery13.SQL.Add('where Sthet="'+sComboBox1.Text+'" and Sklad="'+sComboBox2.Text+'" and Nom="'+sComboBox3.Text+'" and Data0="'+SS+'"');

DM.ADOQuery13.Open;

if DM.ADOQuery13.RecordCount<>0 then begin

S:=ExtractFilepath(Application.ExeName); S:=S+'data\1.xlt';

ExcelApplication1.Connect;

ExcelApplication1.Workbooks.Add(S,-4167);

ExcelWorkbook1.ConnectTo(ExcelApplication1.ActiveWorkbook);

Sheet:=ExcelApplication1.Workbooks[1].WorkSheets['Лист1'];

i:=7; i1:=1;

Sheet.Cells[3,1]:='Месяц: '+sComboBox4.Text+'; Год: '+sComboBox5.Text+';';

Sheet.Cells[2,1]:='По счету: '+sComboBox1.Text+', Склад: '+sComboBox2.Text+', Номенклатура: '+sComboBox3.Text;

repeat

Sheet.Cells[i,1]:=i1;

Sheet.Cells[i,2]:=DM.ADOQuery13.FieldValues['Name'];

Sheet.Cells[i,3]:=DM.ADOQuery13.FieldValues['Nambor'];

Sheet.Cells[i,4]:=DM.ADOQuery13.FieldValues['EdIsmer'];

Sheet.Cells[i,5]:=DM.ADOQuery13.FieldValues['ONPUthCena'];

inc(i); inc(i1); DM.ADOQuery13.Next;

until DM.ADOQuery13.Eof;

ExcelApplication1.Visible[-4167]:=True;

end;end;

Данная процедура создает таблицу в Excel и заполняет ее данными из базы.

Последний пункт меню Справка.

Справка позволяет открыть О программе в, которой находится информация о среде разработки и о программе в целом, и Помощь - открывает вордовский документ, который содержит руководство пользователя.

Форма О программе имеет вид:

Рисунок 10. Форма О программе

При разработки своей программы я в основном использовал для запросов язык SQL, для соблюдения условий и осуществления алгоритма язык Delphi 7.

2.5 Руководство пользователя

Программа рассчитана для пользователя не имеющего представление о работе с базами данных.

При загрузки, программы появляется форма Авторизация, при помощи которой пользователь может защитить данные базы данных. После ввода правильного пароля открывается главная форма, представленная выше. В ней можно при помощи меню Файл выйти из программы, редактировать пароль и логин пользователя, а также при помощи меню справка получить информацию о программы, а при помощи меню Отчеты распечатать необходимые отчеты. Также при помощи меню Правка, Просмотр и Справочники можно редактировать базу данных.

Меню Файл содержит 2 подменю Выход, Авторизация:

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

Меню Правка содержит 6 подменю: Прайс, Номенклатура, Персонал, Склад, Реализованный товар, Списанный товар:

· Прайс - он открывает форму Прайс, представленную выше. На данной форме находятся 7 кнопок: Добавить, Удалить, Редактировать, Обновить, Сохранить, Отмена и Выход.

При выборе кнопки Добавить Таблица переходит в режим добавления записи. Кнопкой Удалить можно удалить запись. При выборе кнопки Выход можно, закрыть форму. Кнопка Редактировать переводит таблицу в режим редактирования. Кнопка Сохранить - сохраняет запись в базу данных. Навигатор позволяет переходить по записям.

Остальные формы похожи и описывать их нет смысла.

Следующий пункт меню Просмотр: Прайс, Номенклатура, Персонал, Склад, Реализованный товар, Списанный товар.

· Прайс - он открывает форму Прайс, представленную выше. На данной форме находятся 2 кнопки: Поиск и Обновить. Кнопкой Поиск открывает форму поиска представленную выше. Кнопка Обновить позволяет обновить запрос к базе. Навигатор позволяет переходить по записям.

Остальные формы похожи и описывать их нет смысла.

Следующий пункт меню Справочники: Подразделения, Склад, Контрагенты, Вид деятельности, Счет, Комплектующие и Номенклатура.

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

Остальные формы похожи и описывать их нет смысла.

Следующий пункт меню Операции: Реализация товара, Списания товара.

· Реализация товара - он открывает форму Реализация товара, представленную выше. На данной форме находится 2 кнопки, который позволяют реализовать товар и закрыть форму.

Форма Списания товара похожа на предыдущую.

Следующий пункт меню Отчеты позволяет открыть отчеты по определенному критерию.

Меню Справка имеет два компонента О программе и Помощь. Эти формы содержат вспомогательную информацию о программе.

Удачного использования.

Предупреждение: без базы данных невозможна дальнейшая работа.

Ниже приведены основные окна для работы с программой (рисунок 11- 25)

Рисунок 11. Форма Персонал.

Рисунок 12. Форма Прайс.

Рисунок 13. Форма Склад.

Рисунок 14. Форма Списанный товар.

Рисунок 15. Форма Реализованный товар.

Рисунок 16. Форма Прайс.

Рисунок 17. Форма Персонал.

Рисунок 18. Форма Склад.

Рисунок 19. Форма Реализованный товар.

Рисунок 20. Форма Списанный товар.

Рисунок 21. Форма Списания товара.

Рисунок 22. Форма Склад.

Рисунок 23. Форма Номенклатура.

Рисунок 24. Форма Контрагенты.

Рисунок 25. Форма Комплектующие.

Рисунок 26. Форма Отчет по реализации.

Заключение

Данная дипломная работа посвящена разработке автоматизированного рабочего места для компьютерной фирмы.

В процессе разработки данной дипломной работы были получены следующие результаты:

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

Для данной структуры базы данных, разработаны структура и функциональные модули АРМ, получен интерфейс пользователя, позволяющие пользователю работать с базой данных.

Из выше описанного следует, что задачи поставленные перед данной работой выполнены в полной мере.

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

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

Использование мощных средств Delphi 7 по созданию приложений работающих в операционной системе Windows и в частности приложений баз данных, позволило создать программный продукт максимально ориентированный на конечного пользователя, который не искушен в вопросах теории баз данных. Вся необходимая работа по осуществлению методов доступа к информации хранимой в базе данных, её модификации, поддержании базы данных в целостном виде скрыта внутри и пользователю нет как учебное, но при незначительных доработках, может быть внедрена на практике и эффективно выполнять поставленные задачи.

Список использованной литературы

1. Когаловский М.Р., "Технология баз данных на персональных ЭВМ",

2. А.H. Hаумов, А.М. Вендров и др., "Системы управления базами данных и знаний", М.: Финансы и статистика, 1991г.

3. Аппак М.А., "Автоматизированные рабочие места на основе персональных ЭВМ", М.: 'Радио и связь', 1989 г.

4. Шумаков П. В. “Delphi 3.0 и создание баз данных”. Москва 1997г.

5. Дж. Мартин., "Организация баз данных в вычислительных системах" М: Мир 1978г.

6. С.М.Диго "Проектирование и использования баз данных". Москва: Финансы и статистика 1995.

7. A.M.Епанешников., "Программирование в среде Delphi 2.0"

8. А.Я.Архангельский «Delphi 6».-Москва 2002г.

9. Баженова И.Ю. «Delphi 7».- Москва 2002г.

10. Бобровский С.Н. «Delphi 7». - Москва 2003г.

11. Бурлак Т.Н. «Безопасность работы на компьютере». Москва. Финансы и статистика 1998г.

12. В. Герман, А. Хомоненко «Delphi 7». БХВ - Санкт - Петербург, 2001г.

13. С.В. Глушаков, Д.В. Ломотько «Базы данных». Москва, ООО «Издательства АСТ» 2002г.

14. В.В. Фаронов «Delphi 7». Нолидж, 2001г.

15. А.Д. Хомоненко, В.М.Цыганков, М.Г. Мальцев «Бызы данных». Москва 2004г.

16. Автоматизированные информационные технологии в экономике: Уч./ Под ред. проф. Г.А. Титоренко. - М.: Компьютер, ЮНИТИ, 2008. - 400 с.

17. Бойко В.В., Савинков В.М. «Проектирование информационной базы автоматизированной системы на основе СУБД». М.: Финансы и статистика, 2002.

18. Проектирование информационной базы автоматизированной системы на основе СУБД/ Бойко В.В., Савинков В.М., Финансы и статистика, 2002.

19. Базы данных: Учеб. пособие для вузов.-Мн. Университетское, 2007.-271с.

20. Базы данных: Учебник для высших учебных заведений/ Хомоненко А.Д., Цыганков В.М., Мальцев М.Г./Под ред. проф. А.Д.Хомоненко.-4-е изд., доп. и перераб.-СПб.: Корона принт, 2008.-736с.

21. Учебное пособие «Модели и проектирование баз данных», В.Д. Сибилев, Томск, 2002.

22. Крис Дейт. Введение в базы данных, 6-е изд. Киев, Диалектика, 2008

23. Василий Корняков Программирование документов и приложений MS Office в Delphi, 2005.

24. Учебное пособие «Теория систем и системный анализ», С.Н. Павлов, Томск: Томский межвузовский центр дистанционного образования, 2003, 134 с.

25. Учебное методическое пособие «Теория систем и системный анализ», Томск: Томский межвузовский центр дистанционного образования, 2003, 34 с.

26. «Бизнес-процессы, основные стандарты их описания», С.М. Ковалев, журнал «Справочник экономиста» №11'2009.

27. «Особенности автоматизации конструкторского и технологического проектирования в мебельном производстве», Павел Бунаков, журнал «САПР и графика» №7'2007.

28. Занимательное программирование: Delphi: Книга для детей, родителей и учителей./ Симонович С.В., Евсеев Г.А.,- М.: АСТ-ПРЕСС КНИГА: Инфорком-Пресс, 2005. - 368с.

29. Программирование документов и приложений MS Office в Delphi / Василий Корняков, 2005.

30. Петр Дарахвелидзе, Евгений Марков Программирование в Delphi7, 2009

31. Программирование в Delphi7/ Дарахвелидзе П., Марков Е.СПб.: BHV-Петербург, 2003.

32. Программирование и отладка в Delphi./ Митчелл К. Керман, Пер. с англ. - М.: Издательский дом «Вильямс», 2008, 672с.: ил.

33. Delphi - Руководство разработчика./ Марко Кэнту, - М.: ДЭСС, 1999. - 752с., ил.

34. Delphi 5. Руководство программиста./ Фаронов В.В., - М.: «Нолидж», 2001. - 880с., ил.

35. Delphi 6. Учебный курс./ Фаронов В.В.,- М.: Издатель Молгачева С.В., 2001. - 672с., ил.

36. Delphi 7/ Хомоненко А.Д. и др., /Под общ. ред. А.Д. Хомоненко. - СПб.: БХВ-Петербург, 2008. - 1216с.: ил.

37. Delphi 2006 на примерах/ Шупрута В.В.-СПб.:БХВ-Петербург, 2006.-528с.

38. Харитонова Ирина, Самоучитель Access 2000, Питер, 2010.

39. Пасько В. Microsoft Access 2000 (русифицированная версия). - К.: Издательская группа BHV, 2009 - 384 с.

40. Самоучитель Microsoft Access / Бекаревич Ю., Пушкина Н. СПб.: БХВ-Санкт-Петербург, 2009

41. Эффективная работа с Microsoft Access 97/ Вейскас Д. -Спб: Питер Ком, 1999-976с:ил

42. Microsoft Access 2000/ Михеева В., Харитонова И.СПб.: БХВ-Санкт-Петербург, 2000.

43. Microsoft Access 2000 (русифицированная версия)/ Пасько В., К.: Издательская группа BHV, 1999 - 384 с.

44. SQL для “чайников” 4-е издание /Тейлор Ален,Г.: Пер. с англ.-М.: Издательский дом “Вильямс”, 2001-368с.:ил.

45. Майкл Штепнер, Теория построения баз данных. «Ирина», Киев 2008. - 545 с.

46. Зеленоградский А.Я. Базы данных. Справочное пособие. «Издательство Бином», 2001. - 768 с.

47. Кириллов В.В. Структуризованный язык запросов (SQL). - СПб.: ИТМО, 2004. - 80 с.

48. Немнюгин С. А. Объектно-ориентированное программирование - М.: Питер, 2010.

49. Мартин Груббер. Понимание SQL. - Москва, 1993 - 290с.

50. Т.А. Ильина. Программирование на Delphi 6 - М.: Питер, 2000.

51. В. В. Фаронов. Система программирования Delphi. - СПб.: БХВ-Петербург, 2003. - 912 с.: ил.

52. Сапронов В.В., Тихий П.В. Руководство по языкам программирования.- М. Нолидж, 2000.640с.

53. Лемех А.С. Автоматизированные рабочие станции - М. Нолидж, 2000.-740 с.

54. Хеслоп Б., Бадник Л. Delphi с самого начала. Санкт-Петербург: Питер, 2007г.

55. Баженова И.Ю. Язык программирования Delphi - М.: Диалог-МИФИ, 2007 -288с.

56. Ремизов Н. Справочник Delphi - М.: Питер, 2006.

57. Гаевский А. Разработка программных приложений на Delphi 6 - М.: Киев, 2009.

58. Змитрович А.И. Базы данных. Учебное пособие для вузов. - Мн. - Университетское, 2007. - 271с.

Размещено на Allbest.ru

...

Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.