Преподаватель который помогает студентам и школьникам в учёбе.

Проектирование реализации операций бизнес-процесса (обоснование проектных решений по программному обеспечению)

Содержание:

Введение

В условиях динамичного развития рыночных отношений стратегическим направлением совершенствования деятельности предприятия является внедрение политики управления качеством, построенной по принципу непрерывных улучшений и оптимизации всей системы в целом.

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

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

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

Целью курсовой работы является разработка и проектирование автоматизированного рабочего места менеджера по работе с клиентами для повышения эффективности учета продаж.

В качестве объекта исследования в курсовой работе выступают «Информационные системы», а предметом исследования – автоматизированное рабочее место менеджера по работе с клиентами.

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

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

В первой главе рассмотрены основные этапы проектирования ИС: исследование предметной области, выделены основные бизнес-процессы, сформулированы требования к проектируемой информационной системе.

Во второй главе рассмотрены после обоснования необходимости автоматизации определена общая архитектура системы и концепция содержимого базы данных. Далее проведено моделирование системы в программе AllFusion Process Modeler (BPWin). При построении даталогической модели база данных была нормализована, то есть в ней отсутствуют связи «многие-ко-многим».

Также в данной главе выполнено описание разработки базы данных «СТЕКЛОТЕКС.mdb», описывается создание кнопочной формы в Delphi 7, которая определяет интерфейс работы с системой, выполнен расчет экономической эффективности проектирования и автоматизированного рабочего места менеджера по работе с клиентами.

1 глава. Аналитическая часть

1.1. Выбор комплекса задач автоматизации

ООО «СТЕКЛОТЕКС» работает на рынке лабораторного оборудования с 2012 г.

Основное направление деятельности - продажа лабораторного оборудования.

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

Сотрудники компании гарантируют выполнение всех заказов в указанные сроки и надлежащего качества.

Организационная структура ООО «СТЕКЛОТЕКС» линейная (рис. 1).

Рисунок 1. Организационная структура ООО «СТЕКЛОТЕКС»

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

Фактически, невозможно выявить лояльных клиентов, соответственно невозможно мотивировать их к повторному заказу услуг у компании «СТЕКЛОТЕКС» путем поощрения дисконтной картой и другими способами маркетингового воздействия.

В компании «СТЕКЛОТЕКС» контакты текущих клиентов также не систематизированы. Данные фиксируются урывками. Такой порядок работы отнимает время и силы менеджера на нахождение нужного контакта и его хранение.

Анкетные данные клиентов фиксируются не систематизированно. Соответственно выявление целевой аудитории работы компании затруднено и следовательно неверно скорректированная стратегия приносит компании «СТЕКЛОТЕКС» убытки. Поэтому в компании остро стоит вопрос о создании такой системы клиентской поддержки, которая позволит избавиться от указанных недостатков и повысит эффективность работы компании с клиентами и в целом.

Основные преимущества автоматизации рассматриваемого бизнес-процесса:

централизованное хранение данных;
исключение потерь данных;
систематизация данных;
быстрая обработка данных;
выдача результатов в наглядном виде на печать и экран;
автоматизация оформления отчетов. [5]

1.2. Характеристика существующих бизнес–процессов

Существующие бизнес-процессы компании «СТЕКЛОТЕКС» вытекают из набора деловых связей, имеющихся в организационной структуре организации.

Бизнес-процессы, существующие в организации, можно разделить на четыре группы, каждая из которых обладает особенностями [3]:

Основные бизнес-процессы – оказывают непосредственное влияние на формирование доходов организации;
Обеспечивающие бизнес-процессы – обеспечивают выполнение основных процессов,
Бизнес-процессы управления – обеспечивают управление организацией,
Бизнес-процессы развития – обеспечивают развитие организации.

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

1. Менеджер отдела продаж каждый день оформляет заявки клиентов на покупку лабораторного оборудования согласно прайс-листу. Он регистрирует заявки в журнале заявок.

2. После оформления заявки менеджер отдела продаж выписывает счёт клиенту и регистрирует его в реестре счетов.

3. Бухгалтер получает и обрабатывает приходные кассовые ордера, а также выписки банка, которые содержат сведения о поступлении денежных средств в кассу или на расчётный счёт компании. На основании этих документов бухгалтер делает отметки об оплате счета в реестре счетов.

4. Менеджер отдела продаж контролирует поступление платежей от клиентов. Если срок оплаты истёк, а платежи не поступили, то менеджер отмечает недействительность заявки в журнале заявок.

5 Менеджер отправляет счёта о покупке продавцу-консультанту.

6. Продавец-консультант выписывает товарную накладную на оплаченный товар на основании счета, после этого проверяет товар на качество и комплектацию, заполняет гарантийный талон на товар и выдает товар покупателю.

7. В конце каждого месяца на основании журнала заявок менеджером отдела продаж формируется сводка о количестве поступивших заявок на каждую модель лабораторного оборудования.

На рис. 2 представлена контекстная диаграмма бизнес-процесса «Продажа лабораторного оборудования»

Рисунок 2. Контекстная диаграмма модели IDEF0 бизнес-процесса «Продажа лабораторного оборудования»

На рисунке 3 представлен результат декомпозиции контекстной диаграммы, который также выполнен в методологии IDEF0 [1].

Рисунок 3. Диаграмма декомпозиции первого уровня детализации контекстной диаграммы

Рисунок 4. Диаграмма декомпозиции второго уровня детализации

1.3. Характеристика документооборота, возникающего при решении задачи учета продаж

Таким образом для ООО «СТЕКЛОТЕКС» необходима информационная система, которая могла бы решить следующие задачи:

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

Информационная система помогает вести:

Учёт поставщиков
Учет клиентов
Учет товаров
Учет поставок
Учёт продаж
Анализ доходов от реализации товаров

