Информационная система управления качеством. Создание программного обеспечения на основе библиотеки ITIL. Подсистема автоматизации процесса "Служба Service Desk"

Дата/время

8

ВремяЗакрытия

Дата/время

8

КодКатегории

Длинное целое

4

ПервичноеРешение

Текстовый

250

КодОтветственного

Длинное целое

4

КодКлиента

Длинное целое

4

КодПриоритета

Длинное целое

4

Таблица: Сотрудники

	Имя	Тип	Размер
	КодСотрудника	Длинное целое	4
	Фамилия	Текстовый	25
	Имя	Текстовый	20
	Отчество	Текстовый	20
	МестоРаботы	Длинное целое	4
	Телефон	Текстовый	10
	E-Mail	Текстовый	30
	КодОтдела	Длинное целое	4

Таблица: СтатусЗаявки

	Имя	Тип	Размер
	КодСтатусаЗаявки	Длинное целое	4
	СтатусЗаявки	Текстовый	50

2.1.4 Генерация базы данных

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

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

Для генерации схемы данных сущность-связь в физическую базу данных в качестве CASE-средства был выбран программный продукт ERwin. Для корректной генерации схемы данных необходимо внести изменения в тексты шаблонов, используемые ERwin при создании таблиц и триггеров в целевую базу данных. После того, как файлы шаблонов и сама схема БД готовы, необходимо воспользоваться методом «Forward Engineer\Schema Generation» - именно этот метод и осуществляет генерацию схемы данных в физическую существующую базу данных (рисунок 2.5).



3. УПРАВЛЕНИЕ ПРОЕКТОМ РАЗРАБОТКИ ИС

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

3.1 Техническое задание

Аннотация

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

Цель проекта

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

Задачи проекта

1. Оптимизировать работу службы технической поддержки Servise Desk и, как результат, сократить затраты (временные и финансовые) на обработку и решение запросов пользователей ИТ-услуг

2. Повысить контроль за предоставлением ИТ-услуг

3. Повысить прозрачность процессов предоставления ИТ-услуг для пользователей.

1. Общие сведения

1.1 Наименование темы

Полное наименование темы:

Разработка информационной системы Служба Service Desk.

Условное обозначение темы:

ИС «Service Desk».

1.2 Наименования Исполнителя и Заказчика работ

Исполнитель:

студент группы БШЗ-422 Маркин Всеволода Александровича

Заказчик:

Федеральное государственное автономное образовательное учреждение высшего образования «Южно-Уральский государственный университет (национальный исследовательский университет)»

1.3 Этапы работ по разработке программного обеспечения

Для разработки Служба Service Desk необходимо включать следующие этапы:

- обследование функций Службы Service Desk;

- проектирование моделей базы данных;

- разработка интерфейса программного обеспечения;

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

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

- обучение пользователей.

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

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

1.4 Методика проведения обучения

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

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

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

- Фамилия, имя, отчество обучаемого лица

- Дата проведения обучения;

- Подпись обучаемого лица

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

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

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

- подготовку рабочих мест для обучаемых;

- подготовку рабочего места для преподавателя;

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

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

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

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

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

Обучение технических специалистов должно проводиться в несколько этапов:

- Теоретическая часть (лекции);

- Тестирование пользователей - проверка приобретенных знаний и навыков.

Обучение производится сотрудником со стороны Объекта внедрения.

2. Требования к техническому и программному обеспечению

2.1 Требования к техническим средствам серверов

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

- процессор: Pentium 4;

- тактовая частота: 1.2 ГГц;

- оперативная память: 256 Мбайт;

- дополнительная дисковая память (на системные компоненты):10 Гбайт;

- CD-ROM устройство;

- сетевой адаптер;

- терминал;

- устройство резервного копирования;

- источник бесперебойного питания.

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

2.3 Требования к программному обеспечению

ПО рабочих мест пользователей (рабочих станций) должно быть оснащено операционными системами (ОС) Windows XP/7, офисными средствами MS Office версии не ниже 2000 (Word, Excel) или OpenOffice, средствами Internet Explorer не ниже версии 6.0.

ПО сервера должно быть оснащено Windows 2000 Server SP4 (MSXML 4.0, MDAC 2.7), СУБД MySQL 4.0 (или более поздними версиями). В ОС Windows должна быть установлена поддержка русского языка.

3.2 Разработка сетевого графика

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

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

- задачи;

- ресурсы;

