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

 

Оглавление

Введение

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

.1 Технико-экономическая характеристика и анализ деятельности предприятия

.1.1 Общая характеристика предприятия

.1.2 Организационная структура предприятия

.1.3 Программная и техническая архитектура информационной системы предприятия

.1.4 Анализ системы обеспечения информационной безопасности и защиты информации

.2 Характеристика комплекса задач и обоснование необходимости автоматизации

.2.1 Выбор комплекса задач автоматизации и характеристика существующих бизнес процессов

.2.2 Анализ информационных потоков и документооборот предприятия

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

.3 Анализ существующих разработок для автоматизации задачи

.3.1 АС «БП: Авторизованный сервисный центр»

1.3.2 АС «КомпьюЛиб»

.3.3 АС «Hardware Inspector»

1.4 Обоснование проектных решений автоматизации задачи

.4.1 Выбор и обоснование модели данных

.4.2 Выбор и обоснование СУБД

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

.4.4 Выбор и обоснование технического обеспечения

. Проектная часть

.1 Разработка проекта автоматизации

.1.1 Этапы жизненного цикла проекта автоматизации

.1.2 Ожидаемые риски на этапах жизненного цикла и их описание

.1.3 Организационно-правовые и программно-аппаратные средства обеспечения информационной безопасности и защиты информации

.2 Концептуальный уровень архитектуры базы данных

.2.1 Инфологическая модель предметной области

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

.2.3 Даталогическая модель базы данных

.3 Физическая модель базы данных

.3.1 Описание состава проектируемых объектов БД

.3.2 Техническое описание объектов БД

.4 Реализация системы

.4.1 Дерево функций системы и сценарий диалога

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

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

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

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

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

Заключение

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

Приложения

Введение

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

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

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

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

Хорошо спроектированная база данных отвечает следующим характеристикам:

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

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

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

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

Таким образом, задачей данного дипломного проекта является выполнение следующих этапов:

изучение предметной области;

разработка модели бизнес-процессов предприятия;

выявление недостатков существующих бизнес-процессов обработки информации;

разработка постановки задачи автоматизации;

обоснование выбора основных проектных решений системы;

разработка информационного, математического, программного и технического обеспечения ИС;

обоснование экономической эффективности внедрения автоматизированной системы.

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

.1 Технико-экономическая характеристика и анализ деятельности предприятия

.1.1 Общая характеристика предприятия

Общество с ограниченной ответственностью «Компьютерный мир» является современной, динамично развивающейся компанией, которая ведет свою деятельность в области IT услуг и осуществляет ремонт, обслуживание и модернизацию компьютеров, ноутбуков, сотовых телефонов, электронных книг, навигаторов, техники Apple (iPad, iPhone 2, iPhone 3G, iPhone 3GS, iPhone 4, MacBook, iMac) в городе Самара.

К основным услугам, предоставляемым компанией «Компьютерный мир», относятся:

Диагностика и ремонт компьютеров и ноутбуков.

Выезд специалиста на место (в черте города Самара).

Установка операционной системы Windows XP, Vista, 7 (включая только драйверы, без установки дополнительных программ).

Установка операционной системы Windows XP, Vista, 7 (включая все драйверы, необходимые программы для работы с документами (Acrobat Reader, Open Office), работы с интернетом (Mozilla Firefox, Opera, Google Chrome, Safari), записи дисков (Ashampoo Burning Studio), просмотра фильмов (комплект кодеков), прослушивания музыки - AIMP).

Антивирусная обработка компьютера, ноутбука (в зависимости от объема обрабатываемых данных, а также от степени «завирусованности» компьютера или ноутбука).

Удаление вирусного баннера, SMS вымогателя (стоимость зависит от быстродействия компьютера или ноутбука).

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

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

Обучение пользованию компьютером, сетью Интернет.

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

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

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

Оцифровка видео с VHS кассеты на DVD диск (в цену включается стоимость диска, запись на диск в формате DVD Video).

Установка антивирусных программ

Установка драйверов устройства

Установка программ (Office, Word, Excel, OpenOffice, кодеки и т.д.).

Ремонт навигаторов и электронных книг всех производителей.

Замена экрана (тачскрина или сенсорного стекла, LCD дисплея) навигаторов, электронных книг, сотовых телефонов, замену матрицы ноутбуков.

Ремонт цифровых фотоаппаратов любых производителей.

Клиенты компании «Компьютерный мир» имеют возможность вызвать специалиста на место для оказания услуг, путем подачи заявки через диспетчерскую службу компании, либо привезти технику в офис компании самостоятельно. С постоянными клиентами заключаются соглашения об уровне сервиса (SLA), согласно которым клиенты получают скидку на услуги компании, плановые профилактические услуги и достаточную отчетность.

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

Samsung - сервисный центр в Самаре. Производит ремонт ноутбуков, ремонт сотовых телефонов, ремонт Galaxy Tab, ремонт мониторов, восстановление данных с жестких дисков, ремонт жестких дисков, ремонт электронных книг e-book.

Toshiba - сервисный центр в Самаре. Осуществляет ремонт ноутбуков, ремонт жестких дисков, восстановление данных с жестких дисков, ремонт электронных книг e-book.

Acer - сервисный центр в Самаре. Выполняет следующие виды работ: ремонт ноутбуков, ремонт компьютеров, ремонт коммуникаторов, ремонт планшетных ПК, ремонт мониторов.

Asus - сервисный центр в Самаре. Производит ремонт ноутбуков, ремонт компьютеров, ремонт коммуникаторов, ремонт планшетных ПК, ремонт мониторов.

Lenovo - сервисный центр в Самаре. Осуществляет ремонт ноутбуков, ремонт компьютеров, ремонт мониторов, ремонт планшетных ПК Idea Pad Tablet.

HTC - сервисный центр в Самаре. Выполняет следующие виды работ: ремонт смартфонов Sensation, Mozart, Explorer, Rhyme, Sense.

Apple - сервисный центр в Самаре. Осуществляет ремонт iPhone, iMac, iPad, MacBook, iPod.

Hewlet Packard HP - сервисный центр в Самаре. Производит ремонт ноутбуков, ремонт мониторов, ремонт компьютеров.

Rover - сервисный центр в Самаре. Производит ремонт ноутбуков, ремонт мониторов.

Dell - сервисный центр в Самаре. Осуществляет ремонт ноутбуков, ремонт мониторов, ремонт компьютеров.

Nokia - сервисный центр в Самаре. Производит: ремонт телефонов, коммуникаторов и смартфонов.

Sony - сервисный центр в Самаре. Осуществляет ремонт ноутбуков, ремонт мониторов, ремонт коммуникаторов и смартфонов.

Ritmix - сервисный центр в Самаре. Производит ремонт электронных книг.

Sony Ericsson - сервисный центр в Самаре. Осуществляет ремонт сотовых телефонов.

LG - сервисный центр в Самаре. Осуществляет ремонт ноутбуков, ремонт мониторов, ремонт сотовых телефонов, ремонт электронных книг.

Fujitsu-Siemens - сервисный центр в Самаре. Выполняет ремонт ноутбуков.

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

1.1.2 Организационная структура предприятия

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

Компания «Компьютерный мир» работает в отдельном регионе и не имеет разветвленной структуры по территории России. Поэтому её организационная структура довольно проста для понимания.

Организационная структура управления компании «Компьютерный мир», представлена схемой (См. рис. 1.1), которая отражает содержание аппарата управления и объекта управления.

Рисунок 1.1 - Схема организационной структуры управления компании

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

Устная консультация клиентов;

Диагностика и ремонт компьютерной техники;

Установка программного обеспечения;

Установка антивирусных программ;

Установка драйверов устройств;

Оцифровка видео;

Проведение плановых профилактических работ для поддержки техники в рабочем состоянии;

Выезд к клиенту для оказания IT-услуг;

К задачам и функциям диспетчерской службы компании «Компьютерный мир» относятся:

Прием звонков от клиентов;

Консультация клиентов по техническим вопросам;

Регистрация заявок на ремонт компьютерной техники;

Прием и выдача компьютерной техники после ремонта;

Оповещение клиентов об окончании ремонта;

Контроль соблюдения графика плановых профилактических работ;

Доставка техники клиенту после ремонта;

Предоставление отчетности о выполненных работах.

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

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

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

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

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

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

Налоговое планирование. Мониторинг актуальных законодательных и нормативных документов.

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

1.1.3 Программная и техническая архитектура информационной системы предприятия

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

Таблица 1.1 - Используемое программное обеспечение

ПрограммаНазначение или решаемая задачаMicrosoft Windows XP SP2Операционная система рабочих станций1С: Бухгалтерия 8Ведение бухгалтерского и налогового учетаMicrosoft Word 2007Ведение текущей документации и формирование отчетностиMicrosoft Excel 2007Регистрация заявок на ремонт и расчет стоимости работKaspersky Antivirus 6.0 Kaspersky Internet Security 6.0Защита от компьютерных вирусовWinRar 3.80Архивация данныхVenta Fax 4.0Прием и отправка факсимильных сообщенийAbby FineRider Professional edition 9.0Распознавание документации на оборудованиеThe Bat 3.9 Mozilla Thunderbird 3.0bezantОтправка и получение электронной почтыNero 7.8.5.Создание резервных копий на CD и DVD-дискахZoneAlarm 8.0.65.0Защита от вторжений в ЛВС и сети Internet

Техническая архитектура информационной системы компании «Компьютерный мир» представлена схемой (См. рис. 1.2).

Рисунок 1.2 - Схема технической архитектуры ИС компании

1.1.4 Анализ системы обеспечения информационной безопасности и защиты информации

Для защиты от внешних угроз операционная система (Windows XP SP2), которая установлена на всех персональных компьютерах сотрудников компании «Компьютерный мир», защищена лицензионным программным продуктом Kaspersky Antivirus 6.0 и Kaspersky Internet Security 6.0.

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

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

1.2 Характеристика комплекса задач и обоснование необходимости автоматизации

.2.1 Выбор комплекса задач автоматизации и характеристика существующих бизнес процессов

Деятельность компании «Компьютерный мир» заключается в выполнении основных бизнес-процессов, к которым относятся:

Прием заявок от клиентов на проведение ремонта и технического обслуживания компьютерной техники;

Выполнение ремонта и технического обслуживания компьютерной техники;

Доставка компьютерной техники клиенту;

Формирование сопроводительной документации и отчетности.