Экономическая сущность задачи «Учёт поставщиков» сводится к следующему: менеджер по работе с поставщиками получает заказ от компании и формирует карточку поставщика – первичные данные о поставщике. В карточке указываются код поставщика, наименование, адрес, РНН, Счет, Ставка НДС, Скидка.

Экономическая сущность задачи «Учёт клиентов» сводится к следующему: менеджер по работе с клиентами получает заказ отклиента и формирует карточку клиента – первичные данные о клиенте. В карточке указываются код клиента, ФИО/наименование, адрес, телефон, Счет.

Экономическая сущность задачи «Учёт товаров» сводится к следующему: менеджер по продажам дополняет прайс-лист новыми товарами, следит за изменением цены. В прайс-листе указываются код товара, наименования товара, его цена, наличие на складе.

Экономическая сущность задачи «Учет поставок» сводится к следующему: менеджер по работе с поставщиками формирует ведомость поставок. В ведомости указываются наименование поставщика, номер накладной, дата поставки, шифр товара, количество, стоимость, сумма НДС, сумма скидки.

Экономическая сущность задачи «Учёт продаж» сводится к следующему: исходя из составленной ведомости заказов менеджером по работе с клиентами формируется таблица выполнения заказов на продажу. В нем указываются № чека, в котором реализован товар, Шифр товара, Количество реализованного товара, Дата реализации товара, Общая стоимость реализованного товара, Клиент.

Экономическая сущность задачи «Анализ доходов от продаж» заключается в том, что менеджер по учету продаж, исходя из информации о выполнененных заказах, формирует запросы и отчеты.

Информационная система получает информацию от поставщиков, работников компании.

При поступлении заявки от поставщика открывается электронная форма Поставщики. Если необходимые данные не содержатся в базе, то данные заносятся в базу данных.

Если поставщик новый, то на него заводится карта поставщика с информацией, которая заносится в базу данных.

В связи с вышеизложенным был сделан вывод о необходимости в разработке приложения, которое отвечает за авторизацию поставщиков, быстрый поиск и сохранение достоверности информации.

Эта программа отвечает за фиксацию операций по поставкам и продажам товаров ООО «СТЕКЛОТЕКС», цель и назначение которой - повысить производительность, сократить время обслуживания и затраты.

1.4. Обоснование проектных решений по информационному обеспечению необходимо выполнить

Программа предназначена для решения задач автоматизированной обработки информации:

1) хранение данных о товарах;

2) вывод в удобной форме данных по запросам пользователя;

2) автоматизация обработки информации при различных бизнес-операциях;

4) вывод данных на печать;

Таблица 1

Документы бизнес-процесса «Продажа лабораторного оборудования»

Составляе-мый документ	Операция	Исполнитель	Периодич-ность	Документ-основание
Заявка	Оформление заявки	Менеджер отдела продаж	Каждый день	Прайс-лист
Журнал заявок	Регистрация заявки; Отметка об оплате или недействитель-ности заявки	Менеджер отдела продаж; Менеджер отдела продаж	Каждый день Каждый день	Заявка; Реестр счетов
Счет	Выставление счета	Менеджер отдела продаж	Каждый день	Заявка
Реестр счетов	Регистрация счета; Формирование отметки об оплате	Менеджер отдела продаж; Бухгалтер	Каждый день Каждый день	Счет; Приходный кассовый ордер и выписка банка
Товарная накладная	Оформление товарной нак-ладной на оплач. товар	Продавец консультант	Каждый день	Счет
Гарантийный талон	Выдача товара	Продавец консультант	Каждый день
Сводка о количестве заявок	Формирование сводки о количестве заявок	Менеджер отдела продаж	Каждый месяц	Журнал заявок

После изучения бизнес-процессов было определено, что оформление заказов и составление отчетов не автоматизированы. Нет базы клиентов. Полного учета и контроля нет.

Основным документом в рассматриваемой задаче является заказ клиента и Данные о клиенте. Схема документооборота обработки заказов приведена на диаграмме потоков данных (Рисунок 5).

Рисунок 5. Диаграмма декомпозиции модели DFD первого уровня детализации контекстной диаграммы

Рисунок 6. Диаграмма декомпозиции второго уровня детализации

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

поиск данных о заданном товаре по его номенклатурному номеру;
выборка всех данных о товарах с сортировкой по партии товара;
формирование заявки на поставку товара;
расчет суммарной стоимости товаров, отпущенных за текущий день;
расчет суммарной стоимости товаров, проданных покупателю;
выписка счета покупателю;
формирование прайс-листа;
выводить документы на печать: прайс-лист, отчеты.

Для выполнения задания необходимо разработать программу «учет продаж лабораторного оборудования».

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

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

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

1.5. Обоснование проектных решений по программному обеспечению

Для достижения наилучшего результата в работе с ИС с точки зрения наглядности, удобства пользователя и производительности рекомендуется использовать Windows 7.

Выделим основные причины выбора операционной системы Windows 7:

одна из самых распространенных на сегодняшний день операционных систем;
работоспособность приложения на ПК под управлением Windows 7 была подтверждена множеством тестов;
Windows 7 имеет стоимость, намного меньшую, чем аналогичные ОС.

Для расширения возможностей операционной системы рекомендуется регулярно выполнять обновление. Установка последних пакетов обновления ОС (Service Pack) позволяет сделать работу пользователя с автоматизированной системой более удобной, наглядной (с точки зрения графического интерфейса) и безопаснее. В качестве средств, расширяющих возможности операционной системы, также могут выступать различные утилиты, драйвера, которые зачастую представляют собой набор DLL-файлов.

В таблице 2 представлены сравнительные характеристики наиболее популярных ОС.

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