- назначения.

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

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

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

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

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

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

На рисунке 3.1 представлен список задач и диаграмма Ганта. Диаграмма Ганта названа в честь Генри Ганта (1861-1919). В MS Project 2010 диаграмма Ганта - это основное средство визуализации плана проекта. На диаграмме Ганта рядом с отрезками может отображаться дополнительная информация.

Размещено на http://www.allbest.ru/

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

В отличие от классического сетевого графика, на котором работам соответствуют дуги, а события - вершины, в MS Project 2010 работам соответствуют вершины, а дуги переходам от одной работы к другой.

На рисунке 3.2 представлен сетевой график выполнения работ выпускной квалификационной работы по разработке информационной системы «ServiceDesk».

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

3.3.1 Начало работы с Информационной Системой «ServiceDesk»

После запуска программы MS Access автоматически открывается главная страница ИС «ServiceDesk» (рисунок 3.3), которая содержит ряд управляющих кнопок.



На Главной странице ИС представлены:

- Заявки, кнопка которая открывает список заявок поступающие от пользователей, сортированных по регистрационному номеру;

- Сотрудники Service Desk, открывает список сотрудников Service Desk с контактной информацией;

- Клиенты, открывает список пользователей с контактной информацией;

- Отделы Service Desk, Статус заявки, Категории заявки, Приоритет, открывают формы для ввода справочной информации, необходимой для работы с ИС;

- Отчеты, открывает страницу для формирования отчетов

3.3.2 Работа со списком заявок

Переход к спискам заявок пользователя, сортированных по регистрационному номеру, осуществляется по кнопке с Главной страницы (рисунок 3.4).

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

3.3.3 Фильтрация списка заявок

В Информационной Системе предусмотрена возможность фильтрации списка заявок.

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

3.3.4 Создание заявки

При нажатии кнопки «Новая заявку» на карточке заявке откроется форма создания новой заявки (рисунок 3.6).

Для создания заявки необходимо заполнить ее поля.

Обязательные для заполнения являются поля:

Номер заявки - регистрация заявки;

Описание заявки - текст, отражающий суть заявки;

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

3.3.5 Обработка заявки Диспетчером

После заполнения обязательных полей заявка будет сохранена. Созданная заявка будет отображена в списк заявок.

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

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

Поля, обязательны для заполнения:

Приоритет заявки - заполняется из выпадающего списка - Средний, Высокий, Низкий;

Категория - заполняется из справочника категорий - Инцидент, Запрос на изменение, Проблема, Запрос на обслуживание;

Ответственный - сотрудники, ответственные за исполнение задачи.

Оператор - сотрудник Службы Service Desk, принявший заявку.

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

В Системе предусмотрена возможность создания отчетов о затраченном времени на исполнение заявки. Для этого необходимо в карточки заявки на указать Дату поступления заявки и Дату закрытия заявки.

3.3.6 Обработка заявки после исполнения

После обработки заявки, Диспетчер отправляет ее на исполнение. После принятия решения по заявки необходимо открыть карточку заявки на редактирование (Рисунок 3.8).

Диспетчер должен заполнить поле Действие, ввести результат:

Эскалация - позволяет отправить заявку на исполнение на следующую линию поддержки;

Запрос дополнительной информации - позволяет запросить дополнительную информацию у Клиента;

Запрос смены исполнителя - позволяет запросить смену ответственного исполнителя;

Плановый инцидент (запрос на обслуживание) - позволяет отклонить исполнение заявки;

Инцидент (запрос на обслуживание) решен. Если указан данный результат то Исполнитель указывает особенности выполнения заявки.

3.3.7 Заполнение справочников

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

Информация о сотрудниках заполняется на форме Сотрудники Service Desk (рисунок 3.9).

На форме необходимо заполнить поля:

Фамилия, Имя, Отчество;

Телефон - контактный телефон;

Почта - адрес электронной почты;

Отдел - выбирается из выпадающего списка. На рисунке 3.10 форма для ввода отделов.

При регистрации заявки, из выпадающих списков выбирается Категория, Приоритет и Статус заявки. Эта информация вводится в соответствующие формы (рисунок 3.11)

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

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

С этой страницы можно сформировать:

Список сотрудников Службы Service Desk, сгруппированную по отделам Службы Service Desk и содержащую электронный адрес и контактный телефон (рисунок 3.13).

Размещено на http://www.allbest.ru/