Для характеристики существующих бизнес-процессов предприятия с помощью CASE-средства BPWin, которое предназначено для проведения анализа и реорганизации существующих бизнес-процессов, была составлена структурно-функциональная диаграмма в методологии IDEF0. Средствами BPwin была построена модель А-0 процесса деятельности компании «Компьютерный мир» по ремонту и обслуживанию компьютерной техники (См. рис. 1.3).

Рисунок 1.3 - Модель А-0 процесса деятельности компании «Компьютерный мир» по ремонту и обслуживанию компьютерной техники

Для декомпозиции модели А-0, средствами BPwin, была построена модель A0 Деятельность компании «Компьютерный мир» (См. рис. 1.4).

Рисунок 1.4 - Модель A0 Деятельность компании «Компьютерный мир»

1.2.2 Анализ информационных потоков и документооборот предприятия

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

Нормативно-справочную информацию;

Оперативную и условно-постоянную информацию;

Результирующую информацию.

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

Соглашение об уровне сервиса (SLA) - документ, регламентирующий состав и характеристики, объем потребления и стоимость IT услуги, предоставляемой потребителю.

График плановых профилактических работ - документ определяющий план проведения профилактических работ по ремонту компьютерной техники для поддержания техники в рабочем состоянии.

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

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

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

Наряд на работы - документ, определяющий виды работ, которые необходимо реализовать для выполнения заявки клиента.

Отчет о выполненных работах - документ, определяющий перечень выполненных работ по ремонту компьютерной техники.

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

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

Схема документооборота (См. рис. 1.5), отражает движение информационных потоков компании «Компьютерный мир».

Рисунок 1.5 - Схема документооборота

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

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

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

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

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

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

1.2.3 Обоснование необходимости использования вычислительной техники для решения задачи

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

Процессы учета и контроля оперативных данных в компании «Компьютерный мир» практически непрерывны, являются трудоемкими и сопровождаются большим документооборотом. Учет заключается в регистрации оперативных данных, поступающих в процессе деятельности компании. Контроль заключается в отслеживании состояния заказа и группировке разрозненных оперативных данных. Необходимость в постоянном доступе к данной информации, наличие больших объемов регистрируемой информации, требуют автоматизации данных процессов. Таким образом, можно выделить следующие преимущества применения автоматизированной системы для данной задачи:

ускорение процессов получения и обработки данных;

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

наглядность и простота доступа к информации;

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

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

1.3 Анализ существующих разработок для автоматизации задачи

.3.1 АС «БП: Авторизованный сервисный центр»

Программный продукт «БП: Авторизованный сервисный центр» не является самостоятельной программой и устанавливается как дополнение к типовой конфигурации «Управление торговлей». Для работы конфигурации требуется установка программы «1С: Предприятие 8.0».

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

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

учет клиентов;

учет оборудования по серийным и заводским номерам;

учет оборудования, установленного у каждого клиента;

история ремонта по каждой модели оборудования;

учет работ по стационарному ремонту;

учет работ по выездному ремонту;

учет и планирование заявок;

учет и планирование работ по сервисным договорам;

учет показателей заработной платы;

учет движения ТМЦ (комплектующих и запасных частей);

формирование отчетов для производителей оборудования;

формирование управленческих отчетов.

Функционально конфигурация разделена на следующие блоки:

учет рекламаций;

стационарный ремонт;

выездной ремонт;

учет договоров сервисного обслуживания;

учет проектов.

Общая схема конфигурации (См. рис. 1.6) отражает состав и взаимодействие модулей системы.

Рисунок 1.6 - Общая схема конфигурации

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

Для оформления приема техники в ремонт в конфигурации предназначен документ «Заказ-Наряд». Документ можно вводить на основании документа «Обращения рекламатора». В документе фиксируются основные сведения о причинах обращения, диагностике оборудования. В процессе оформления документа фиксируются этапы ремонта, плановые и фактические сроки проведения работ и исполнитель. Фиксируются запчасти, использованные в процессе ремонта и выполненные работы.

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

1.3.2 АС «КомпьюЛиб»

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

учет компьютеров и устройств с распределением по административным отделам, доменам, месторасположению, помещениям, ответственным лицам;

учет программ;

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

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

хранение гарантийных сроков, расчет срока окончания гарантии;

учет событий по устройствам и рабочим станциям (компьютерам): история перемещений, ремонтов, изменений и т.д.;

автоматическое отслеживание событий; полный журнал событий («история» компьютерного парка организации);

автоматизированный ввод данных - импорт отчетов программ диагностики оборудования (Sysinfo Lab ASTRA, AIDA32);

гибкий настраиваемый интерфейс просмотра данных;

быстрый удобный ввод информации (в том числе копирование устройств, компьютеров);

мощные механизмы поиска, фильтрации, сортировки, группировки (в том числе автофильтр a-la Excel и Quick Search);

подробные развернутые отчеты;

экспорт в Word, Excel, HTML, текстовые файлы;

MDI-интерфейс;

работа в сети;

возможность работы с несколькими независимыми базами данных.

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

1.3.3 АС «Hardware Inspector»

АС «Hardware Inspector» разработана компанией Database Harbor Software и предназначена для автоматизированного учета и инвентаризации компьютерной техники и иного оборудования в организациях. Она дает возможность вести учет не просто текущего состояния параметров компьютера, а всей истории жизни отдельных комплектующих. «Hardware Inspector» решает задачи автоматизации инвентарного учета компьютерной техники и комплектующих, с возможностью хранения всей истории перемещений и обслуживания. Поддерживает механизм ревизий рабочих мест, который предохраняет компьютеры и комплектующие от хищения и подмены, детальный контроль над параметрами конфигурации компьютера, обеспечивающий свободу и оперативность действий по планированию модернизации и перераспределения устройств. Формирует отчетность для материальной бухгалтерии. Основные возможности АС:

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

древовидная организация подразделений и рабочих мест. Устройства располагаются на рабочем месте, также имея иерархическую структуру. Например, материнская плата находится внутри корпуса, CPU - внутри материнской платы, а кулер - внутри процессора;

по каждому устройству ведется история ремонта и других работ по его обслуживанию;

возможность как ручного, так и автоматизированного заполнения базы данных. Автоматизированное добавление устройств осуществляется посредством импорта их описаний из отчетов программ ASTRA и AIDA32. Данная возможность позволяет избавиться от рутинной работы по первичному вводу информации, однако данные программные продукты не входят в стоимость системы и могут быть приобретены за отдельную плату. Программа анализа конфигурации (ASTRA) читает данные об устройствах, «зашитые» на аппаратном уровне, определяет модель устройства, производителя и его www-адрес, дату производства, серийный номер (у HDD, CPU, мониторов, модулей памяти и материнских плат), а также многие другие технические параметры;

большой набор отчетов: «Паспорт на устройство», «Паспорт на рабочее место», «Список инвентарных номеров», «Полный перечень оборудования», «Выполненные работы за период времени»;

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

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

учет гарантийных сроков на технику с прогнозированием их окончания;

учет бухгалтерской информации о купленной технике (когда, где, у кого и по каким документам куплена техника);

учет инвентарных номеров, которые, при желании, можно присвоить каждому устройству;

информация по рабочему месту: ответственное лицо, IP-адреса, периодичность профилактики и пр.

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

.4 Обоснование проектных решений автоматизации задачи

.4.1 Выбор и обоснование модели данных

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

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

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

Достоинства обработки информации реляционной БД:

Связность (Реляционное представление дает ясную картину взаимосвязей атрибутов из различных отношений);

Точность;

Гибкость;

Секретность;

Простота внедрения (Физическое размещение однородных (табличных) файлов намного проще, чем размещение иерархических и сетевых структур);

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

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

1.4.2 Выбор и обоснование СУБД

Для обоснования выбора конкретной СУБД для разработки базы данных был проведён сравнительный анализ трёх СУБД, результаты которого приведены в таблице 1.2.Access 2003 в настоящее время является одной из самых популярных среди настольных (персональных) программных систем управления базами данных. Таким образом, на основе анализа сравнительной характеристики, для хранения данных была выбрана СУБД Access 2003.

Таблица 1.2 - Сравнительные характеристики СУБД

СУБД ХарактеристикаMS Access 2003InterBase 7.5Visual FoxPro 8.0Фирма производительMicrosoftBorlandMicrosoftПоддерживаемые ОСWindows 95, 98, МЕ, 2000, XPWindows, UnixWindows, MacintoshМинимальные системные требованияОЗУ 16 Мб, Windows 95, Intel Pentium 3ОЗУ 32 Мб, Windows 95, Intel Pentium 133ОЗУ 64 Мб, Windows 98, Intel Pentium 133Поддерживаемая модель данныхРеляционнаяРеляционнаяРеляционнаяМаксимальный размер БД1 Гбайт10 Гбайт1 ГбайтМаксимальное число записей в одной таблице2 147 483 647не ограничено1 000 000 000Максимальное число полей (столбцов) в одной таблице2551000255Максимальное количество символов в имени поля646410Поддержка объектов БДТаблицы, формы, отчёты, индексы, макросы, модули, запросы, процедурыТаблицы, индексы, триггеры, хранимые процедуры, генераторы, домены, ролиТаблицы, индексы, триггеры, хранимые процедуры, запросыТехнология создания БДВизуальнаяВизуальная, SQL-скриптВизуальная, SQL-скриптФормат файла БД*.mdb*.gdb*.dbc и таблицы *.dbfВозможность создания локальной БДЕстьЕстьЕстьПоддержка сервера БДНе поддерживаетФайл-сервер, клиент-сервер (Ibase Server)Файл-сервер, клиент-сервер, возможность подключения SQL Server и OracleНаличие встроенного языкаVisual BasicSQLXbase, SQLПоддержка стандарта SQLСуществуетСуществуетСуществуетСредства поддержки ограничения целостностиПервичный и внешний ключи, индексы, автоматическое обеспечение целостности, ссылочная целостность, обязательность значения поляПервичный и внешний ключи, индексы, ограничения первичного и внешнего ключа, ссылочная целостность, каскадное изменениеПервичный и внешний ключи, индексы, ссылочная целостность, ограничения первичного ключа, логические ограниченияВозможность реализации прав доступа для отдельных пользователей (права и привилегии)Реализован доступ ко всей БДРеализован доступ отдельного пользователя к отдельным таблицам с правами: чтение, правка, записьРеализация прав доступа программным путем или подключение БД со встроенной реализацией доступаВозможность передачи данных в MS Office (Excel, Word)ЕстьЕстьЕстьНаличие средств для получения отчётовЭлементы управления: поля, содержащие имена или числа, надписи для заголовков, линии для графического оформленияНетНетНаличие встроенных средств для создания резервной копии БД и восстановление БД из резервной копииЕстьЕстьЕстьПростота/сложность работы с СУБДПростота в освоении, возможность использования непрофессиональным программистом, имеет средства подготовки отчётовПростота в установке, настройке и администрировании, обладает прекрасными функциональными возможностямиПростота с точки зрения программиста и администратора, используется для организации сложных информационных систем

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