Таблица 2

Сравнительные характеристики ОС

ОС	Windows 7	Vista	Linux
Процессор	500 МГц	1 Гц	40-133 МГц
Память	1 Гб	1 Гб	4-32 Мб
Свободное пространство на жестком диске	5 Гб	15 Гб	80 Мб – 1 Гб
Интерфейс	Визуальные эффекты не перегружают интерфейс	Перегруженный интерфейс	Возможность использования нескольких виртуальных рабочих столов
ПО	Наличие ПО с минимальными функциональными возможностями	Включены улучшенные версии ПО (по сравнению с XP)	Доступ к тысячам бесплатных приложений
Стоимость	2550 руб. – 4990 руб.	3990 руб.	Бесплатно
Производительность	Прекрасно работает на не слишком быстрых процессорах и небольшом объеме оперативной памяти	Требует больше оперативной памяти и места на диске, но работает медленнее Windows 7	Существуют специальные дистрибутивы Linux, которые обеспечат приемлемый уровень работы даже на очень старых компьютерах.
Производительность		Высокие системные требования

В процессе создания каталога необходимо изучить наиболее часто применяющиеся классификаторы. Нет необходимости использовать классификаторы, которые не понятны работникам.

Было принято решение совмещать стандартные классификации с общепринятыми классификациями.

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

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

Главными функциями такой системы служат:

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

СУБД можно разделить на два основных класса в зависимости от назначения (рисунок 7).

Рисунок 7. Основные классы СУБД

Основные характеристики систем управления базами данных представлены на рисунке 8 [5].

Рисунок 8. Основные характеристики СУБД

Для оценки производительности СУБД используются следующие критерии (рисунок 9).

Рисунок 9. Критерии оценки производительности СУБД

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

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

Целостность должна обеспечиваться независимо от способа заполнения данных в память.

Операции по обеспечению безопасности данных представлены на рисунке 10 [16].

Рисунок 10. Операции по обеспечению безопасности

Язык запросов SQL используется для большинства популярных СУБД применительно как базовый, так и альтернативный. SQL, в связи со своими широкими возможностями, в последнее время стал являться международным стандартом в области языков запросов.

Основываясь на вышесказанном, выбираем СУБД MS Access.

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

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

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

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

Часть, которая непосредственно связана с программированием интерфейса пользователя, называется системой визуального программирования.

Размещение объектов в Delphi происходит в тесной взаимосвязи между объектами и реальным программным кодом. Объекты помещают в форму, код которой и соответствующих объектов автоматически сохраняются в исходном файле. Этот код компилируется, обеспечивая существенно более высокую производительность, чем визуальная среда, которая интерпретирует информацию лишь в ходе выполнения программы.

Программа DELPHI состоит из файла проекта (файл с расширением DPR) и несколько модулей (файлы с расширением PAS). Каждый из файлов расположен в отдельном модуле программы содержит программу на языке Object Pascal.

Самый популярный и широко используемый компонент в модуле DELPHI - форма.

Интерфейс этого модуля содержит объявление нового класса, и она автоматически обновляется при дополнении новыми элементами.

Microsoft Visual Studio - это разработка компании Microsoft, что позволяет создавать приложения, работающие на платформе .NET. Особенностью этой платформы является широкий набор услуг, которые доступны в различных языках программирования. При этом служба реализована в виде промежуточного кода, который не зависит от базовой архитектуры. Microsoft Visual Studio сочетает в себе огромное количество функций, которые позволяют развивать ее для всех версий Windows, различных мобильных устройств и облачных вычислений. Visual Studio реализует новую среду разработки, что делает легче создание приложения. Microsoft Visual Studio - это обновленная и упрощенная программная среда, которая характеризуется высокой эффективностью и не зависит от характеристик оборудования.

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

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

Отличительной особенностью языка C является отсутствие современных средств отдельной зависимой компиляции.

Это облегчает использование объектов, определенных в другом модуле - достаточно указать имя модуля.

В C, модуль состоит из двух файлов: заголовок (расширение .h) и исполняемый файл (.CPP). Заголовочный файл модуля интерфейса и исполняемый файл, реализуют функции, содержащиеся в интерфейсе. Код пользователя, который использует только интерфейсный модуль не зависит от деталей его реализации.

Программа может быть составлена из нескольких модулей и файлов разных типов. Совокупность всех файлов и модулей образуют проект (Project).

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

Форма - прямоугольное окно на экране. Форма - рамка, на которой держитс интерфейс. Форма - это экранный объект, который содержит элементы управления и предоставляет функциональность программы.

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

Таблица 3

Сравнительная характеристика сред разработки информационных систем

Характеристики	Delphi	Visual Studio
Многооконность	Да	Нет
Редактор исходного кода	Да	Да
Настройка среды пользователем	Да	Да
Возможность сохранения настроек интерфейса	Да	Да
Удаление неиспользуемых переменных Linker’ом	Нет	Да
Создание Release и Debug версий	Да	Нет
Наличие break-point’ов	Да	Да
Пошаговый проход	Да	Да
Возврат вверх по коду во время отладки	Да	Да
Изменение кода во время отладки	Да	Да
Оптимизация приложения	Да	Да
Раздельная компиляция	Нет	Да
Скорость выполнения приложения	Средняя	Высокая
Автоматическое сохранение проекта	Нет	Да

Преимущества проектирования с помощью Delphi:

1) Исключает необходимость повторного ввода данных;

2) Обеспечивает согласованность проекта и его реализации;

3) Повышение производительности разработки и переносимость программ.

2 глава. Проектная часть

2.1. Информационная модель и её описание

С точки зрения технологии и организации работы пользователя система выполняет следующие функции:

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

Информационная система позволяет осуществлять следующие функции по работе с данными и поиском информации:

поиск товаров по шифру – позволяет осуществлять поиск товаров по шифру;
поиск товаров по наименованию – позволяет осуществлять поиск товаров по наименованию;
поиск товаров по дате поставки – позволяет осуществлять поиск товаров по дате поставки;
поиск товаров по дате реализации – позволяет осуществлять поиск товаров по дате реализации;
отчеты по реализации товаров за определенные периоды времени.

Диаграмма деятельности и алгоритм работы системы представлены в приложении А.

2.2. Характеристика нормативно-справочной, входной и оперативной информации

К нормативно-справочной информации, использующейся при работе информационной системы, относятся:

законодательство РФ;
справочник товаров;
должностные инструкции;
план продаж;
действующие договора;
подтверждение оплаты товара;
номенклатура;
стоимость товара;
информация о клиенте.

К входной информации, использующейся для работы системы, относится:

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

Форма договора на поставку продукции представлена в приложении Б.

2.3. Характеристика результатной информации

В результате работы системы формируется следующая результатная информация:

отчет по реализации товаров;
отчет по поставкам товаров;
аналитический отчет;
отчет о товарах;
счет;
накладная.

При оформлении реализации товаров используются следующие документы: счета и накладные. Основными реквизитами этих документов являются наименование и количество отпущенных со склада товаров.

Рисунок 11. Форма документа «Товарно-транспортная накладная»

Рисунок 12. Форма документа «Цеховая накладная»

Рисунок 13. Форма документа «Платежное поручение»

Рисунок 14. Форма документа «Платежное поручение»

Отчет о реализации товаров можно вынести в таблицу Excel.

При реализации товара заполняется накладная на отпуск товара в 2-х экземплярах – один кладовщику, второй покупателю. Выдача товара оформляется накладными, счетами-фактурами.

На всех расходных документах обязательно должна быть подпись руководителя организации или его заместителя. Все приходные и расходные документы со склада поступают бухгалтеру при реестре (описи). Реестр составляется в 2-х экземплярах – бухгалтеру и кладовщику.

2.4. Общие положения (дерево функций и сценарий диалога)

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

Исходными данными для формирования дерева функций являются основные и дополнительные функции системы.

Описание объекта на языке функций представлено на рис.15.

Информационная система

Составление справочников

Товаров

Поставщиков

Клиентов

Выполнение работ менеджерами по продажам и поставкам

Получение данных

Об имеющейся в продаже продукции

О поставках

О реализации

Поиск по дате

Поиск по шифру

Получение отчетов

Формирование прайс-листа

Отчет о продажах

Отчет о поставщиках

Отчет о поставках продукции

Отчет по складу

Отчет по клиентам

Рисунок 15 – Дерево функций

На основании дерева функций разработан сценарий диалога, схематически представленный на рисунке 16.

Интерфейс проектируемой системы создавался в виде форм приложения Delphi 7.

Главное меню

Справочники

Товары

Поставщики

Склады

Авторизация

Данные

Товар

Поставки

Продажи

Поиск по дате

Поиск по шифру

Отчеты

Прайс-лист

Отчет о продажах

Отчет о поставщиках

Отчет о поставках продукции

Отчет по складу

Отчет по клиентам

Рисунок 16 – Сценарий диалога

Формы – это средство представления информации для просмотра, изменения или печати данных в виде, удобном для восприятия пользователями. Использование форм существенно облегчает ввод и контроль данных. Кроме того, формы являются основной частью интерфейса прикладной программы, вокруг форм и строится весь алгоритм работы приложения, так как конечный пользователь не видит ничего, кроме набора форм. События, возникающие при работе с формами, определяют логику работы приложения.

Каждая форма реализована в виде модуля приложения и предназначена для удобного интерфейса пользователя при решении задач автоматизированной обработки информации:

1) хранение данных о товарах;

2) вывод в удобной форме данных по запросам пользователя;

2) автоматизация обработки информации при различных бизнес-операциях;

4) вывод данных на печать.

2.5. Характеристика базы данных

В качестве инструментального средства, реализующего метод семантического моделирования данных было выбрано CASE средство AllFusion ERwin Data Modeler 7.3.

AllFusion ERwin Data – CASE-средство для проектирования и документирования баз данных, которое позволяет создавать, документировать и сопровождать базы данных, хранилища и витрины данных. Данные о сущностях и их определения разработанной модели данных, отражены в таблице 4.

Таблица 4

Сущности и их определения

Имя сущности	Определение
Поставщик	Данные о поставщиках, контактная информация
Клиент	Данные о клиентах, контактная информация
Поставки	Данные о количестве и стоимости товара включенного в поставки
Реализация	Данные о реализации товаров
Склад	Данные о складировании товаров
Справочник товаров	Данные о товаре, его количестве, единицах измерения, цене
Авторизация	Данные о логине и пароле пользователя

Связи между сущностями отражены в таблице 5.

Таблица 5

Связи между сущностями

Сущность1	Сущность2	Связь
Поставщик	Поставка	Один-ко-многим
Справочник товаров	Поставка, Склад, Реализация	Один-ко-многим
Клиенты	Реализация	Один-ко-многим

В таблице 6 отображены атрибуты выявленных ранее сущностей и их описание.

Таблица 6

Атрибуты сущностей

Сущность	Атрибуты	Ключи
Поставщик	Наим_Пост	PK
	Адрес_Пост
	РНН
	Счет
	Ст_НДС
	Скидка
Клиент	ID_Клиента	PK
	ФИО_Наим_Клиент
	Адрес_Клиент
	Телефон
	Счет
Поставки	Наим_Пост	PK
	Шифр
	Ном_нак
	Дата_пост
	Кол_во
	Стоим
	Сумм_НДС
	Сумм_ск