Список Клиентов, содержащую Фамилию, Имя, Отчество клиентов электронный адрес и контактный телефон (рисунок 3.14).

Размещено на http://www.allbest.ru/

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

Размещено на http://www.allbest.ru/

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

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



Размещено на http://www.allbest.ru/

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

Для выхода из Системы необходимо нажать на кнопку Выход на Главной странице.

ЗАКЛЮЧЕНИЕ

В процессе работы над выпускной квалификационной работой были изучены основы библиотеки ITIL и в частности проанализирована работа Службы Service Desk. После анализа было решено разработать и внедрить ИС «Service Desk».

Служба Service Desk играет важную роль в поддержке пользователей. Наличие Service Desk в организации обеспечивает единую точку входа. Это играет большое значение в отношении пользователей и ИТ-специалистами, так отпадает необходимость искать самим нужного специалиста, и пользователь всегда знает, куда ему обратиться с проблемами.

При отказе от внедрения Service Desk будут возникать «очереди» заявок у высококвалифицированных ИТ-специалистов, которые будут неэффективно тратить свои ресурсы.

Запуск ИС службы Service Desk позволит разрешить до 70% заявок на первой линии благодаря накоплению базы знаний и другим преимуществам правильно организованных процессов. Это сэкономит время высокооплачиваемых специалистов, и они направят его для решения более важных задач. Оставшиеся 30% заявок маршрутизируются таким образом, что гарантируется их скорейшее решение.

В процессе рамках выпускной квалификационной работой были разработаны функциональная, логическая и физическая модели. На их основе в среде Access, была создана информационная система «Service Desk».

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

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

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

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

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

Если у вас есть Service Desk, то вы сможете доступным бизнесу языком объяснить, что у вас происходит, какие есть проблемы, какие есть способы их устранения, стоимость устранения и стоимость рисков в случае не устранения.

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

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1. Алехин, З.А. ITIL -- основа концепции управления ИТ-сервисами.// Открытые системы, март 2001. -- с. 32-36.

2. Автоматизированные Системы Стадии создания. ГОСТ 34.601-90. Комплекс стандартов на автоматизированные системы, ИПК издательство стандартов. 1997

3. Бекаревич, Ю. Access за 21 занятие для студента / Ю. Бекаревич. -- М.: БХВ-Петербург, 2010. -- 525 c.

4. Бекаревич, Ю. Самоучитель Access 2010 (+ CD-ROM) / Ю. Бекаревич , Нина Пушкина. -- М.: БХВ-Петербург, 2011. --- 432 c.

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

6. Баранчеев, В.П. и др. Управление инновациями. Учебник для бакалавров / В. П. Баранчеев, Н. П. Масленникова, В. М. Мишин. -- 2-е изд., пе- рераб. и доп. -- М.: Юрайт; 2012. -- 711 с.

7. Брукс Питер. Метрики для управления ИТ-услугами. - М.: Альпина Бизнес Букс, 2008. - 283 с.

8. Глушаков, С. В. Microsoft Access 2007: лучший самоучитель / С. В. Глушаков, А. С. Сурядный, М. И. Шумилов. - 2-е изд., испр. и доп. -- М.: АСТ, 2008. -- 444 с.

9. Гурвиц, Г. Microsoft Access 2010. Разработка приложений на реальном примере / Г. Гурвиц. -- СПб.: БХВ-Петербург, 2010. -- 496 с.

10. Гандерлой, Майк; Харкинз, Сьюзан Сейлз Автоматизация Microsoft Access с помощью VBA; М.: Вильямс - Москва, 2006. -- 416 c

11. Дубейковский, В. И. Эффективное моделирование с CA ERwin® Process Modeler : BPwin; AllFusion Process Modeler Диалог-МИФИ, 2009 - 384с.

12. Епанешников, А. М. Практика создания приложений в ACCESS 2007 / А. М. Епанешников, В. А. Епанешников. -- М.: Диалог-МИФИ, 2009. -- 440 с.

13. Журавлев, Роман. Иллюстрированный ITSM. Наблюдения тренера- консультанта. -- М.: Лайвбук, 2013. -- 126 c.

14. Итилиум. Service desk, helpdesk, управление IT-helpdesk [Электронный ресурс] - Режим доступа: http://www.itilium.ru/

15. Ингланд Р. Овладевая ITIL. Скептическое руководство для ответственных лиц. -- М.: Лайвбук, 2011. -- 65 с.