Для реализации пользовательского интерфейса разрабатываемого приложения выбрана среда разработки Delphi 10, и объектно-ориентированный язык программирования Object Pascal.

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

К новым технологиям Delphi 10 относятся:

новые шаблоны проектирования;

доступ к СУБД по технологии BDP.NET;

быстрое создание приложений ASP.NET и веб-служб;

технологии моделирования ECO III.

Программа Delphi 10 является разработкой, используемой в первую очередь для поддержки и разработки приложений, предназначенных как для отдельных рабочих станций, так и для собственных серверов. Delphi 10 функционирует под операционными системами: Windows 95, 98, NT, XP, Vista, Win7. Приложения, созданные с помощью Delphi 10, направлены главным образом на решение задач, связанных с производством и бизнесом.

Для доступа к данным хранящимся в файле Access предусмотрено использование технологии ADO. ActiveX Data Objects (ADO) - наиболее передовой технологией доступа к данным, которая не требует драйверов ODBC или BDE. Основные преимущества ADO - простота использования, высокая скорость, требуемый малый объем верхней памяти и дискового пространства. Благодаря чему, данная технология была выбрана для доступа к данным, хранящимся в таблицах MS Access 2003.

1.4.4 Выбор и обоснование технического обеспечения

Информационная система автоматизации задачи разработанная на базе MS Access и Delphi 10 не требует дополнительных затрат на приобретение нового технического обеспечения. Разрабатываемая ИС будет эффективно функционировать по средствам имеющегося на предприятии технического обеспечения.

Требования к техническому обеспечению представлены в таблице 1.3.

Таблица 1.3 - Требования к техническому обеспечению

ХарактеристикаЗначениеПроцессорIntel Pentium 4 2400 MHzКоличество физических процессоров1Количество логических процессоров1Оперативная памятьDDR 512 MbЖесткий дискIDE SeaGate 80 GbВидеокартаИнтегрированная с возможностью выделения из ОП до 32 MbАудиокартаRealtech AL 1810DVD-RWNEC DVD-RW AD 7173SСетевой адаптерMarvell Yukon 88E8001/8003/8010 PCI Gigabit Ethernet ControllerМониторProview MA782KC PL00018 17"Блок бесперебойного питанияBackUps 525КлавиатураLogitech KB 250 PC/2Мышь оптическаяLogitech M-SBF96 Optical Wheel

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

.1 Разработка проекта автоматизации

.1.1 Этапы жизненного цикла проекта автоматизации

Понятие жизненного цикла информационной системы (ЖЦ ИС) является одним из базовых в программной инженерии. Жизненный цикл ИС определяется как период времени, который начинается с момента принятия решения о необходимости создания ИС и заканчивается в момент его полного изъятия из эксплуатации.

Основным нормативным документом, регламентирующим состав процессов ЖЦ ИС, является международный стандарт ISO/IEC 12207: 1995 «Information Technology - Software Life Cycle Processes» (ISO - International Organization for Standardization - Международная организация по стандартизации, IЕС - International Electrotechnical Commission - Международная комиссия по электротехнике). Структура ЖЦ по стандарту ISO/IEC 12207 базируется на трех группах процессов:

основные процессы ЖЦ ИС (приобретение, поставка, разработка, эксплуатация, сопровождение);

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

организационные процессы (управление проектами, создание инфраструктуры проекта, определение, оценка и улучшение самого ЖЦ, обучение).

Модель жизненного цикла разрабатываемой информационной системы представлена схемой (См. рис. 3.1). Под моделью ЖЦ понимается структура, определяющая последовательностью выполнения и взаимосвязи процессов, действий и задач, выполняемых на протяжении ЖЦ.

Рисунок 2.1 - Каскадная модель жизненного цикла ИС

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

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

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

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

2.1.2 Ожидаемые риски на этапах жизненного цикла и их описание

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

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

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

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

Неготовность высшего руководства предприятия к изменениям в бизнес-процессах предприятия и организационной структуре.

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

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

Делегирование основных руководящих и исполнительских полномочий IT подразделению. В проектную команду обязательно должны входить ключевые сотрудники всех «предметных» подразделений, которые потом будут работать с внедряемой системой. На этапе внедрения в полной мере начинают проявляться риски, заложенные на предыдущих стадиях проекта, так называемые постановочные риски. К ним добавляются также «сквозные» риски, реализующиеся практически на каждом этапе проекта. К сквозным рискам относятся, прежде всего, внутриполитические риски - часто проект по внедрению ИС служит рычагом политической борьбы на предприятии. Если проект затрагивает сферу жизненных интересов больших коллективов и руководителей высшего звена, контролирующих собственность, товарные и денежные потоки, то даже при идеальном планировании и организации внедрения могут возникнуть значительные проблемы. Неприятие проекта со стороны персонала, как правило, возникает из-за недостатка информации: руководство предприятия не осведомлено о том, чем занимается проектная команда, а сотрудники вообще не видят смысла во внедрении. Преодолеть негативное отношение персонала может своевременная и регулярная разъяснительная работа, которая должна входить в обязанности участников проектной группы. После завершения проекта начинают проявляться долгосрочные риски, препятствующие эффективному использованию и дальнейшему развитию ИС на предприятии. Главные долгосрочные риски порождаются неадекватной поддержкой внешних и внутренних изменений. Важный долгосрочный риск связан с человеческим фактором - окончанием участия в проекте консультантов. Кроме того, существует риск нарушения информационной безопасности - возможной утечки коммерческой информации из компании.

2.1.3 Организационно-правовые и программно-аппаратные средства обеспечения информационной безопасности и защиты информации

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

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

Наличием информации различной степени конфиденциальности.

Обеспечением криптографической защиты информации различной степени конфиденциальности при передаче данных.

Иерархичностью полномочий субъектов доступа к компонентам ИС.

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

Наличием механизма предотвращения несанкционированного доступа.

Обязательной целостностью программного обеспечения и информации.

Наличием средств восстановления системы защиты информации.

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

Любая информационная система потенциально подвержена угрозам безопасности - кража данных или нарушение работы системы. Поэтому разработчики ИС её пользователи должны позаботиться о её безопасности.

Комплексная защита информации в сетях ЭВМ предполагает реализацию четырех уровней защиты:

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

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

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

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

.2 Концептуальный уровень архитектуры базы данных

.2.1 Инфологическая модель предметной области

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

Информационная модель данных предназначена для представления семантики предметной области в терминах субъективных средств описания - сущностей, атрибутов, идентификаторов сущностей, супертипов, подтипов и т.д. Элементы информационной модели данных предметной области являются входными данными для решения задачи проектирования базы данных - создания логической модели данных.(Information Modeling) - одна из методологий семейства IDEF. Применяется для построения информационной модели, которая представляет структуру информации, необходимой для поддержки функций производственной системы или среды. Метод IDEF1, разработанный Т. Рэмей основан на подходе П. Чена. Он позволяет построить модель данных, эквивалентную реляционной модели в третьей нормальной форме. В настоящее время на основе совершенствования методологии IDEF1 создана ее новая версия - методология IDEF1X. IDEF1X разработана с учетом таких требований, как простота изучения и возможность автоматизации. IDEF1X-диаграммы используются рядом распространённых CASE-средств (в частности, ERwin, Design/IDEF).

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

Таблица 2.1 - Сущности предметной области

ИмяОпределениеКлиентОрганизации, оформившие договора на сервисное обслуживание компьютерной техники в компании «Компьютерный мир»ТехникаКомпьютерная техника, подлежащая сервисному обслуживанию, согласно договору о сервисном обслуживании, либо по заявке клиента на проведение ремонтаВидГруппы техники, разделенные по функциональным назначениямПроизводительОфициальные марки производителей компьютерной техникиЗаказФакт выполнения сервисного обслуживания компьютерной техникиРаботаПеречень работ по обслуживанию компьютерной техники, предоставляемых компанией «Компьютерный мир»РемонтФакт включения в заказ на техническое обслуживание компьютерной техники определенного вида работМатериалРасходные материалы, используемые для выполнения ремонта и сервисного обслуживания компьютерной техникиРасходФакт использования, расходных материалов для выполнения ремонта и сервисного обслуживания компьютерной техникиМастерСотрудники компании «Компьютерный мир», выполняющие ремонт и сервисное обслуживание компьютерной техникиКатегорияРазновидности расходных материалов

Таким образом, средствами ERwin была спроектирована ER-диаграмма предметной области (См. рис. 2.2), которая отражает выделенные сущности предметной области и связи между ними.

Рисунок 2.2 - ER-диаграмма предметной области

После определения атрибутов сущностей, выделения первичных и внешних ключей, и связей между сущностями была составлена IDEF1X-диаграмма КВ-уровня (См. рис. 2.3).

Рисунок 2.3 - IDEF1X-диаграмма КВ-уровня

Описание атрибутов сущностей, с указанием владельцев сущностей, представлено в таблице 2.2.

Таблица 2.2 - Атрибуты сущностей