Продолжение таблицы 3.8
Склад	Шифр	FK
	Кол_во
	Стеллаж
Реализация	№_Чека	PK
	Шифр	FK
	Кол_во
	Дата_реал
	Стоим
	Клиент	FK
Справочник_товаров	Шифр	PK
	Наим_тов
	Ед_изм
	Цена	FK
Авторизация	Статус
Авторизация	Пароль

В результате была сформирована модель предметной области на логическом уровне представления данных (рисунке17).

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

Рисунок 17 – Логическая модель базы данных системы

Физическая модель представлена на рисунке 18. Данная модель была создана средствами инструментария ERWin.

Рисунок 18 – ER- диаграмма базы данных

Базу данных реализуем средствами СУБД MS Access.

Схема базы данных MS Access приведена на рис.19.

Рисунок 19 – Схема базы данных MS Access

2.6 Структурная схема пакета (дерево вызова программных модулей)

Построим дерево программных модулей, отражающих структурную схему пакета (рис.20).

Рисунок 20 – Структурная схема пакета

Далее для каждого модуля указываем идентификатор и выполняемые функции (таблица 7).

Таблица 7

Описание функций модулей

№ п/п	Наименование модуля	Функции модуля
1.	Глобальный модуль	Содержит глобальные процедуры и функции, которые необходимо выполнить при запуске системы «Анализ и учет продаж ООО «СТЕКЛОТЕКС»
2.	DataModule3	Содержит предопределенные элементы связи с базой данных по технологии ADO
3.	Модуль «Справочники»	Содержит предопределенные процедуры для работы с таблицами
4.	Модуль «Учет поставок и продаж»	Содержит предопределенные процедуры для работы с запросами
5.	Модуль «Отчеты»	Содержит предопределенные процедуры для формирования запросов
6.	Модуль «Справка»	Содержит информацию об авторе проекта, о проекте и о компании
7.	Модуль «Авторизация»	Предоставляет возможность авторизации и обеспечивает разграничение прав пользователей

2.7 Описание программных модулей

Коды программных модулей приведены в приложении В.

2.8. Контрольный пример реализации проекта и его описание

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

Созданные таблицы представлены на рис. 21.

Рисунок 21 – Поля таблиц базы данных MS Access

На экране дисплея пользователя данные представляются в виде таблиц с вертикальными столбцами. На вершине столбца находится наименование столбца на русском языке в отличие наименований столбцов (доменов) в базе данных. Физическое представление таблиц базы данных будет описано в следующем разделе. Пример представления таблиц базы данных для пользователя можно увидеть на рисунке 22 на примере таблицы товаров.

Рисунок 22 - Табличное представление таблиц базы данных для пользователей

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

Внизу каждой таблице располагаются кнопки для добавления, обновления, удаления данных.

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

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

Данная форма имеет вид, представленный на рисунке 23.

Рисунок 23 - Форма табличных данных по реализации продукции

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

По такому же принципу организованы формы для запросов к базе данных системы. Как видно на рисунке, на некоторых формах имеются кнопки вывода на печать или в документы Word и Excel (рис. 24).

Рисунок 24 – Форма «Учет поставок и продаж»

Чтобы проверить работоспособность базы данных необходимо выполнить следующие действия:

Запустить программу на выполнение.

Ввести необходимые параметры для выполнения запросов и проверить правильность результатов.

Просмотреть все отчеты и проверить выводятся ли они на печать.

При успешном завершении каждой из перечисленных операций система готова к работе. После того как произошла загрузка программы - открывается главная форма (рис.25).

Рисунок 25 – Главная форма АРМ менеджера ООО «СТЕКЛОТЕКС»

В главной форме необходимо выбрать нужный режим работы, выбирая соответствующий пункт меню:

Файл.
Справочники.
База.
Учет поставок и продаж.
Отчеты.
Справка.

Нажав кнопку на форме:

Авторизация.
Выход.

Форма авторизации представлена на рис. 26.

Рисунок 26 – Форма «Авторизация»

При выборе меню «Справочники» можно выбрать пункт подменю и открывается форма «Таблицы». Данная форма позволяет просматривать, добавлять или удалять данные о поставщиках, поставках, товарах, размещении товара на складе, реализации продукции. Также можно вывести данные на печать. При выборе пункта меню База также откроется форма «Таблицы».

При выборе пункта меню Учет поставок и продаж откроется форма «Учет поставок и продаж» (рис. 27).

Рисунок 27 – Форма «Учет поставок и продаж»

Также используются отчетные формы в виде стандартных форм отчета или файлов Excel.

Отчетная форма по поставщикам представлена на рис. 28.

Рисунок 28 – Отчет в виде формы «Отчет по поставщикам»

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

При выборе пункта меню Справка можно просмотреть информацию о программе и о компании (рис. 29-30).

Рисунок 29 – Форма «О программе»

Рисунок 30 – Форма «О компании»

Для перехода в родительскую форму необходимо воспользоваться кнопкой «Главная», а для завершения работы с программой – кнопкой «Выход».

Заключение

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

На основании проведенного анализа компании ООО «СТЕКЛОТЕКС» в работе рассмотрены вопросы создания АРМ менеджера по работе с клиентами, развития программного обеспечения информационных систем (ИС), базирующихся на современных программных платформах, современных концепциях в области систем управления базами данных (СУБД), современных концепциях прикладного программирования, интернет технологиях.

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

АРМ менеджера по работе с клиентами представляет собой базу данных MS Access. С помощью форм, разработанных в среде визуального программирования Delphi 7 был организован интерфейс АРМ менеджера по работе с клиентами ООО «СТЕКЛОТЕКС».

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

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

Использование АРМ менеджера по работе с клиентами позволит:

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