16. SERVICE DESK [Электронный ресурс] - Режим доступа: http://www.komplit.by/products/63/

17. ГОСТ 34.602-89 Информационная технология. Комплекс стандартов на автоматизированные системы. Техническое задание на создание авто- матизированной системы [Текст]. - Взамен ГОСТ 24.201-85; введ. 1990 - 01 - 01. - Москва: Межгос. Совет по стандартизации, метрологии и сертификации; Москва: Изд-во стандартов, 2002. - 7 с.

18. Кошелев, В. Е. Базы данных Access 2007 / В. Е. Кошелев. -- М.: БИНОМ, 2013. -- 592 с

19. Каталог: отечественные ITSM-системы [Электронный ресурс] - Режим доступа: http://www.itsmonline.ru/software/for.php

20. Кудричевский Б.Ю. Введение в ITIL: Основные понятия (The ITIL Story) Version 3.0: Учебное пособие. - Санкт-Петербург: Pink Elephant, 2002. - 12 с.

21. Конаков С. Основы ITIL- принципы организации ИТ-подразделения компании (Часть1). -М.: ooo «5-55»,2007,-114с.

22. Конаков, С . Service Desk, incident&Problem Management. Управление Инцидентами и Проблемами (Часть 2). - М.: ooo «5-55»,2006. - 181с.

23. Лучшие практики ITIL/ITSM [Электронный ресурс] - Режим доступа: http://www.terrasoft.ru/products/service_desk/definition

24. Microsoft Office Access 2007. Библия пользователя [Текст] : пер. с англ. / М. Грох [и др.]. -- М. ; СПб. ; Киев : Диалектика, 2009. - 1200 с.

25. Маклаков С.В. BPWin, ERWin. CASE - средства разработки информационных систем. - М.: Диалог-МИФИ, 2009.

26. Осетрова И.С. Управление проектами в Microsoft Project 2010 - СПб: НИУ ИТМО, 2013. - 69 с.

27. Основы работы с AllFusion Process Modeler : методические указания по дисциплине «Автоматизированное проектирование информационных систем» для студентов направления 230100 «Информатика и вычислительная техника» / сост. В. А. Фролов. - Ульяновск : УлГТУ, 2014 - 39 с.

28. Сапунцов, В.Д., Применение CASE-средств BPwin и ERwin для проектирования информационных систем. Компьютерный практикум / М.А.Лысенко, Ф.Я.Султанов, А.А. Игнатов-М.: РГУ нефти и газа, 2000. -53 с.

29. Сурядный, А. С. Microsoft Access 2010. Лучший самоучитель / А.С. Сурядный. - М.: Астрель, ВКТ, 2012. - 448 c.

30. Сеннов, А. С. Access 2010: учебный курс / А. С. Сеннов. - СПб. : Питер, 2010.- 288 с.

ПРИЛОЖЕНИЕ А

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

Форма: Главная

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Главная"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Private Sub Form_Open(Cancel As Integer)

11 DoCmd.MoveSize , , 5500, 5500

12 End Sub

13

14 Private Sub Кнопка228_Click()

15 DoCmd.OpenForm "Сотрудники"

16 End Sub

17

18 Private Sub Кнопка229_Click()

19 DoCmd.OpenForm "Статус"

20 End Sub

21

22 Private Sub Кнопка231_Click()

23 DoCmd.OpenForm "Отчеты"

24 End Sub

25

26 Private Sub Кнопка232_Click()

27 DoCmd.Quit

28 End Sub

29

30 Private Sub Кнопка233_Click()

31 DoCmd.OpenForm "Клиенты"

32 End Sub

33

34 Private Sub Кнопка234_Click()

35 DoCmd.OpenForm "Отделы"

36 End Sub

37

38 Private Sub Кнопка235_Click()

39 DoCmd.OpenForm "Категория"

40 End Sub

41

42 Private Sub Кнопка236_Click()

43 DoCmd.OpenForm "Приоритет"

44 End Sub

45

46 Private Sub Личные_данные_сотрудника_Click()

47 DoCmd.OpenForm "Заявки"

48 End Sub

Форма: ДвижениеЗаявки

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_ДвижениеЗаявки"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка14_Click()

13 On Error GoTo Err_Кнопка14_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка14_Click:

20 Exit Sub

21

22 Err_Кнопка14_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка14_Click

25

26 End Sub

Форма: Заявки

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Заявки"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка44_Click()