ВладелецАтрибутКлючОпределениеКлиентКод КлиентаPKУникальный код клиента, который присваивается ему во время регистрацииНаименованиеНазвание предприятия, заключившего договор на сервисное обслуживание, либо подавшего заявку на ремонт компьютерной техникиАдресГеографическое место расположения предприятияТелефонКонтактный телефон предприятияФаксФакс предприятияEmailАдрес электронной почты предприятияВидКод ВидаPKУникальный код вида техники, который присваивается ему во время регистрацииВид ТехникиВиды техники, разделенные по функциональным характеристикамОписаниеПодробное описание вида техникиПроизводительКод МаркиPKУникальный код марки техники, который присваивается ей во время регистрацииМарка ТехникиНаименование торговой марки производителя техникиОписаниеПодробное описание производителя техникиТехникаНомер ТехникиPKУникальный номер техники, который присваивается ей во время регистрацииНазваниеПолное наименование компьютерной техникиКод КлиентаFKКод клиента, которому принадлежит техникаКод ВидаFKКод вида техники клиентаКод МаркиFKКод марки техники клиентаМастерКод МастераPKУникальный код сотрудника компании, который присваивается ему во время регистрацииИмя МастераФамилия, Имя и Отчество сотрудника компанииТелефон МастераКонтактный телефон сотрудника компанииСертификатСертификат мастера по ремонту компьютерной техникиРаботаКод РаботыPKУникальный код работы по ремонту и обслуживанию техники, который присваивается ей во время регистрацииИмя РаботыНаименование работы по ремонту и обслуживанию техникиОписаниеПодробное описание работы по ремонту и обслуживанию техникиЦена РаботыСтоимость выполнения работы по ремонту и обслуживанию техникиЗаказНомер ЗаказаPKУникальный номер заказа клиента на ремонт техники, который присваивается ему во время регистрацииНомер ТехникиFKКод техники, ремонт которой требуется выполнитьКод МастераFKКод мастера, выполняющего ремонтные работыДата ЗаказаДата регистрации заказа клиента на ремонт техникиДата ВыполненияДата выполнения ремонта компьютерной техникиВыполненФакт завершения выполнения ремонта компьютерной техникиВызовФакт вызова мастераДоставкаФакт доставки техники клиенту после выполнения ремонтаОплатаВид оплаты за ремонт техники (нал/безнал)РемонтНомер ЗаказаPK (FK)Номер заказ, на основании которого проводятся ремонтные работыКод РаботыPK (FK)Код работы, выполненной для ремонта компьютерной техникиВыполненаФакт выполнения работы для ремонта компьютерной техникиКатегорияКод КатегорииPKУникальный код вида расходных материалов, который присваивается ему во время регистрацииНаименованиеНаименование вида расходных материаловМатериалКод МатериалаPKУникальный код расходного материала, который присваивается ему во время регистрацииКод КатегорииFKКод категории вида расходного материалаИмя МатериалаНаименование расходного материала для ремонта компьютерной техникиОписаниеПолное описание расходного материала для ремонта компьютерной техникиЦенаСтоимость расходного материала для ремонта компьютерной техникиРасходНомер ЗаказаPK (FK)Номер заказа, на основании которого израсходованы материалыКод МатериалаPK (FK)Код расходного материала, использованного для ремонта компьютерной техникиКоличествоКоличество расходного материала, использованного для ремонта компьютерной техники

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

2.2.2 Перекрестная проверка модели данных и иерархии функций

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

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

I - операция добавления данных;

U - операция обновления данных;

R - операция чтения (выборки) данных.

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

Таблица 2.3 - Перекрестная проверка модели предметной области

Функции АИССущностиКлиентТехникаПроизводительВидЗаказРемонтРаботаМастерРасходКатегорияМатериалВвод, корректировка, удаление, просмотр данных о клиентеI U RВвод, корректировка, удаление, просмотр данных о техникеRI U RВвод, корректировка, удаление, просмотр данных о производителе техникиI U RВвод, корректировка, удаление, просмотр данных о видах техникиI U RВвод, корректировка, удаление, просмотр данных о заказахRRRRI U RRВвод, корректировка, удаление, просмотр данных о выполненных ремонтных работахRI U RRВвод, корректировка, удаление, просмотр данных о выполняемых компанией ремонтных работахI U RВвод, корректировка, удаление, просмотр данных о мастерахI U RВвод, корректировка, удаление, просмотр данных об израсходованных материалахRI U RRRВвод, корректировка, удаление, просмотр данных о категориях расходных материаловI U RВвод, корректировка, удаление, просмотр данных о расходных материаловRI U RФормирование документа - справка о приеме техники в ремонтRRRRRФормирование документа - наряд на ремонтные работыRRRRRRФормирование документа - акт выполненных работRRRRRRRRRRRФормирование отчета о результатах деятельности компанииRRRRRRRRRRФормирование отчета о результатах деятельности мастераRRRRRRRRRRR

3.1.12.2.3 Даталогическая модель базы данных

После определения типов данных атрибутов выделенных сущностей, средствами Erwin, была построена даталогическая модель базы данных (См. рис. 2.4).

Рисунок 2.4 - Даталогическая модель базы данных

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

2.3 Физическая модель базы данных

.3.1 Описание состава проектируемых объектов БД

С помощью ERwin Data Modeler, используя визуальные средства, была описана модель данных предметной области, на основании которой была автоматически сгенерирована схема данных для выбранной реляционной СУБД Access (См. рис. 2.5). Автоматически генерируются также триггеры, обеспечивающие ссылочную целостность БД.

Рисунок 2.5 - Схема данных Access

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

2.3.2 Техническое описание объектов БД

Для технического описания объектов базы данных представим построенные таблицы Access в форме конструктора (См. рис. 2.6 - 2.16).

Рисунок 2.6 - Таблица Access «Вид»

Рисунок 2.7 - Таблица Access «Производитель»

Рисунок 2.8 - Таблица Access «Клиент»

Рисунок 2.9 - Таблица Access «Техника»

Рисунок 2.10 - Таблица Access «Мастер»

Рисунок 2.11 - Таблица Access «Работа»

Рисунок 2.12 - Таблица Access «Заказ»

Рисунок 2.13 - Таблица Access «Ремонт»

Рисунок 2.14 - Таблица Access «Категория»

Рисунок 2.15 - Таблица Access «Материал»

Рисунок 2.16 - Таблица Access «Расход»

2.4 Реализация системы

.4.1 Дерево функций системы и сценарий диалога

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

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

Дерево функций главного меню разработанной системы представлено схемой (См. рис. 2.17).

Рисунок 2.17 - Дерево функций главного меню

автоматизация бизнес информационный учет

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

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

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

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

Справочник «Клиенты» (См. рис. 2.18) предоставляет пользователю возможность оперативно зафиксировать либо просмотреть информацию о новом предприятии-заказчике сервисных услуг. К тому же имеется возможность навигации по справочнику и поиска клиента по наименованию организации. В нижней части справочника можно просмотреть всю технику выбранного клиента, находящуюся на сервисном обслуживании в компании «Компьютерный мир».

Рисунок 2.18 - Справочник «Клиенты»

Аналогичным образом, нажав на соответствующую кнопку навигатора, можно найти, просмотреть или внести новую информацию в справочник «Сотрудники» (См. рис. 2.19) разработанного приложения. Данный справочник снабжен системой поиска сотрудника по имени.

Рисунок 2.19 - Справочник «Сотрудники»

С помощью справочника «Виды техники» (См. рис. 2.20) пользователь системы имеет возможность при необходимости добавить новый вид техники, обслуживаемый специалистами сервисного центра «Компьютерный мир».

Рисунок 2.20 - Справочник «Виды техники»

Аналогичным образом представлен справочник «Марки техники» (См. рис. 2.21).

Рисунок 2.21 - Справочник «Марки техники»

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

Рисунок 2.22 - Справочник «Расходные материалы»

Справочник «Ремонтные работы» (См. рис. 2.23) служит для поиска, просмотра и добавления информации о видах ремонтных работ и услуг, предоставляемых специалистами компании «Компьютерный мир».

Рисунок 2.23 - Справочник «Ремонтные работы»

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

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

ДОКУМЕНТЫ:

Справка о приеме техники в ремонт;

Наряд на выполнение ремонтных работ;

Акт выполненных работ.

ОТЧЕТЫ:

Отчет о результатах деятельности компании (за период);

Отчет о результатах деятельности мастера (за период).

Во время регистрации заказа на сервисное обслуживание, сотрудник диспетчерской службы, оформляет и выдает клиенту документ «Справка о приеме техники в ремонт» (См. рис. 2.24).

Рисунок 2.24 - Документ «Справка о приеме техники в ремонт»

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

После приема техники в ремонт она передается соответствующему специалисту сервисного центра «Компьютерный мир» для непосредственного проведения ремонта. Передача техники сопровождается документом «Наряд на ремонтные работы» (См. рис. 2.25). Данный документ содержит информацию о неисправной технике и подписывается мастером принявшем технику для проведения ремонтных работ.

Рисунок 2.25 - Документ «Наряд на ремонтные работы»

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

Рисунок 2.26 - Документ «Акт выполненных работ»

Для формирования результатной отчетности служит пункт «Отчеты» главного меню программы. Для учета и анализа выполненных ремонтных работ за определенный период времени разработан отчет «Результаты деятельности компании», который представлен в Приложении А на рисунке А.1. Данный отчет содержит информацию о принятых заказах на сервисное обслуживание и их суммах. В нижней части отчета содержится информация о сумме выполненных и невыполненных заказах за отчетный период. Для формирования данного отчета необходимо выбрать нужный период и нажать на кнопку «ОК» в форме «Период отчетности» (См. рис. 2.27), которая открывается после нажатия на кнопку главного меню приложения «Отчеты» ? «Результаты деятельности компании».

Рисунок 2.27 - Форма «Период отчетности»

Для анализа работы определенного сотрудника компании «Компьютерный мир» за период времени, разработан отчет «Результаты деятельности мастера», который представлен в Приложении Б на рисунке Б.1. Данный отчет содержит информацию о выполненных заказах за выбранный период времени, определенным мастером сервисного центра. В нижней части отчета содержится информация о сумме выполненных заказов определенным сотрудником за отчетный период. Для формирования данного отчета необходимо выбрать нужный период, выбрать необходимого сотрудника и нажать на кнопку «ОК» в форме «Период отчетности» (См. рис. 2.28), которая открывается после нажатия на кнопку главного меню приложения «Отчеты» ? «Результаты деятельности мастера».

Рисунок 2.28 - Форма «Период отчетности»

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

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

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

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

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

Таблица 2.4 - Описание программных модулей системы

