Файл: Проектирование реализации операций бизнес-процесса «Складской учет» (Характеристика комплекса задач автоматизации).pdf

procedure TForm4.Button2Click(Sender: TObject);

begin

Form6.show;

end;

end.

Далее переходим к работе с FORM 1.

Из вкладки STANDART устанавливаем компонент LABEL и три кнопки BUTTON.

В свойствах CAPTION компоненту LABEL присваиваем имя «ПРИВЕТСТВУЕТ ООО АРТ ДОМ». Выбираем шрифт, цвет и размер.

В свойствах CAPTION компоненту BUTTON 1 присваиваем имя «Реализация по группам товаров». Двойным щелчком вызываем процедуру и прописываем код:

procedure TForm1.Button1Click(Sender: TObject);

begin

Form3.show;

end;

end.

В свойствах CAPTION компоненту BUTTON 2 присваиваем имя «Учет операций на складе». Двойным щелчком вызываем процедуру и прописываем код:

procedure TForm1.Button2Click(Sender: TObject);

begin

Form2.show;

end;

end.

В свойствах CAPTION компоненту BUTTON 3 присваиваем имя «Реализация итого». Двойным щелчком вызываем процедуру и прописываем код:

procedure TForm1.Button3Click(Sender: TObject);

begin

Form4.show;

end;

end.

В итоге получается следующее:

Рисунок – Вид FORM 1

Компилируем программу.

Рисунок 42 – Окно приветствия

Нажимая «Учет операций на складе» попадаем в окно:

Рисунок 43– Учет операций на складе

Нажимая на «Реализацию по группам товаров» попадаем в окно:

Рисунок 44– Реализация по группам товаров

Отсюда можно вывести графический отчет:

Рисунок 45– Графический отчет «Реализация по группам товаров»

Нажимая «Реализация итого» попадаем в окно:

Рисунок 46– Реализация итого

Отсюда можно вывести графический отчет:

Рисунок 47 – Графический отчет «Реализация итого»

Таким образом, в заключении можно сделать следующие выводы:

В данной работе было разработано для предприятия ООО АРТ ДОМ программное обеспечение в среде программирования DELPHI 7, которая позволит автоматизировать и усовершенствовать работу склада на данном предприятии.

Созданное программное обеспечение дает предприятию ООО АРТ ДОМ следующие возможности.

- осуществлять удобный вход в программу и выбирать требуемое действие.

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

- также можно анализировать процесс учета товаров на складе.

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

ЗАКЛЮЧЕНИЕ

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

В первой главе данной работы были определены комплекс задач автоматизации складского учета, а также был проанализирован бизнес – процесс «Складской учет». Также был рассмотрен порядок документооборота на предприятии ООО «АРТ ДОМ», выявлены основные недостатки существующего бизнес –процесса на анализируемом предприятии.

Вторая глава носит проектный характер, где представлена в виде блок-схемы модель, на основе которой будет спроектирована реализация операций бизнес – процесса «Складской учет» для предприятия ООО «АРТ ДОМ», были рассмотрены все виды информации, которые используются при реализации бизнес – процесса «Складской учет» на предприятии ООО «АРТ ДОМ».

В данной работе было разработано для предприятия ООО АРТ ДОМ программное обеспечение в среде программирования DELPHI 7, которая позволит автоматизировать и усовершенствовать работу склада на данном предприятии.

Созданное программное обеспечение дает предприятию ООО АРТ ДОМ следующие возможности.

- осуществлять удобный вход в программу и выбирать требуемое действие.

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

- также можно анализировать процесс учета товаров на складе.

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

СПИСОК ЛИТЕРАТУРЫ

1. Осипов Д. Л. Базы данных и Delphi. Теория и практика. — СПб.: БХВ-Петербург, 2011. - 752 с.
2. Лекция 5: Модели организации баз данных [онлайн] - URL: http://www.intuit.ru/studies/courses/3439/681/lecture/14023 (дата обращения 11.10.2016)
3. Реляционная база данных [онлайн] - URL: http://base.mybloge.net/relyacionnaya-baza-dannyx/ (дата обращения 01.11.2016)
4. Введение в базы данных. Часть 2. Настольные СУБД // А.Федоров, Н. Елманова [онлайн] - URL: http://compress.ru/article.aspx?id=10282 (дата обращения 01.11.2016)).
5. Глушаков С.В., Клевцов А.Л. «Программирование в среде Delphi 7.0». 2003г. с.528.
6. Обзор языков программирования и средств разработки на их основе [онлайн] - URL: http://bukvi.ru/computer/obzor-yazykov-programmirovaniya-i-sredstv-razrabotki-na-ix-osnove.html (дата обращения 11.05.2018)
7. Преимущества и особенности Delphi [онлайн] - URL: http://starik2222.narod.ru/trpp/lec/11.htm (дата обращения 11.05.2018)
8. Преимущества Delphi и напутствие начинающему программисту [онлайн] - URL: http://pisali.ru/raferti/41237/ (дата обращения 11.05.2018)
9. Фленов М.Е. «Библия Delphi». 2012г. с.880 (3-е издание).

ПРИЛОЖЕНИЕ 1

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Label1: TLabel;

Button1: TButton;

Button2: TButton;

Button3: TButton;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit3, Unit2, Unit4;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

Form3.show;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Form2.show;

end;

procedure TForm1.Button3Click(Sender: TObject);

begin

Form4.show;

end;

end.

unit Unit2;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, DB, ADODB, Grids, DBGrids, ExtCtrls, DBCtrls;

type

TForm2 = class(TForm)

DataSource1: TDataSource;

DBNavigator1: TDBNavigator;

DBGrid1: TDBGrid;

ADOConnection1: TADOConnection;

ADOTable1: TADOTable;

Button1: TButton;

Label1: TLabel;

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);

begin

close;

end;

end.

unit Unit3;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, DB, ADODB, ExtCtrls, DBCtrls, Grids, DBGrids;

type

TForm3 = class(TForm)

DataSource1: TDataSource;

DBGrid1: TDBGrid;

DBNavigator1: TDBNavigator;

ADOConnection1: TADOConnection;

ADOTable1: TADOTable;

Button1: TButton;

Button2: TButton;

Label1: TLabel;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form3: TForm3;

implementation

uses Unit5;

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);