Таким образом, реализация проекта, предусматривающего внедрение современных технологий баз данных и использование визуальной среды программирования позволит оптимизировать сбор отчетности, упростить работу компании ООО «СТЕКЛОТЕКС».

ИС «АРМ менеджера по работе с клиентами ООО «СТЕКЛОТЕКС», разработанная на основании анализа основных этапов и технологий проектирования ИС, повысит эффективность работы предприятия и его сотрудников.

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

Список используемых источников

Delphi. Программирование для Windows, OS X, iOS и Android Автор: Д. Л. Осипов – СПБ.: БХВ-Петербург, 2014. – 464с.
Аблязов В.И. Проектирование баз данных в среде Microsoft Office Access 2003, 2007 и 2010 – СПб.: Изд-во Политехн. ун-та, 2014. – 108 с.
Абрамов Г.В., Медведкова И.Е., Коробова Л.А. Проектирование информационных систем – Воронеж: ВГУИТ, 2012 г. - 172 с.
Базы данных / И.Е. Медведкова, Ю.В.Бугаев, С.В.Чикунов – Воронеж: ВГУИТ, 2014. – 105 с.
Бекаревич Ю. Самоучитель Microsoft Access 2013 / Ю. Бекаревич, Н. Пушкина – С-Пб.: БХВ-Петербург, 2014. – 465 с.
В.Г. Елиферов, В.В. Репин. Процессный подход к управлению. Моделирование бизнес-процессов. – М.:Манн, Иванов и Фербер, 2013. – 256 с.
Венделева М.А. Информационные технологии в управлении: Учебное пособие для бакалавров / М.А. Венделева, Ю.В. Вертакова. - М.: Юрайт, 2013. - 462 c.
Грекул В. Проектное управление в сфере информационных технологий / В. Грекул, Н.Коровкина, Ю.Куприянов – М.:БИНОМ, ИНФРА-М, 2013. – 348 с.
Голицына, О.Л. Информационные технологии: Учебник / О.Л. Голицына, Н.В. Максимов, Т.Л. Партыка, И.И. Попов. - М.: Форум, ИНФРА-М, 2013. - 608 c.
Грошев А.С. Информатика. Лабораторный практикум – Архангельск: Арханг. гос. техн. ун-т, 2012. – 148 с.
Информатика для экономистов: Учебник для бакалавров / Под ред. В.П. Полякова. – М.: Юрайт, 2013. – 322 с.
Информационные ресурсы и технологии в экономике : Учебное пособие / Г. Н. Безрядина [и др.] ; Под ред. Б.Е.Одинцова, А.Н.Романова. - М. : Вузовский учебник: ИНФРА-М, 2013. – 526 с.
Исаев Г.Н. Информационные системы в экономике: Учебник для студентов вузов / Г.Н. Исаев. - М.: Омега-Л, 2013. - 462 c.
Киселев Г.М. Информационные технологии в экономике и управлении (эффективная работа в MS Office 2007): Учебное пособие / Г.М. Киселев, Р.В. Бочкова, В.И. Сафонов. - М.: Дашков и К, 2013. - 272 c.
Кузнецов С.Д. Базы данных – М.: Академия, 2012. – 496 с.
Леонтьев В.П. Новейший самоучитель. Компьютер + Интернет 2013. – М.: Олма Медиа Групп, 2013. – 641 с.
Линн Бейли Изучаем SQL – Спб.: Питер, 2012. – 573с.
Нестеров С.А. Базы данных. – СПб.: Изд-во Полит. Ун-та, 2013. – 150 с.
Пташинский В. Самоучитель Office 2013. – М.: Эксмо, 2013. – 290 с.
Ричард Ньютон. Управление проектами от А до Я. – М.: Альпина Паблишер, 2014. – 218 с.
Советов Б. Я. Базы данных. Теория и практика / Советов Б. Я., Цехановский В. В., Чертовской В. Д. - 2-е изд. - М.: Юрайт, 2012. – 462 с.
Федотова Е.Л. Информационные технологии и системы: Учебное пособие / Е.Л. Федотова. - М.: ИД ФОРУМ, 2013. - 352 c.
Хлебников, А.А. Информационные технологии: Учебник / А.А. Хлебников. - М.: КноРус, 2014. - 472 c.
Цветкова М.С. Информатика и ИКТ. / М.С.Цветкова, Л.С.Великович 3-е изд., стер. - М.: ИНФРА, 2012. – 352 с.
Экономика и финансы предприятия / под ред. Т.С. Новашиной. - М.: Университет, 2014. - 344 с
MS Office Online [Электронный ресурс]: домашняя страница. – Продукты. MS Office Access. – Режим доступа: http://office.microsoft.com/ru-ru/access/(дата обращения: 05.11.2016)
SQL.RU – Введение в базы данных [Электронный ресурс]: ресурс содержит теоретический и практический материал, посвященный вопросам разработки и использования баз данных. – Режим доступа: http://www.sql.ru/articles/ms sql/2006/031701iintroductionindatabases.shtml (дата обращения: 05.11.2016)
Грекул В.И. Проектирование информационных систем. Учебный курс. Internet- университет Информационных технологий (ИНТУИТ) [Электронный ресурс] - Режим доступа: http://www.intuit.ru/department/se/devis/(дата обращения: 05.11.2016)
Маклаков С. В. CASE-средства Computer Associates.
ERwin, BPwin и Model Mart - новые возможности Service Pack 2. URL: http://www.interface.ru/logworks/sp2.htm (дата обращения: 02.11.2016)

Приложения

Приложение А

Рисунок А1. Диаграмма деятельности бизнес-процесса «Учет заявок клиентов»

База.mdb

Сведения о товарах

Загрузка главного модуля

База.mdb

Сведения о продажах

База.mdb