Программный модульОписаниеМодуль главной формы (Unit1.pas)Служит для отображения, добавления и редактирования информации о заказах клиентов компании, ремонтных работах, выполненных на основании заказа, а также израсходованных материалах. С помощью средств фильтрации заказов можно отобрать нужную группу заказов по различным критериям. Визуализация данных из таблиц, хранящихся в базе данных Access, осуществлена с помощью компонента DBGrid вкладки Data Controls. Навигация по таблицам осуществляется с помощью компонентов DBNavigator вкладки Data Controls. Главное меню программы разработано с помощью компонента MainMenu вкладки Standard и служит для перехода к справочникам системы и формировании результатной отчетности.Модуль данных (Unit3.pas)Служит для связи с базой данных, хранящейся в таблицах Access. Связь реализована с помощью технологии ADO. Связь с базой данных осуществлена с помощью компонента ADOConnection вкладки ADO. Запросы реализованы с помощью компонентов ADOQuery вкладки ADO. Визуализация данных осуществлена с помощью связующего компонента DataSource вкладки Data Access. Для генерации отчетов и сопроводительной документации используются шаблоны документов Word, связь с которыми реализуется с помощью компонентов WordApplication и WordDocument вкладки Servers (См. рис. 2.30).Модуль формы «Расходные материалы» (Unit2.pas)Служит для отображения, добавления и редактирования информации о расходных материалах, используемых для ремонта компьютерной техники. Заполнив соответствующие поля справочника можно зафиксировать новый расходный материал. С помощью строки поиска можно найти необходимую информацию, просмотреть, удалить или отредактировать. Визуализация данных из таблиц, хранящихся в базе данных Access, осуществлена с помощью компонента DBCtrlGrid вкладки Data Controls. Навигация по справочнику осуществляется с помощью компонента DBNavigator.Модуль формы «Виды техники» (Unit4.pas)Служит для отображения, добавления и редактирования информации о видах техники, обслуживаемых в сервисном центре. Работа с данным справочником аналогична работе со справочником «Расходные материалы».Модуль формы «Марки техники» (Unit5.pas)Служит для отображения, добавления и редактирования информации о марках техники, обслуживаемых в сервисном центре. Работа с данным справочником аналогична работе со справочником «Расходные материалы».Модуль формы «Клиенты» (Unit6.pas)Служит для отображения, добавления и редактирования информации о клиентах, обслуживаемых в сервисном центре. Визуализация данных из таблиц, хранящихся в базе данных Access, осуществлена с помощью компонента DBGrid вкладки Data Controls. Навигация по справочнику осуществляется с помощью компонентов DBNavigator вкладки Data Controls.Модуль формы «Сотрудники» (Unit7.pas)Служит для отображения, добавления и редактирования информации о сотрудниках сервисного центра. Работа с данным справочником аналогична работе со справочником «Клиенты».Модуль формы «Ремонтные работы» (Unit8.pas)Служит для отображения, добавления и редактирования информации о ремонтных работах и их ценах, выполняемых специалистами сервисного центра. Работа с данным справочником аналогична работе со справочником «Расходные материалы».Модуль формы «Период отчетности» (Unit9.pas)Для выбора нужного периода отчетности, необходимо выбрать нужную дату в соответствующих полях, с помощью выпадающих календарей. Выбрав нужный период отчетности в соответствующих полях, и нажав на соответствующую кнопку, имеется возможность просмотреть или распечатать необходимый отчет.

Рисунок 2.30 - Модуль данных (Unit3.pas)

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

Для установки приложения копируем папку с файлами программы (с именем «Компьютерный мир (Учет ремонтных работ)») на диск персонального компьютера, на котором предполагается использование приложения. Запускаем файл KompMir.exe. Для демонстрации контрольного примера рассмотрим более детально работу с главной формой программы.

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

Регистрация нового заказа происходит в форме диалога пользователя с системой и начинается, нажатием на кнопку «Добавить заказ». После нажатия на данную кнопку, система открывается справочник «Клиенты» и предлагает выбрать необходимого клиента и его технику для проведения ремонта (См. рис. 2.31).

Рисунок 2.31 - Приглашение к выбору клиента и его техники для ремонта

После выбора техники клиента для проведения сервисного обслуживания, необходимо нажать на кнопку «Добавить заказ» главного меню справочника «Клиенты» (См. рис. 2.32).

Рисунок 2.32 - Выбор клиента и техники для ремонта

После нажатия на кнопку «Добавить заказ» главного меню справочника «Клиенты», система открывается справочник «Сотрудники» и предлагает выбрать необходимого мастера для проведения ремонта (См. рис. 2.33).

Рисунок 2.33 - Приглашение к выбору мастера для проведения ремонта

После выбора мастера для проведения сервисного обслуживания, необходимо нажать на кнопку «Добавить заказ» главного меню справочника «Сотрудники» (См. рис. 2.34).

Рисунок 2.34 - Выбор мастера для проведения ремонта

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

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

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

Рисунок 2.35 - Приглашение к выбору расходных материалов

После выбора необходимых расходных материалов для проведения ремонтных работ, необходимо нажать на кнопку «Добавить расход» главного меню справочника «Расходные материалы» (См. рис. 2.36).

Рисунок 2.36 - Выбор расходных материалов

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

Для удаления заказа предусмотрена кнопка «Удалить заказ» главной формы программы. При удалении заказа система требует подтверждения удаления заказа (См. рис. 2.37).

Рисунок 2.37 - Подтверждение удаления заказа

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

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

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

Заключение

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

Хранение информации о предприятиях и технике подлежащей сервисному обслуживанию;

Поиск клиентов по базе;

Хранение информации о специалистах сервисного центра;

Поиск сотрудников по базе;

Учет заказов на проведение сервисного обслуживания;

Поиск заказов с помощью системы фильтрации;

Анализ данных о заказах;

Учет и обновление номенклатуры видов и марок техники;

Учет и обновление номенклатуры расходных материалов;

Учет и обновление номенклатуры ремонтных работ;

Учет и обновление номенклатуры расходных материалов;

Автоматизация расчета суммы заказа;

Автоматизация формирования сопроводительной документации;

Учет и подготовка результатной отчетности.

Преимущества разработанной системы:

Возможность анализа работы сервисного центра в различных разрезах;

Возможность анализа работы специалистов сервисного центра в различных разрезах;

Развитые возможности фильтрации, сортировки и поиска информации.

При проектировании базы данных использовалось такое мощное CASE-средство как ERwin 4.0, поскольку от того, насколько хорошо спроектирована база данных, зависит удобство ее дальнейшего использования и администрирования. Для хранения данных использовалась СУБД Microsoft Access. Для реализации пользовательского интерфейса была проведена разработка Windows-приложения с учетом принципов создания дружественных интерфейсов и программная реализация проекта с помощью визуальной среды проектирования Borland Delphi 10, на объектно-ориентированном языке программирования Object Pascal. Для доступа к данным хранящимся в таблицах MS Access используется наиболее передовая технология доступа к данным - технология Microsoft ADO. В процессе выполнения дипломной работы были достигнуты следующие результаты:

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

осуществлена выборка СУБД и построена физическая модель с определением полей и типов данных;

выбран комплекс технических средств;

реализованы основные программные модули системы;

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

выбрана методика и проведен расчет показателей экономической эффективности проекта.

В результате анализа показателей экономической эффективности были сделаны выводы о целесообразности разработки данной системы.

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

1.Вендров А.М. Проектирование программного обеспечения экономических информационных систем, Финансы и статистика, М, 2002 г.

2.Гэри Хансен, Джеймс Хансен. Базы данных. Разработка и управление, Бином, М, 2001 г.

.Гусева Т.И., Башин Ю.Б., Проектирование баз данных в примерах и задачах, М., 2008 г.

.Джен Л. Харрингтон. Проектирование реляционных баз данных Лори, 2006 г.

.Джеффри Д. Ульман, Дженнифер Уидом. Основы реляционных баз данных, Лори, М, 2006 г.

.Информационные системы в экономике: учебник для студентов вузов / Под ред. Г.А. Титаренко. - 2-е изд., перераб. и доп. - М.: ЮНИТИ-ДАНА, 2008. - 463 с.

.Сибилёв В.Д. Проектирование баз данных: Учеб. пособие. - Томск: Томский межвузовский центр дистанционного образования, 2007. - 201 с.

.«Информатика» базовый курс / Под ред. С.В. Симоновича. - СПб.: Питер, 2001. - 642 с.

.Кренке Д. Теория и практика построение баз данных. М.: Питер, 2003. 800 с.

.Мишенин А.И. Теория экономических информационных систем: учебник, 4-е изд., доп. и перераб. М.: Финансы и статистика, 2001. 240 с.

.Маклаков С.В. BPwin Erwin. CASE-средства разработки информационных систем. М.: Диалог МИФИ, 2000. 256 с.

.Харитонова И.А., Михеева В.Д., Microsoft Access 2003 - СПб.: BHV, 2006. - 1072 с.

.Эффективная работа с СУБД / А. Рубен, А. Горев, С. Макшарипов. - СПб.: Питер, 2001. - 822 с.

.«Экономика» / под редакцией А.С. Булатова, Москва, издательство БЕК, 1997.

.«Экономика предприятия» учебник для вузов / под редакцией Е.М. Куприянова, Москва, Банки и биржи, 1996.

.Сергеев И.В. «Экономика предприятия» Финансы и статистика, 1997.

.Цирлов В.Л. Основы информационной безопасности: краткий курс, серия «Профессиональное образование». Ростов н/Д: Феникс, 2008. 253 с.

.Архангельский А.Я. Программирование в Delphi: учебник. М.: БИНОМ, 2006. 1152 с.

.Программные продукты фирмы 1С: #"justify">.Услуги компании «Компьютерный мир»: #"justify">Приложение А

Рисунок А.1 - Отчет «Результаты деятельности компании»

Приложение Б

Рисунок Б.1 - Отчет «Результаты деятельности мастера»

Приложение В

Рисунок В.1 - Главная форма программы

Приложение Г

Листинг программного кода

Модуль главной формы программы (Unit1.pas)

unit Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Menus, Grids, DBGrids, StdCtrls, ImgList, ExtCtrls, Buttons, DBCtrls;

Form1: TForm1;Clos;Unit3, Unit2, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9;