13 DoCmd.OpenForm "Клиенты"

14 End Sub

15

16 Private Sub Кнопка50_Click()

17 ПолеСоСписком47 = Null

18 Me.Requery

19 End Sub

20

21 Private Sub Кнопка51_Click()

22 DoCmd.OpenForm "ОтчетПользователю", , , "КодЗаявки=" & КодЗаявки

23 End Sub

24

25 Private Sub Список45_AfterUpdate()

26 ' Поиск записи, соответствующей этому элементу управления.

27 Dim rs As Object

28

29 Set rs = Me.Recordset.Clone

30 rs.FindFirst "[КодЗаявки] = " & Str(Nz(Me![Список45], 0))

31 If Not rs.EOF Then Me.Bookmark = rs.Bookmark

32 End Sub

33

34 Private Sub ПолеСоСписком47_AfterUpdate()

35 Me.Requery

36 End Sub

Форма: Категория

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Категория"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка4_Click()

13 On Error GoTo Err_Кнопка4_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка4_Click:

20 Exit Sub

21

22 Err_Кнопка4_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка4_Click

25

26 End Sub

Форма: Клиенты

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Клиенты"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка18_Click()

13 On Error GoTo Err_Кнопка18_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка18_Click:

20 Exit Sub

21

22 Err_Кнопка18_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка18_Click

25

26 End Sub

27

28 Private Sub Кнопка14_Click()

29 On Error GoTo Err_Кнопка14_Click

30

31

32 DoCmd.GoToRecord , , acNewRec

33

34 Exit_Кнопка14_Click:

35 Exit Sub

36

37 Err_Кнопка14_Click:

38 MsgBox Err.Description

39 Resume Exit_Кнопка14_Click

40

41 End Sub

Форма: ОтчетПользователю

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_ОтчетПользователю"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка14_Click()

13 On Error GoTo Err_Кнопка14_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка14_Click:

20 Exit Sub

21

22 Err_Кнопка14_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка14_Click

25 End Sub

Форма: Отчеты

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Отчеты"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Private Sub Form_Open(Cancel As Integer)

11 DoCmd.MoveSize , , 6500, 7000

12 End Sub

13

14 Private Sub Кнопка237_Click()

15 DoCmd.Close

16 End Sub

17

18 Private Sub Кнопка2_Click()

19 DoCmd.OpenReport "Клиенты", acViewPreview

20 End Sub

21

22 Private Sub Кнопка3_Click()

23 DoCmd.OpenReport "Заявки", acViewPreview

24 End Sub

25

26 Private Sub Кнопка1_Click()

27 DoCmd.OpenReport "Сотрудники", acViewPreview

28 End Sub

29

30 Private Sub Кнопка4_Click()

31 DoCmd.OpenReport "Заявки_месяц", acViewPreview

32 End Sub

33

34 Private Sub Кнопка5_Click()

35 DoCmd.OpenReport "Заявки_квартал", acViewPreview

36 End Sub

Форма: Приоритет

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Приоритет"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка4_Click()

13 On Error GoTo Err_Кнопка4_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка4_Click:

20 Exit Sub

21

22 Err_Кнопка4_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка4_Click

25 End Sub

Форма: Службы

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Службы"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка4_Click()

13 On Error GoTo Err_Кнопка4_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка4_Click:

20 Exit Sub

21

22 Err_Кнопка4_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка4_Click

25

26 End Sub

Форма: Сотрудники

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Сотрудники"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка18_Click()

13 On Error GoTo Err_Кнопка18_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка18_Click:

20 Exit Sub

21

22 Err_Кнопка18_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка18_Click

25

26 End Sub

Форма: Статус

Программы

1 VERSION 1.0 CLASS

2 BEGIN

3 MultiUse = -1 'True

4 END

5 Attribute VB_Name = "Form_Статус"

6 Attribute VB_GlobalNameSpace = False

7 Attribute VB_Creatable = True

8 Attribute VB_PredeclaredId = True

9 Attribute VB_Exposed = False

10 Option Compare Database

11

12 Private Sub Кнопка4_Click()

13 On Error GoTo Err_Кнопка4_Click

14

15

16 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

17 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

18

19 Exit_Кнопка4_Click:

20 Exit Sub

21

22 Err_Кнопка4_Click:

23 MsgBox Err.Description

24 Resume Exit_Кнопка4_Click

25 End Sub

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