Сообщение об ошибке

Отчеты по сотрудникам и компьютерам

Отчеты

Параметры отчета

База.mdb

Текущие действия

База.mdb

Учет товаров

Формирование отчетов

Соединение с базой данных

Начало

Конец

Справочные данные

Работа со справочниками

Рисунок А2. Алгоритм работы информационной системы

Приложение Б

Рисунок Б1. Форма договора на поставку продукции

Приложение В

Части кода основных программных модулей

unit Unit1;

interface

uses

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

Dialogs, Menus, ExtCtrls, StdCtrls, jpeg, Buttons;

type

TForm1 = class(TForm)

MainMenu1: TMainMenu;

A1: TMenuItem;

…

procedure N23Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9, Unit10;

{$R *.dfm}

procedure TForm1.N3Click(Sender: TObject);

begin

Form2.Show;

form2.TabSheet1.Show;

Form1.Hide;

end;

procedure TForm1.N4Click(Sender: TObject);

begin

Form2.Show;

form2.TabSheet2.Show;

Form1.Hide;

end;

procedure TForm1.N5Click(Sender: TObject);

begin

Form2.Show;

form2.TabSheet3.Show;

Form1.Hide;

end;

procedure TForm1.N6Click(Sender: TObject);

begin

Form2.Show;

form2.TabSheet4.Show;

Form1.Hide;

end;

procedure TForm1.N7Click(Sender: TObject);

begin

Form2.Show;

form2.TabSheet5.Show;

Form1.Hide;

end;

procedure TForm1.N1Click(Sender: TObject);

begin

close;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Form2.Show;

Form1.Hide;

end;

procedure TForm1.Button4Click(Sender: TObject);

begin

Close;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

form5.show;

Form1.Hide;

end;

procedure TForm1.N10Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet1.Show;

Form1.Hide;

end;

procedure TForm1.N11Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet2.Show;

Form1.Hide;

end;

procedure TForm1.N12Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet3.Show;

Form1.Hide;

end;

procedure TForm1.N13Click(Sender: TObject);

begin

form6.QuickRep1.Preview;

end;

procedure TForm1.N14Click(Sender: TObject);

begin

form6.QuickRep2.Preview;

end;

procedure TForm1.N15Click(Sender: TObject);

begin

form6.QuickRep3.Preview;

end;

procedure TForm1.N16Click(Sender: TObject);

begin

form6.QuickRep4.Preview;

end;

procedure TForm1.N17Click(Sender: TObject);

begin

form6.QuickRep5.Preview;

end;

procedure TForm1.Button5Click(Sender: TObject);

begin

Form7.show;

Form1.Hide;

end;

procedure TForm1.N18Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet4.Show;

Form1.Hide;

end;

procedure TForm1.N19Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet5.Show;

Form1.Hide;

end;

procedure TForm1.N20Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet6.Show;

Form1.Hide;

end;

procedure TForm1.N21Click(Sender: TObject);

begin

Form5.Show;

form5.TabSheet7.Show;

Form1.Hide;

end;

procedure TForm1.Button3Click(Sender: TObject);

begin

Application.HelpContext(0);

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

Form1.N2.Enabled:=false;

Form1.N22.Enabled:=false;

Form1.N8.Enabled:=false;

Form1.N9.Enabled:=false;

end;

procedure TForm1.SpeedButton1Click(Sender: TObject);

begin

Form1.N2.Enabled:=false;

Form1.N22.Enabled:=false;

Form1.N8.Enabled:=false;

Form1.N9.Enabled:=false;

Form8.show;

end;

procedure TForm1.N24Click(Sender: TObject);

begin

Form9.Show;

end;

procedure TForm1.N25Click(Sender: TObject);

begin

Form10.Show;

end;

procedure TForm1.N23Click(Sender: TObject);

begin

Form7.Show;

end;

end.

unit Unit2;

interface

uses

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

Dialogs, ComCtrls,db, ExtCtrls, DBCtrls, Grids, DBGrids, StdCtrls,

Buttons, jpeg;

type

TForm2 = class(TForm)

PageControl1: TPageControl;

…

procedure RadioButton14Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

uses Unit1, Unit3, Unit4, Unit6;

{$R *.dfm}

procedure TForm2.BitBtn1Click(Sender: TObject);

begin

IF DataMOdule3.AdoTable4.Locate('Шифр', DataMOdule3.adotable2.Fieldbyname('Шифр').Value, []) then

begin

DataMOdule3.AdoTable4.Edit;

//AdoTable2.Edit;

DataMOdule3.AdoTable4.FieldByName('Кол_во').Value:=DataMOdule3.AdoTable4.FieldByName('Кол_во').Value +DataMOdule3.AdoTable2.FieldByName('Кол_во').Value;

end

else

begin

DataMOdule3.AdoTable4.Append;

DataMOdule3.Adotable4.FieldByName('Шифр').Value:=DataMOdule3.Adotable2.FieldByName('Шифр').Value;

DataMOdule3.Adotable4.FieldByName('Кол_во').Value:=DataMOdule3.Adotable2.FieldByName('Кол_во').Value;

IF DataMOdule3.AdoTable3.Locate('Шифр', DataMOdule3.adotable4.fieldbyname('Шифр').Value, []) then

DataMOdule3.Adotable4.FieldByName('Ед_изм').Value:=DataMOdule3.Adotable3.FieldByName('Ед_изм').Value;

form4.show;

end;

procedure TForm2.Button2Click(Sender: TObject);

begin

DataModule3.ADOTable2.First;

while not (DataModule3.ADOTable2.eof) do begin

DataModule3.AdoTable2.edit;

DataModule3.AdoTable2.FieldByName('Стоим').Value:=0;

DataModule3.AdoTable2.FieldByName('Сумм_НДС').Value:=0;