{$R *.dfm}Clos;.Form1.N18.Checked:=False;.Form1.N19.Checked:=False;.Form1.N20.Checked:=False;.Form1.N22.Checked:=False;.Form1.N24.Checked:=False;.Form1.BitBtn10.Caption:='ГОТОВ (откл.)';.Form1.BitBtn3.Caption:='НЕ ГОТОВ (откл.)';.Form1.BitBtn6.Caption:='ДАТА (откл.)';.Form1.BitBtn7.Caption:='№ТЕХ. (откл.)';.Form1.BitBtn9.Caption:='МАСТЕР (откл.)';;TForm1.BitBtn10Click(Sender: TObject);.Click;;TForm1.BitBtn11Click(Sender: TObject);.Click;;TForm1.BitBtn12Click(Sender: TObject);.Click;;TForm1.BitBtn13Click(Sender: TObject);.Click;;TForm1.BitBtn14Click(Sender: TObject);.Click;;TForm1.BitBtn15Click(Sender: TObject);.Click;;TForm1.BitBtn16Click(Sender: TObject);.Click;;TForm1.BitBtn18Click(Sender: TObject);.Click;;TForm1.BitBtn1Click(Sender: TObject);.Click;;TForm1.BitBtn2Click(Sender: TObject);.Click;;TForm1.BitBtn3Click(Sender: TObject);.Click;;TForm1.BitBtn4Click(Sender: TObject);.Click;;TForm1.BitBtn6Click(Sender: TObject);.Click;;TForm1.BitBtn7Click(Sender: TObject);.Click;;TForm1.BitBtn9Click(Sender: TObject);.Click;;TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;: Integer; Column: TColumn; State: TGridDrawState);:TBitmap;:=TBitmap.Create;Column.FieldName='Вызов' then beginDBGrid1.Canvas do begin(Rect);DM.ADOTabZakazВызов.Value=True then.GetBitmap(1,I).GetBitmap(0,I);(round((Rect.Left+Rect.Right-I.Width)/2),Rect.Top,I);;;Column.FieldName='Доставка' then beginDBGrid1.Canvas do begin(Rect);DM.ADOTabZakazДоставка.Value=True then.GetBitmap(1,I).GetBitmap(0,I);(round((Rect.Left+Rect.Right-I.Width)/2),Rect.Top,I);;;Column.FieldName='Выполнен' then beginDBGrid1.Canvas do begin(Rect);DM.ADOTabZakazВыполнен.Value=True then.GetBitmap(1,I).GetBitmap(0,I);(round((Rect.Left+Rect.Right-I.Width)/2),Rect.Top,I);;;;TForm1.DBGrid2DrawColumnCell(Sender: TObject; const Rect: TRect;: Integer; Column: TColumn; State: TGridDrawState);:TBitmap;:=TBitmap.Create;Column.FieldName='Выполнена' then beginDBGrid2.Canvas do begin(Rect);DM.ADOTabRemontВыполнена.Value=True then.GetBitmap(3,I).GetBitmap(2,I);(round((Rect.Left+Rect.Right-I.Width)/2),Rect.Top,I);;;;TForm1.DBGrid2EditButtonClick(Sender: TObject);DM.ADOTabRemont.RecordCount<>0 then.ADOTabRemont.Refresh;.ADOTabRemont.Edit;DM.ADOTabRemontВыполнена.Value=False then.ADOTabRemontВыполнена.Value:=True.ADOTabRemontВыполнена.Value:=False;.ADOTabRemont.Post;.ADOTabRemont.Refresh;;;TForm1.N10Click(Sender: TObject);.Form6.N1.Visible:=True;.Form6.ShowModal;;TForm1.N11Click(Sender: TObject);MessageBox(Handle,'УДАЛЕНИЕ ЗАКАЗА'+#10+

'Вы действительно хотите удалить заказ?'+#10+

'После нажатия на кнопку ДА, данные будут удалены.'+#10+

'Для отмены удаления нажмите на кнопку НЕТ.', 'ВНИМАНИЕ',

MB_YesNo+MB_ICONWARNING+MB_TaskModal) = mrYes Then.ADOTabZakaz.Delete;;;TForm1.N12Click(Sender: TObject);.ADOTabZakaz.Edit;DM.ADOTabZakazВызов.Value=False then.ADOTabZakazВызов.Value:=True.ADOTabZakazВызов.Value:=False;.ADOTabZakaz.Post;.ADOTabZakaz.Refresh;;TForm1.N13Click(Sender: TObject);.ADOTabZakaz.Edit;DM.ADOTabZakazДоставка.Value=False then.ADOTabZakazДоставка.Value:=True.ADOTabZakazДоставка.Value:=False;.ADOTabZakaz.Post;.ADOTabZakaz.Refresh;;TForm1.N14Click(Sender: TObject);.ADOTabZakaz.Edit;DM.ADOTabZakazВыполнен.Value=False then.ADOTabZakazВыполнен.Value:=True;.ADOTabZakazДатаВыполнения.Value:=Date();.ADOTabZakazВыполнен.Value:=False;.ADOTabZakazДатаВыполнения.Clear;;.ADOTabZakaz.Post;.ADOTabZakaz.Refresh;;TForm1.N15Click(Sender: TObject);.ADOTabZakaz.Edit;DM.ADOTabZakazОплата.Value='нал' then.ADOTabZakazОплата.Value:='безнал'.ADOTabZakazОплата.Value:='нал';.ADOTabZakaz.Post;.ADOTabZakaz.Refresh;;TForm1.N18Click(Sender: TObject);;.Checked:=True;.Caption:='ГОТОВ (вкл.)';.ADOTabZakaz.Filter:='Выполнен=True';.ADOTabZakaz.Filtered:=True;;TForm1.N19Click(Sender: TObject);;.Checked:=True;

BitBtn3.Caption:='НЕ ГОТОВ (вкл.)';.ADOTabZakaz.Filter:='Выполнен=False';

DM.ADOTabZakaz.Filtered:=True;;TForm1.N20Click(Sender: TObject);;.Checked:=True;.Caption:='ДАТА (вкл.)';.ADOTabZakaz.Filter:='ДатаЗаказа='+DateToStr(DM.ADOTabZakazДатаЗаказа.Value);.ADOTabZakaz.Filtered:=True;;TForm1.N21Click(Sender: TObject);.Form8.ShowModal;;TForm1.N22Click(Sender: TObject);;.Checked:=True;.Caption:='№ТЕХ. (вкл.)'; DM.ADOTabZakaz.Filter:='НомерТехники='+Chr(39)+DM.ADOTabZakazНомерТехники.Value+Chr(39);.ADOTabZakaz.Filtered:=True;;TForm1.N24Click(Sender: TObject);;.Checked:=True;.Caption:='МАСТЕР (вкл.)';.ADOTabZakaz.Filter:='КодМастера='+IntToStr(DM.ADOTabZakazКодМастера.Value);.ADOTabZakaz.Filtered:=True;;TForm1.N26Click(Sender: TObject);;.ADOTabZakaz.Filtered:=False;;TForm1.N28Click(Sender: TObject);, Save: OleVariant;: string;DM.ADOTabZakazНомерЗаказа.Value=Null Then('Выберите заказ!');;;:=ExtractFilePath(Application.ExeName)+'Doc1.doc';:=IntToStr(DM.ADOTabZakazНомерЗаказа.Value);:=ExtractFilePath(Application.ExeName)+'Doc\Справка №'+St+'.doc';.WordApplication1.Connect;.Minimize;.WordApplication1.Documents.Open(N,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam);.WordDocument1.ConnectTo(DM.WordApplication1.ActiveDocument).WordDocument1.SaveAs(Save);.WordDocument1.Tables.Item(1).Cell(14,2).Range.InsertBefore(St);:=DM.ADOTabZakazКлиент.Value;.WordDocument1.Tables.Item(1).Cell(3,2).Range.InsertBefore(St);:=DM.ADOTabZakazТелефон.Value;.WordDocument1.Tables.Item(1).Cell(4,2).Range.InsertBefore(St);:=DM.ADOTabZakazФакс.Value;.WordDocument1.Tables.Item(1).Cell(5,2).Range.InsertBefore(St);:=DM.ADOTabZakazАдрес.Value;.WordDocument1.Tables.Item(1).Cell(6,2).Range.InsertBefore(St);:=DM.ADOTabZakazEmail.Value;.WordDocument1.Tables.Item(1).Cell(7,2).Range.InsertBefore(St);:=DM.ADOTabZakazНомерТехники.Value;.WordDocument1.Tables.Item(1).Cell(9,2).Range.InsertBefore(St);:=DM.ADOTabZakazТехника.Value;.WordDocument1.Tables.Item(1).Cell(10,2).Range.InsertBefore(St);:=DM.ADOTabZakazМарка.Value;.WordDocument1.Tables.Item(1).Cell(11,2).Range.InsertBefore(St);:=DM.ADOTabZakazИмяТехники.Value;.WordDocument1.Tables.Item(1).Cell(12,2).Range.InsertBefore(St);:=DateToStr(DM.ADOTabZakazДатаЗаказа.Value);.WordDocument1.Tables.Item(1).Cell(15,2).Range.InsertBefore(St);

Except('Шаблон документа не найден!');

DM.WordApplication1.Disconnect;.Restore;;;;.WordApplication1.Disconnect;.Restore;;TForm1.N29Click(Sender: TObject);, Save: OleVariant;: integer;: string;DM.ADOTabZakazНомерЗаказа.Value=Null Then('Выберите заказ!');;;:=ExtractFilePath(Application.ExeName)+'Doc3.doc';:=IntToStr(DM.ADOTabZakazНомерЗаказа.Value);:=ExtractFilePath(Application.ExeName)+'Doc\Акт №'+St+'.doc';.WordApplication1.Connect;.Minimize;.WordApplication1.Documents.Open(N,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam);.WordDocument1.ConnectTo(DM.WordApplication1.ActiveDocument).WordDocument1.SaveAs(Save);.WordDocument1.Tables.Item(1).Cell(18,2).Range.InsertBefore(St);:=DM.ADOTabZakazКлиент.Value;.WordDocument1.Tables.Item(1).Cell(3,2).Range.InsertBefore(St);:=DM.ADOTabZakazТелефон.Value;.WordDocument1.Tables.Item(1).Cell(4,2).Range.InsertBefore(St);:=DM.ADOTabZakazФакс.Value;.WordDocument1.Tables.Item(1).Cell(5,2).Range.InsertBefore(St);:=DM.ADOTabZakazАдрес.Value;.WordDocument1.Tables.Item(1).Cell(6,2).Range.InsertBefore(St);:=DM.ADOTabZakazEmail.Value;.WordDocument1.Tables.Item(1).Cell(7,2).Range.InsertBefore(St);:=DM.ADOTabZakazНомерТехники.Value;.WordDocument1.Tables.Item(1).Cell(9,2).Range.InsertBefore(St);:=DM.ADOTabZakazТехника.Value;.WordDocument1.Tables.Item(1).Cell(10,2).Range.InsertBefore(St);:=DM.ADOTabZakazМарка.Value;.WordDocument1.Tables.Item(1).Cell(11,2).Range.InsertBefore(St);:=DM.ADOTabZakazИмяТехники.Value;.WordDocument1.Tables.Item(1).Cell(12,2).Range.InsertBefore(St);:=DM.ADOTabZakazМастер.Value;.WordDocument1.Tables.Item(1).Cell(14,2).Range.InsertBefore(St);:=DM.ADOTabZakazТелМастер.Value;.WordDocument1.Tables.Item(1).Cell(15,2).Range.InsertBefore(St);:=DM.ADOTabZakazСертификат.Value;.WordDocument1.Tables.Item(1).Cell(16,2).Range.InsertBefore(St);:=DateToStr(DM.ADOTabZakazДатаЗаказа.Value);.WordDocument1.Tables.Item(1).Cell(19,2).Range.InsertBefore(St);:=DateToStr(DM.ADOTabZakazДатаВыполнения.Value);.WordDocument1.Tables.Item(1).Cell(20,2).Range.InsertBefore(St);DM.ADOTabZakazВызов.Value=True then.WordDocument1.Tables.Item(1).Cell(21,2).Range.InsertBefore('ДА').WordDocument1.Tables.Item(1).Cell(21,2).Range.InsertBefore('НЕТ');DM.ADOTabZakazДоставка.Value=True then.WordDocument1.Tables.Item(1).Cell(22,2).Range.InsertBefore('ДА').WordDocument1.Tables.Item(1).Cell(22,2).Range.InsertBefore('НЕТ');:=Format('%m',[DM.ADOTabZakazСумма.Value]);.WordDocument1.Tables.Item(1).Cell(23,2).Range.InsertBefore(St);:=1;DM.ADOTabRemont do;not EOF do:=IntToStr(i);.WordDocument1.Tables.Item(2).Cell(2+i,1).Range.InsertBefore(St);:=DM.ADOTabRemontРабота.Value;.WordDocument1.Tables.Item(2).Cell(2+i,2).Range.InsertBefore(St);:=Format('%m',[DM.ADOTabRemontЦена.Value]);.WordDocument1.Tables.Item(2).Cell(2+i,3).Range.InsertBefore(St);.WordDocument1.Tables.Item(2).Rows.Add(EmptyParam);(i);;;;.WordDocument1.Tables.Item(2).Rows.Item(2+i).Delete;:=1;DM.ADOTabRashod do;not EOF do:=IntToStr(i);.WordDocument1.Tables.Item(3).Cell(2+i,1).Range.InsertBefore(St);:=DM.ADOTabRashodКатегория.Value;.WordDocument1.Tables.Item(3).Cell(2+i,2).Range.InsertBefore(St);:=DM.ADOTabRashodМатериал.Value;.WordDocument1.Tables.Item(3).Cell(2+i,3).Range.InsertBefore(St);:=Format('%m',[DM.ADOTabRashodЦена.Value]);.WordDocument1.Tables.Item(3).Cell(2+i,4).Range.InsertBefore(St);:=IntToStr(DM.ADOTabRashodКоличество.Value);.WordDocument1.Tables.Item(3).Cell(2+i,5).Range.InsertBefore(St);:=Format('%m',[DM.ADOTabRashodСумма.Value]);.WordDocument1.Tables.Item(3).Cell(2+i,6).Range.InsertBefore(St);.WordDocument1.Tables.Item(3).Rows.Add(EmptyParam);(i);;;;.WordDocument1.Tables.Item(3).Rows.Item(2+i).Delete;

Except('Шаблон документа не найден!');

DM.WordApplication1.Disconnect;.Restore;;;;.WordApplication1.Disconnect;.Restore;;TForm1.N30Click(Sender: TObject);, Save: OleVariant;: string;DM.ADOTabZakazНомерЗаказа.Value=Null Then('Выберите заказ!');;;:=ExtractFilePath(Application.ExeName)+'Doc2.doc';:=IntToStr(DM.ADOTabZakazНомерЗаказа.Value);:=ExtractFilePath(Application.ExeName)+'Doc\Наряд №'+St+'.doc';.WordApplication1.Connect;.Minimize;.WordApplication1.Documents.Open(N,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam);.WordDocument1.ConnectTo(DM.WordApplication1.ActiveDocument).WordDocument1.SaveAs(Save);.WordDocument1.Tables.Item(1).Cell(12,2).Range.InsertBefore(St);:=DM.ADOTabZakazМастер.Value;.WordDocument1.Tables.Item(1).Cell(3,2).Range.InsertBefore(St);:=DM.ADOTabZakazТелМастер.Value;.WordDocument1.Tables.Item(1).Cell(4,2).Range.InsertBefore(St);:=DM.ADOTabZakazСертификат.Value;.WordDocument1.Tables.Item(1).Cell(5,2).Range.InsertBefore(St);:=DM.ADOTabZakazНомерТехники.Value;.WordDocument1.Tables.Item(1).Cell(7,2).Range.InsertBefore(St);:=DM.ADOTabZakazТехника.Value;.WordDocument1.Tables.Item(1).Cell(8,2).Range.InsertBefore(St);:=DM.ADOTabZakazМарка.Value;.WordDocument1.Tables.Item(1).Cell(9,2).Range.InsertBefore(St);:=DM.ADOTabZakazИмяТехники.Value;.WordDocument1.Tables.Item(1).Cell(10,2).Range.InsertBefore(St);:=DateToStr(DM.ADOTabZakazДатаЗаказа.Value);.WordDocument1.Tables.Item(1).Cell(13,2).Range.InsertBefore(St);

Except('Шаблон документа не найден!');

DM.WordApplication1.Disconnect;.Restore;;;;.WordApplication1.Disconnect;.Restore;;TForm1.N31Click(Sender: TObject);.Form9.Panel3.Visible:=True;.Form9.ShowModal;;TForm1.N4Click(Sender: TObject);.Form9.Panel3.Visible:=False;.Form9.ShowModal;;TForm1.N5Click(Sender: TObject);.Form2.ShowModal;;TForm1.N6Click(Sender: TObject);.Form4.ShowModal;;TForm1.N7Click(Sender: TObject);.Form5.ShowModal;;TForm1.N8Click(Sender: TObject);.Form6.ShowModal;;TForm1.N9Click(Sender: TObject);.Form7.ShowModal;;.

Модуль данных (Unit3.pas)

unit Unit3;, Classes, DB, ADODB, Variants,, WordXP, OleServer;: TDM;Unit1, Unit2;

{$R *.dfm}TDM.ADOQSumRashodCalcFields(DataSet: TDataSet);Сумма.Value:=ADOQSumRashodSumцена.Value;;TDM.ADOQSumRemontCalcFields(DataSet: TDataSet);Цена.Value:=ADOQSumRemontSumЦенаРаботы.Value;;TDM.ADOTabMatAfterInsert(DataSet: TDataSet);ADOTabKatКодКатегории.Value = Null then

begin('Выберите категорию материала!');.Cancel;;;КодКатегории.Value:=ADOTabKatКодКатегории.Value;

end;TDM.ADOTabRashodAfterInsert(DataSet: TDataSet);ADOTabZakazНомерЗаказа.Value = Null then('Выберите заказ!');.Cancel;;;НомерЗаказа.Value:=ADOTabZakazНомерЗаказа.Value;.Form2.N1.Visible:=True;.Form2.ShowModal;;TDM.ADOTabRashodCalcFields(DataSet: TDataSet);ADOTabRashodСумма.Value:=ADOTabRashodЦена.Value*ADOTabRashodКоличество.Value;;TDM.ADOTabRashodRecordChangeComplete(DataSet: TCustomADODataSet;Reason: TEventReason; const RecordCount: Integer; const Error: Error;EventStatus: TEventStatus);.ADOQSumRashod.Close;.ADOQSumRashod.Filter:='НомерЗаказа='+IntToStr(ADOTabZakazНомерЗаказа.Value);.ADOQSumRashod.Filtered:=True;.ADOQSumRashod.Open;;TDM.ADOTabRemontAfterInsert(DataSet: TDataSet);ADOTabZakazНомерЗаказа.Value = Null then('Выберите заказ!');.Cancel;;;НомерЗаказа.Value:=ADOTabZakazНомерЗаказа.Value;;TDM.ADOTabTexnikaAfterInsert(DataSet: TDataSet);ADOTabKlientКодКлиента.Value = Null then('Выберите клиента!');.Cancel;;;КодКлиента.Value:=ADOTabKlientКодКлиента.Value;;TDM.ADOTabZakazCalcFields(DataSet: TDataSet);.ADOQSumRemont.Close;.ADOQSumRemont.Filter:='НомерЗаказа='+IntToStr(ADOTabZakazНомерЗаказа.Value);.ADOQSumRemont.Filtered:=True;.ADOQSumRemont.Open;.ADOQSumRashod.Close;.ADOQSumRashod.Filter:='НомерЗаказа='+IntToStr(ADOTabZakazНомерЗаказа.Value);.ADOQSumRashod.Filtered:=True;.ADOQSumRashod.Open; ADOTabZakazСумма.Value:=ADOQSumRemontSumЦенаРаботы.Value+ADOQSumRashodSumцена.Value;;TDM.DSZakazDataChange(Sender: TObject; Field: TField);ADOTabZakazВызов.Value=True then.Form1.BitBtn14.Caption:='ВЫЗОВ (откл.)'.Form1.BitBtn14.Caption:='ВЫЗОВ (вкл.)';ADOTabZakazДоставка.Value=True then.Form1.BitBtn15.Caption:='ДОСТАВКА (откл.)'.Form1.BitBtn15.Caption:='ДОСТАВКА (вкл.)';ADOTabZakazВыполнен.Value=True then.Form1.BitBtn2.Caption:='ГОТОВ (откл.)'.Form1.BitBtn2.Caption:='ГОТОВ (вкл.)';ADOTabZakazОплата.Value='нал' then.Form1.BitBtn16.Caption:='БЕЗНАЛ (вкл.)';.Form1.N15.Caption:='Наличный расчет';.Form1.BitBtn16.Caption:='НАЛ (вкл.)';.Form1.N15.Caption:='Безналичный расчет';;.ADOQSumRemont.Close;.ADOQSumRemont.Filter:='НомерЗаказа='+IntToStr(ADOTabZakazНомерЗаказа.Value);.ADOQSumRemont.Filtered:=True;.ADOQSumRemont.Open;.ADOQSumRashod.Close;.ADOQSumRashod.Filter:='НомерЗаказа='+IntToStr(ADOTabZakazНомерЗаказа.Value);.ADOQSumRashod.Filtered:=True;.ADOQSumRashod.Open;

end;.

Модуль формы «Расходные материалы» (Unit2.pas)