DataModule3.AdoTable2.FieldByName('Сумма_ск').Value:=0;

IF (DataModule3.AdoTable3.Locate('Шифр', DataModule3.adotable2.fieldbyname('Шифр').Value, [])) and

(DataModule3.AdoTable1.Locate('Наим_Пост', DataModule3.adotable2.fieldbyname('Наим_Пост').Value, []))

then begin

DataModule3.AdoTable2.FieldByName('Стоим').Value:=DataModule3.AdoTable2.fieldbyname('Кол_во').Value* DataModule3.AdoTable3.FieldByname('Цена').Value;

DataModule3.AdoTable2.FieldByName('Сумм_НДС').Value:=DataModule3.AdoTable2.fieldbyname('Стоим').Value* DataModule3.AdoTable1.FieldByname('Ст_НДС').Value/100;

DataModule3.AdoTable2.FieldByName('Сумма_ск').Value:=DataModule3.AdoTable2.fieldbyname('Стоим').Value* DataModule3.AdoTable1.FieldByname('Скидка').Value/100;

end;

DataModule3.ADOTable2.next;

end;

procedure TForm2.Button3Click(Sender: TObject);

begin

Form1.Show;

Form2.Hide;

end;

procedure TForm2.Button4Click(Sender: TObject);

begin

Form1.Show;

Form2.Hide;

end;

procedure TForm2.Button9Click(Sender: TObject);

begin

IF DataMOdule3.AdoTable4.Locate('Шифр', DataMOdule3.adotable5.Fieldbyname('Шифр').Value, []) then

IF DataMOdule3.AdoTable4.FieldByName('Кол_во').Value-DataMOdule3.AdoTable5.FieldByName('Кол_во').Value<0

then DataMOdule3.AdoTable4.FieldByName('Кол_во').Value:=0

else begin

DataMOdule3.AdoTable4.Edit;

DataMOdule3.AdoTable4.FieldByName('Кол_во').Value:=DataMOdule3.AdoTable4.FieldByName('Кол_во').Value -DataMOdule3.AdoTable5.FieldByName('Кол_во').Value

end

else Showmessage ('Продажа не возможна! Склад пуст!');

end;

procedure TForm2.RadioGroup1Click(Sender: TObject);

begin

DataModule3.ADOTable1.IndexFieldNames:='Наим_Пост';

end;

procedure TForm2.RadioButton1Click(Sender: TObject);

begin

DataModule3.ADOTable1.IndexFieldNames:='Наим_Пост';

end;

procedure TForm2.RadioButton2Click(Sender: TObject);

begin

DataModule3.ADOTable2.IndexFieldNames:='Шифр';

end;

procedure TForm2.RadioButton3Click(Sender: TObject);

begin

DataModule3.ADOTable2.IndexFieldNames:='Наим_Пост';

end;

procedure TForm2.RadioButton4Click(Sender: TObject);

begin

DataModule3.ADOTable3.IndexFieldNames:='Шифр';

end;

procedure TForm2.RadioButton5Click(Sender: TObject);

begin

DataModule3.ADOTable3.IndexFieldNames:='Наим_тов';

end;

procedure TForm2.Button10Click(Sender: TObject);

begin

form6.QuickRep1.Preview;

end;

procedure TForm2.Button1Click(Sender: TObject);

begin

form6.QuickRep2.Preview;

end;

procedure TForm2.Button11Click(Sender: TObject);

begin

form6.QuickRep3.Preview;

end;

procedure TForm2.Button12Click(Sender: TObject);

begin

form6.QuickRep4.Preview;

end;

procedure TForm2.Button13Click(Sender: TObject);

begin

form6.QuickRep5.Preview;

end;

procedure TForm2.Button8Click(Sender: TObject);

begin

DataModule3.ADOTable5.First;

while not (DataModule3.ADOTable5.eof) do begin

DataModule3.AdoTable5.edit;

IF DataModule3.AdoTable3.Locate('Шифр', DataModule3.adotable5.fieldbyname('Шифр').Value, [])

then begin

DataModule3.AdoTable5.FieldByName('Стоим').Value:=DataModule3.AdoTable5.fieldbyname('Кол_во').Value* DataModule3.AdoTable3.FieldByname('Цена').Value;

end;

DataModule3.ADOTable5.next;

end;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);

begin

form1.Show;

Form2.Hide;

end;

procedure TForm2.RadioButton6Click(Sender: TObject);

begin

DataModule3.ADOTable3.IndexFieldNames:='Цена';

end;

procedure TForm2.RadioButton7Click(Sender: TObject);

begin

DataModule3.ADOTable2.IndexFieldNames:='Дата_пост';

end;

procedure TForm2.RadioButton8Click(Sender: TObject);

begin

DataModule3.ADOTable5.IndexFieldNames:='Шифр';

end;

procedure TForm2.RadioButton9Click(Sender: TObject);

begin

DataModule3.ADOTable5.IndexFieldNames:='Дата_реал';

end;

procedure TForm2.RadioButton10Click(Sender: TObject);

begin

DataModule3.ADOTable5.IndexFieldNames:='№_Чека';

end;

procedure TForm2.RadioButton11Click(Sender: TObject);

begin

DataModule3.ADOTable1.IndexFieldNames:='Адрес_Пост';

end;

procedure TForm2.RadioButton12Click(Sender: TObject);

begin

DataModule3.ADOTable1.IndexFieldNames:='РНН';

end;

procedure TForm2.RadioButton13Click(Sender: TObject);

begin

DataModule3.ADOTable4.IndexFieldNames:='Шифр';

end;

procedure TForm2.RadioButton14Click(Sender: TObject);

begin

DataModule3.ADOTable4.IndexFieldNames:='Стеллаж';

end;

end.