unit Unit2;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, DBCtrls, Grids, DBGrids, DBCGrids, Mask, ExtCtrls, Menus;: TForm2;Unit1, Unit3;

{$R *.dfm}TForm2.FormActivate(Sender: TObject);N1.Visible=True then

ShowMessage('Выберите расходные материалы для ремонта и нажмите на кнопку "Добавить расход"!');

end;TForm2.FormClose(Sender: TObject; var Action: TCloseAction);.ADOTabRashod.Cancel;.Visible:=False;;TForm2.N1Click(Sender: TObject);.ADOTabRashodКодМатериала.Value:=DM.ADOTabMatКодМатериала.Value;.ADOTabRashodКоличество.Value:=1;.ADOTabRashod.Post;.Close;;.

Модуль формы «Клиенты» (Unit6.pas)

unit Unit6;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, DBCtrls, ExtCtrls, StdCtrls, Grids, DBGrids, Menus;: TForm6;Unit1, Unit3, Unit7;

{$R *.dfm}TForm6.FormActivate(Sender: TObject);N1.Visible=True then

ShowMessage('Выберите технику клиента для ремонта и нажмите на кнопку "Добавить заказ"!');

end;TForm6.FormClose(Sender: TObject; var Action: TCloseAction);.ADOTabZakaz.Cancel;.Visible:=False;;TForm6.N1Click(Sender: TObject);.ADOTabZakaz.Insert;.ADOTabZakazНомерТехники.Value:=DM.ADOTabTexnikaНомерТехники.Value;.Close;.Form7.N1.Visible:=True;.Form7.ShowModal;;.

Модуль формы «Сотрудники» (Unit7.pas)

unit Unit7;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Grids, DBGrids, DBCtrls, ExtCtrls, StdCtrls, Menus;: TForm7;Unit1, Unit3;

{$R *.dfm}TForm7.FormActivate(Sender: TObject);N1.Visible=True then

ShowMessage('Выберите мастера для ремонта техники и нажмите на кнопку "Добавить заказ"!');

end;TForm7.FormClose(Sender: TObject; var Action: TCloseAction);.ADOTabZakaz.Cancel;.Visible:=False;;TForm7.N1Click(Sender: TObject);.ADOTabZakazКодМастера.Value:=DM.ADOTabMasterКодМастера.Value;.ADOTabZakazДатаЗаказа.Value:=Date();.ADOTabZakaz.Post;.Close;;.

Модуль формы «Период отчетности» (Unit9.pas)

unit Unit9;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, ExtCtrls, StdCtrls, Buttons, ComCtrls, DBCtrls;: TForm9;Unit1, Unit3;

{$R *.dfm}TForm9.BitBtn1Click(Sender: TObject);, Save: OleVariant;: integer;, St2: string;, SumBN, SumN: currency;Panel3.Visible=False Then:=ExtractFilePath(Application.ExeName)+'Doc4.doc';:=ExtractFilePath(Application.ExeName)+'Doc\Отчет №1.doc';.WordApplication1.Connect;.Minimize;.WordApplication1.Documents.Open(N,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam);.WordDocument1.ConnectTo(DM.WordApplication1.ActiveDocument).WordDocument1.SaveAs(Save);:=DateToStr(DateTimePicker1.Date);.WordDocument1.Tables.Item(1).Cell(3,2).Range.InsertBefore(St1);:=DateToStr(DateTimePicker2.Date);.WordDocument1.Tables.Item(1).Cell(4,2).Range.InsertBefore(St2);.ADOTabZakaz.Filter:='ДатаЗаказа>='+St1+' AND ДатаЗаказа<='+St2;.ADOTabZakaz.Filtered:=True;:=1; Sum:=0; SumN:=0; SumBN:=0;DM.ADOTabZakaz do;not EOF do:=IntToStr(i);.WordDocument1.Tables.Item(2).Cell(2+i,1).Range.InsertBefore(St1);:=DateToStr(DM.ADOTabZakazДатаЗаказа.Value);.WordDocument1.Tables.Item(2).Cell(2+i,2).Range.InsertBefore(St1);:=DM.ADOTabZakazТехника.Value;.WordDocument1.Tables.Item(2).Cell(2+i,3).Range.InsertBefore(St1);:=DM.ADOTabZakazНомерТехники.Value;.WordDocument1.Tables.Item(2).Cell(2+i,4).Range.InsertBefore(St1);:=DM.ADOTabZakazКлиент.Value;.WordDocument1.Tables.Item(2).Cell(2+i,5).Range.InsertBefore(St1);DM.ADOTabZakazВызов.Value=True then.WordDocument1.Tables.Item(2).Cell(2+i,6).Range.InsertBefore('ДА').WordDocument1.Tables.Item(2).Cell(2+i,6).Range.InsertBefore('НЕТ'):=DM.ADOTabZakazМастер.Value;.WordDocument1.Tables.Item(2).Cell(2+i,7).Range.InsertBefore(St1);:=DateToStr(DM.ADOTabZakazДатаВыполнения.Value);.WordDocument1.Tables.Item(2).Cell(2+i,8).Range.InsertBefore(St1);:=DM.ADOTabZakazОплата.Value;.WordDocument1.Tables.Item(2).Cell(2+i,9).Range.InsertBefore(St1);DM.ADOTabZakazДоставка.Value=True then.WordDocument1.Tables.Item(2).Cell(2+i,10).Range.InsertBefore('ДА').WordDocument1.Tables.Item(2).Cell(2+i,10).Range.InsertBefore('НЕТ');:=Format('%m',[DM.ADOTabZakazСумма.Value]);.WordDocument1.Tables.Item(2).Cell(2+i,11).Range.InsertBefore(St1);:=Sum+DM.ADOTabZakazСумма.Value;DM.ADOTabZakazОплата.Value='нал' then:=SumN+DM.ADOTabZakazСумма.Value;DM.ADOTabZakazОплата.Value='безнал' then:=SumBN+DM.ADOTabZakazСумма.Value;.WordDocument1.Tables.Item(2).Rows.Add(EmptyParam);(i);;;;.WordDocument1.Tables.Item(2).Rows.Item(2+i).Delete;:=Format('%m',[SumN]);.WordDocument1.Tables.Item(3).Cell(1,2).Range.InsertBefore(St1);:=Format('%m',[SumBN]);.WordDocument1.Tables.Item(3).Cell(2,2).Range.InsertBefore(St1);:=Format('%m',[Sum]);.WordDocument1.Tables.Item(3).Cell(3,2).Range.InsertBefore(St1);

Except('Шаблон документа не найден!');

DM.WordApplication1.Disconnect;.Restore;;;;.WordApplication1.Disconnect;.Restore;.ADOTabZakaz.Filtered:=False;;Panel3.Visible=True Then:=ExtractFilePath(Application.ExeName)+'Doc5.doc';:=ExtractFilePath(Application.ExeName)+'Doc\Отчет №2.doc';.WordApplication1.Connect;.Minimize;.WordApplication1.Documents.Open(N,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,,EmptyParam,EmptyParam,EmptyParam,EmptyParam);.WordDocument1.ConnectTo(DM.WordApplication1.ActiveDocument).WordDocument1.SaveAs(Save);:=DateToStr(DateTimePicker1.Date);.WordDocument1.Tables.Item(1).Cell(3,2).Range.InsertBefore(St1);:=DateToStr(DateTimePicker2.Date);.WordDocument1.Tables.Item(1).Cell(4,2).Range.InsertBefore(St2);.ADOTabZakaz.Filter:='ДатаЗаказа>='+St1+' AND ДатаЗаказа<='+St2+' AND КодМастера='+IntToStr(DM.ADOTabMasterКодМастера.Value);.ADOTabZakaz.Filtered:=True;:=DM.ADOTabZakazМастер.Value;.WordDocument1.Tables.Item(1).Cell(5,2).Range.InsertBefore(St1);:=1; Sum:=0;DM.ADOTabZakaz do;not EOF do:=IntToStr(i);.WordDocument1.Tables.Item(2).Cell(2+i,1).Range.InsertBefore(St1);:=DateToStr(DM.ADOTabZakazДатаЗаказа.Value);.WordDocument1.Tables.Item(2).Cell(2+i,2).Range.InsertBefore(St1);:=DM.ADOTabZakazТехника.Value;.WordDocument1.Tables.Item(2).Cell(2+i,3).Range.InsertBefore(St1);:=DM.ADOTabZakazНомерТехники.Value;.WordDocument1.Tables.Item(2).Cell(2+i,4).Range.InsertBefore(St1);:=DM.ADOTabZakazКлиент.Value;.WordDocument1.Tables.Item(2).Cell(2+i,5).Range.InsertBefore(St1);DM.ADOTabZakazВызов.Value=True then.WordDocument1.Tables.Item(2).Cell(2+i,6).Range.InsertBefore('ДА').WordDocument1.Tables.Item(2).Cell(2+i,6).Range.InsertBefore('НЕТ'):=DM.ADOTabZakazМастер.Value;.WordDocument1.Tables.Item(2).Cell(2+i,7).Range.InsertBefore(St1);:=DateToStr(DM.ADOTabZakazДатаВыполнения.Value);.WordDocument1.Tables.Item(2).Cell(2+i,8).Range.InsertBefore(St1);:=DM.ADOTabZakazОплата.Value;.WordDocument1.Tables.Item(2).Cell(2+i,9).Range.InsertBefore(St1);DM.ADOTabZakazДоставка.Value=True then.WordDocument1.Tables.Item(2).Cell(2+i,10).Range.InsertBefore('ДА').WordDocument1.Tables.Item(2).Cell(2+i,10).Range.InsertBefore('НЕТ');:=Format('%m',[DM.ADOTabZakazСумма.Value]);.WordDocument1.Tables.Item(2).Cell(2+i,11).Range.InsertBefore(St1);:=Sum+DM.ADOTabZakazСумма.Value;.WordDocument1.Tables.Item(2).Rows.Add(EmptyParam);(i);;;;.WordDocument1.Tables.Item(2).Rows.Item(2+i).Delete;:=Format('%m',[Sum]);.WordDocument1.Tables.Item(3).Cell(1,2).Range.InsertBefore(St1);

Except('Шаблон документа не найден!');

DM.WordApplication1.Disconnect;.Restore;;;;.WordApplication1.Disconnect;.Restore;.ADOTabZakaz.Filtered:=False;;;.

Оглавление Введение . Аналитическая часть .1 Технико-экономическая характеристика и анализ деятельности предприятия .1.1 Общая характеристика пр

Больше работ по теме: