Создание АРМ диспетчера автоматизированной системы производственного отдела

Фрагмент классификатора участков представлен в Таблице 2.

4.

Таблица 2.

4.

Фрагмент классификатора бригад Код бригады Название участка К1, К2 Кузница М1, М2, М3 Механический участок Св1, Св2 Сварочный участок Сб1, Сб2 Сборочный участок Классификация номеров месяцев года стандартна: 1 — Январь, 2 — Февраль, …, 12 — Декабрь. Эта классификация позволяет использовать номер месяца в качестве первичного и вторичного ключа в связях БД.

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

5.

Таблица 2.5.

Характеристика справочников Название справочника Ответственный Средний объём справочника Средняя частота актуализации Средний объем актуализации Сборки Главный конструктор 1 000 1 раз в год 5−10 записей Детали Главный конструктор 5 000 1 раз год 50−100 записей Входимости Главный конструктор 10 000 1 раз в год 300−500 записей Производственные участки Системный администратор 5 — - Бригады Системный администратор 12 1 раз в год 1 запись Места обработки Главный технолог 5 000 1 раз в год Сотрудники Начальник отдела кадров 130 1 раз в месяц 1 запись Месяцы Системный администратор 12 — ;

Справочник сборочных единиц «Сборки». В этом справочнике хранится информация обо всех сборочных узлах, из которых собирается готовое оборудование. Актуализация этого справочника происходит по мере освоения новых конструкций. Структура и реквизитный состав справочника представлен в Таблице 2.

6.

Таблица 2.6.

Структура справочника «Сборки».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код сборочной единицы ID_ass Текстовый 12 байта 2 Название Assem_name Текстовый 20 байта Справочник Детали. Здесь хранится информация о всех деталях, которые входят в состав сборочных единиц. Актуализация этого справочника происходит по мере освоения новых конструкций. Структура и реквизитный состав справочника представлен в Таблице 2.

7.

Таблица 2.7.

Структура справочника «Детали».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код детали ID_part Текстовый 15 байта 2 Название детали Name_part Текстовый 20 байта 3 Трудоемкость изготовления Labor Числовой с плав. точкой 6 байт 4 Масса детали Massa Числовой с плав. точкой 6 байт Справочник Входимости. Этот справочник определяет спецификации, т. е. позволяет связать сборочные единицы и детали. В одну сборку может входить несколько деталей в различном количестве. Структура и реквизитный состав справочника представлен в Таблице 2.

8.

Таблица 2.8.

Структура справочника «Входимости».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код детали ID_vhodimosti Числовой счетчик 6 байт 2 Код сборки ID_ass Текстовый 12 байта 3 Код детали ID_part Текстовый 15 байт 4 Количество Quantity Числовое целое 4 байта Справочник производственных участков. В данном справочнике содержится информация о существующий участках в производственном отделе. Структура и реквизитный состав справочника представлен в Таблице 2.

9.

Таблица 2.9.

Структура справочника «Производственные участки».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код участка ID_ychastka Числовой 1 байт 2 Название участка Name_ ychastka Текстовый 20 байт Справочник мест обработки. В данном справочнике содержится связь деталей с местом их обработки (производственным участком). Это при составлении подетального плана позволяет четко определить, на каком участке должна обрабатываться конкретная деталь. Структура и реквизитный состав справочника представлен в Таблице 2.

10.

Таблица 2.10.

Структура справочника «Место обработки».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код записи ID_obrabotki Числовой счетчик 6 байт 2 Код детали ID_part Текстовый 15 байт 3 Код участка ID_ychastka Числовой 1 байт Справочник бригад. В этом справочнике содержатся названия бригад и их принадлежность к производственным участкам. Структура и реквизитный состав справочника представлен в Таблице 2.

11.

Таблица 2.11.

Структура справочника «Бригады».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код записи ID_brigadi Текстовый 4 байт 2 Код участка ID_ychastka Числовой 1 байт Справочник сотрудников. В этом справочнике содержится информация о каждом сотруднике, работающем в компании. Для работы автоматизированной системы диспетчирования необходим следующий состав справочника «Сотрудники» (Таблица 2.12):

Таблица 2.12.

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

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Табельный номер ID_worker Текстовый 4 байт 2 ФИО FIO Текстовый 70 байт 3 Разряд Skill_ worker Числовой 1 байт 4 Бригада ID_brigadi Текстовый 4 байт Справочник месяцев. Содержит в себе номер и название всех месяцев года. Структура и реквизитный состав справочника представлен в Таблице 2.

13.

Таблица 2.13.

Структура справочника «Месяцы».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Номер месяца ID_month Числовой 1 байт 2 Название месяца Name_ month Текстовый 10 байт Все справочники находятся в отдельных таблицах БД. Т.к. у АРМ диспетчера не будет доступа к серверу, информация из справочников будет импортироваться на рабочее место диспетчера и актуализироваться по мере необходимости. Актуализацией БД диспетчера будет заниматься системный администратор компании.

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

1. Месячный план поступает к диспетчеру производственного отдела в разрезе сборочных единиц. Реквизитный состав входного документа «Месячный план» представлен в Таблице 2.

14.

Таблица 2.14.

Структура входного документа «Месячный план».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код записи ID_pos_plan Числовой счетчик 4 байт 2 Номер месяца ID_month Числовой 1 байт 3 Код сборки ID_ass Текстовый 12 байт 4 Количество Plan_quantity Числовой 4 байт Месячный план будет приноситься в диспетчерскую службу в электронном виде на съемных носителях и экспортироваться в таблицу БД «Месячный план». В разрабатываемой системе будет предусмотрена возможность просмотреть месячный план, но внесение в него изменений будет запрещено.

Характеристика базы данных На основании построенной модели бизнес-процессов при помощи Case-средства Erwin Data Modeler была разработана логическая и физическая модель базы данных (БД) для решения комплекса поставленных задач. Логический уровень — это абстрактный взгляд на данные, на нем данные представляются так, как выглядят в реальном мире, и могут называться так, как они называются в реальном мире. Логическая модель данных является универсальной и никак не связана с конкретной реализацией СУБД. [18]. На Рис. 2.5 представлена полная атрибутивная модель. Это наиболее детальное представление структуры данных: представляет данные в третьей нормальной форме и включает все сущности, атрибуты и связи.

Рис. 2.5 Инфологическая модель базы данных Физическая модель данных, напротив, зависит от конкретной СУБД, фактически являясь отображением системного каталога. В физической модели содержится информация о всех объектах БД. Одной и той же логической модели могут соответствовать несколько разных физических моделей. Если в логической модели не имеет значения, какой конкретно тип данных имеет атрибут, то в физической модели важно описать всю информацию о конкретных физических объектах — таблицах, колонках, индексах, процедурах и т. д. [ 18]. С помощью Erwin на основании построенной логической модели была получена физическая модель для СУБД Microsoft Access 2003 (Рис.

2.6). Все имена атрибутов и таблиц в данной модели переименованы для удобства дальнейшего оперирования данными. На схеме можно видеть тип данных каждого атрибута.

Рис. 2.6 Физическая модель БД.

Окончательная схема БД, полученная в результате генерации БД в Microsoft Access 2003, представлена на Рис. 2.

7.

Рис. 2.7 Схема данных в СУБД Microsoft Access.

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

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

1.4. 4). Если в подетальный план попадают одинаковые детали, их количество суммируется и в таблицу БД попадает только одна запись. Перед сохранением подетального плана можно его изучить и при необходимости вручную изменить расчетное количество деталей. Форму документа подетального плана можно посмотреть в Приложение, А (Рис. А.2). Экранная форма для формирования подетального плана представлена на Рис. 2.27 в разделе 2.

5. Реквизитный состав подетального плана представлен в Таблице 2.

15. Поля 1, 2, 3, 6 заносятся в таблицу БД «Подетальный план». Хранить в таблице поля 4 и 5 нет необходимости, т.к. по связи с таблицей «Детали» значение этих показателей можно будет подключить в любой момент.

Таблица 2.15.

Структура результатного документа «Подетальный план».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код записи ID_part_plan Числовой счетчик 4 байт 2 Номер месяца ID_month Числовой 1 байт 3 Код детали ID_part Текстовый 15 байт 4 Название детали Name_part Текстовый 20 байт 5 Трудоемкость Labor Числовой 6 байт 6 Количество Quantity_plan Числовой 4 байт После сохранения подетального плана имеется возможность произвести его АВС-анализ и создать на его основе АВС подетальный план. В результате анализа будет произведен расчет общей трудоемкости каждой номенклатурной позиции подетального плана в натуральном (п.

1.4. 4, формула 1.1) и процентном отношении (п.

1.4. 4, формула 1.2). Далее все номенклатурные позиции будут отсортированы по значению общей трудоемкости изготовления и в соответствии с процентом общей трудоемкости нарастающим итогом будет присвоен класс детали: А, В или С. Это будет означать приоритет детали при составлении подетального плана. Как уже говорилось ранее, может возникнуть необходимость поменять приоритет изготовления детали вручную. Это будет легко сделать при помощи списка значений. Форму документа АВС подетального плана можно посмотреть в Приложение, А (Рис. А.3). Экранная форма для формирования АВС подетального плана представлена на Рис.

2.28 в разделе 2.

5. Реквизитный состав подетального плана совпадает с представленным в Таблице 2.

15. Однако при этом в таблицу «Подетальный план» дописывается два дополнительных показателя: процент общей трудоемкости изготовления детали и класс детали.

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

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

2.29 в разделе 2.

5. Реквизитный состав подетального плана представлен в Таблице 2.

16. Поля 1, 2, 3, 5, 9, 10 заносятся в таблицу БД «Сменное задание». Хранить в таблице поля 4, 6, 7 и 8 нет необходимости, т.к. по связи с таблицей «Детали» и «Подетальный план» значение этих показателей можно будет подключить в любой момент.

Таблица 2.16.

Структура результатного документа «Сменное задание».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Код записи ID_task Числовой счетчик 4 байт 2 Дата Date_task Дата 6 байта 3 Код бригады ID_brigadi Текстовый 4 байта 4 Название участка Name_ychastka Текстовый 20 байт 5 Код детали ID_part Текстовый 15 байт 6 Название детали Name_part Текстовый 20 байт 7 Трудоемкость Labor Числовой 6 байт 8 Оставшееся количество по плану Quantity_plan — Quantity_made Числовой 4 байт 9 Количество Quantity_task Числовой 4 байт 10 Табельный номер сотрудника ID_worker Текстовый 4 байта В конце рабочего дня происходит закрытие сменного задания, где для каждой номенклатурной позиции указывается количество принятых ОТК деталей и количество брака. На основании сданных деталей происходит увеличение значения количества сделанных в данном отчетном месяце деталей данной номенклатурной позиции в подетальном плане. Расчет производится по формуле 1.4 (п. 1.

4.4) и записывается в таблицу БД «Подетальный план» в поле Quant_made.

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

5. Реквизитный состав диспетчерского листа представлен в Таблице 2.

17. 7 и 8 поле являются расчетными на основании формул 1.6 и 1.7 (п. 1.

4.4).

Таблица 2.17.

Структура результатного документа «Диспетчерский лист».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Дата отчета Date Дата 6 байта 2 Название участка Name_ychastka Текстовый 20 байт 3 Код детали ID_part Текстовый 15 байт 4 Название детали Name_part Текстовый 20 байт 5 Трудоемкость Labor Числовой 6 байт 6 План Quantity_plan Числовой 4 байт 7 Сдано Quantity_made Числовой 4 байт 8 Осталось Quantity_plan — Quantity_made Числовой 4 байта 9% выполнения Plan% Процентный 4 байта Данные диспетчерского листа необходимы для оперативного анализа и нет необходимости их хранения в БД.

Отчет о выполнении плана может быть построен как в разрезе производственного участка, так и по производству в целом. Его формирование основано на запросе на выборку, который соединяет таблицы БД «Детали», «Подетальный план», «Месяц», «Производственные участки», «Место обработки», «Бригады», «Сменное задание». Форму отчета о выполнении плана можно посмотреть в Приложение Д, рис. Д.

6. Реквизитный состав отчета представлен в Таблице 2.

18. Поля 8 — 11 являются расчетными на основании формул 1.8 — 1.11 соответсвенно (п. 1.

4.4).

Таблица 2.18.

Структура результатного документа «Подетальный план».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Отчетный месяц ID_month Числовой 1 байт 2 Название участка Name_ychastka Текстовый 20 байт 3 Код детали ID_part Текстовый 15 байт 4 Название детали Name_part Текстовый 20 байт 5 План Quantity_plan Числовой 4 байт 6 Сдано Quantity_made Числовой 4 байт 7 Брак Quantity_brak Числовой 4 байта 8% выполнения Plan% Процентный 4 байта 9% брака Brak% Процентный 4 байта 10 Средний % выполнения SPlan% Процентный 4 байта 11 Средний % брака SBrak% Процентный 4 байта Отчет о незавершенном производстве отражает количество деталей, которые необходимо произвести для полного выполнения плана. Он также может быть построен как в разрезе производственного участка, так и по производству в целом. Его формирование основано на запросе на выборку, который соединяет таблицы БД «Детали», «Подетальный план», «Месяц», «Производственные участки», «Место обработки», «Бригады», «Сменное задание». Форму отчета о выполнении плана можно посмотреть в Приложение Д, рис. Д.

7. Реквизитный состав отчета представлен в Таблице 2.

19. Поля 6 и 8 являются расчетными на основании формул 1.12 и 1.13 (п. 1.

4.4). Поле 7 остается пустым для заполнения вручную по итогам инвентаризации на местах.

Таблица 2.19.

Структура результатного документа «Подетальный план».

№.

п/п Наименование поля Идентификатор Тип поля Размер поля.

1 Отчетный месяц ID_month Числовой 1 байт 2 Название участка Name_ychastka Текстовый 20 байт 3 Код детали ID_part Текстовый 15 байт 4 Название детали Name_part Текстовый 20 байт 5 План Quantity_plan Числовой 4 байт 6 НЗП нормативное NZP_norm Числовой 4 байт 7 НЗП фактическое NZP_fakt Числовой 4 байта 8 Средний % НЗП NZP% Процентный 4 байта Данные рассмотренных отчетов необходимы для оперативного анализа и нет необходимости их хранения в БД. Они могут создаваться по мере необходимости получения информации для анализа хода производства продукции.

Программное обеспечение задачи Общие положения (дерево функций) Разработка АРМ диспетчера производственного отдела производилась средствами Microsoft Access 2003 с использованием макросов и языка программирования Visual Basic For Applicational (VBA). Кнопочное пользовательское меню, формы для ввода и обработки данных, запросы для выбора информации из БД и отчетные документы реализовывалось стандартными средствами Microsoft Access 2003.

Схема функций управления и обработки данных АРМ диспетчера производственного отдела компании «Бестром» приведена на Рис. 2.

8.

Рис. 2.8 Дерево функций Работа программы начинается с выполнения служебной функции проверки пароля для входа в систему (Рис. 2.9).

Рис. 2.9 Окно для ввода пароля В случае успешного ввода пароля пользователь попадает в основное окно программы (Рис. 2.10).

Рис. 2.10 Главное меню АРМ диспетчера В программе предусмотрен доступ к просмотру справочной информации, необходимой для решения задачи диспетчирования. Меню «Справочники» представлено на Рис. 2.

11.

Рис. 2.11 Меню «Справочники».

Для работы с подетальным производственным планом предусмотрено отдельное меню (Рис. 2.12). Здесь имеется возможность просмотра месячного плана производства, составления подетального плана и АВС подетального плана производства.

Рис. 2.12 Меню «Подетальный план».

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

Рис. 2.13 Меню «Отчеты».

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

Структурная схема пакета Описание программных модулей представлено в Таблица 2.

2.

Таблица 2.2.

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

№ п/п Имя модуля Идентификатор модуля Краткое описание 1 Главное меню Menu Форма главного меню 2 Меню «Справочники» MenuS Форма меню второго уровня для просмотра справочников 3 Сборочные единицы Сборки Форма для просмотра справочника «Сборочные единицы» 4 Детали Детали Форма для просмотра справочника «Детали» 5 Входимости Входимости Форма для просмотра справочника «Входимости» 6 Место обработки Место_обработки Форма для просмотра справочника «Место обработки» 7 Меню «Подетальный план» MenuPP Форма меню второго уровня для формирования подетального плана 8 Месячный план Месячный_план Форма для просмотра месячного плана производства 9 Подетальный план Подетальный_план Форма для формирования, просмотра и печати подетального плана 10 АВС подетальный план АВСПодетальный_ план Форма для формирования, просмотра и печати АВС подетального плана 11 Сменное задание Сменное_задание Форма для формирования и печати сменного задания для производственных бригад 12 Учет выполнения Учет Форма вывода информации о программе 13 Меню «Отчеты» MenuO Форма меню второго уровня для формирования отчетов 14 Отчеты о участкам Отчет_Участок Форма для выбора параметров формирования отчетов о ходе производства в разрезе участков 15 Отчеты по производству Отчет_Производство Форма для выбора параметров формирования отчетов о ходе производства в целом Для выборки информации из БД используются запросы. Они служат источником для формирования сложных форм и отчетов. Их описание представлено в Таблица 2.

3.

Таблица 2.3.

Описание запросов на выборку.

№ п/п Имя запроса Связь с формой или отчетом Краткое описание 1 Запрос.

Подет_план Форма «Подетальный_план» Запрос для формирования подетального плана на основе месячного плана 3 Запрос.

АВС Форма «АВСПодетальный_план» Запрос проведения АВС анализа подетального плана 4 Запрос.

Смен_ задание Форма «Сменное задание» Запрос для формирования формы «Сменное задание» 5 Запрос.

Учет Форма «Учет выполнения» Запрос для формирования формы «Учет выполнения» 7 Запрос.

Дисп_лист Отчет «Диспетчерский лист» Запрос для формирования отчета «Диспетчерский лист» 8 Запрос.

Отчет_план Отчет «Выполнение плана производства» Запрос для формирования отчета «Выполнение плана производства» в разрезе участков и производства в целом 9 Запрос.

Отчет_НЗП Отчет «Незавершенное производство» Запрос для формирования отчета «Незавершенное производство» в разрезе участков и производства в целом.

Описание программных модулей Наиболее интересным в разрабатываемой системе является модуль «АВС подетальный план». Его алгоритм представлен на Рис. 2.14 — Рис. 2.

16.

Рис. 2.14 Алгоритм решения задачи «АВС подетальный план».

Рис. 2.15 Алгоритм решения задачи «АВС подетальный план» (продолжение 1).

Рис. 2.16 Алгоритм решения задачи «АВС подетальный план» (продолжение 2).

Программный код модуля «АВС подетальный план», а также других основных программных модулей представлен в Приложение Е.

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

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

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

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

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

Схемы технологического процесса сбора, передачи, обработки и выдачи информации Схема технологического процесса сбора, передачи, обработки и выдачи информации в разрабатываемой системе представлена на Рис. 2.17 — Рис. 2.

23.

Рис. 2.17 Схема технологического процесса сбора, передачи, обработки и выдачи информации.

Рис. 2.18 Схема технологического процесса сбора, передачи, обработки и выдачи информации (продолжение 1).

Рис. 2.19 Схема технологического процесса сбора, передачи, обработки и выдачи информации (продолжение 2).

Рис. 2.20 Схема технологического процесса сбора, передачи, обработки и выдачи информации (продолжение 3).

Рис. 2.21 Схема технологического процесса сбора, передачи, обработки и выдачи информации (продолжение 4).

Рис. 2.22 Схема технологического процесса сбора, передачи, обработки и выдачи информации (продолжение 5).

Рис. 2.23 Схема технологического процесса сбора, передачи, обработки и выдачи информации (продолжение 6).

Контрольный пример реализации проекта и его описание Для демонстрации работоспособности АРМ диспетчера производственного отдела рассмотрим контрольный пример.

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

Рис. 2.24 Справочник «Входимости».

Имеется возможность изучения месячного плана производства, задав предварительно номер отчетного месяца (Рис. 2.25).

Рис. 2.25 Задание номера отчетного месяца для вывода месячного плана Форма для просмотра месячного плана представлена на Рис. 2.

26. Здесь имеется возможность распечатать месячный план. Его вид представлен в Приложение Д, рис. Д.

1.

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

2.27. Его печатный вид представлен в Приложение Д, рис. Д.

2.

Рис. 2.27 Форма для формирования подетального плана АВС анализ подетального плана приводится в форме на Рис. 2.

28. Здесь имеется возможность как автоматически присвоить класс номенклатурной позиции, так и установить его в ручную. Печатный вид АВС подетального плана представлен в Приложение Д, рис. Д.

3.

Рис. 2.28 Форма для формирования АВС подетального плана На Рис. 2.29 представлена форма для формирования сменного задания. Здесь выбирается номер бригады — исполнителя и детали для производства на указанную дату. Для справки имеется информация о том, сколько необходимо сделать деталей. За каждой позицией закрепляется конкретный исполнитель.

Рис. 2.29 Форма для формирования сменного задания По результатам рабочего дня производится учет выполнения сменного задания в форме на Рис.

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

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

5.

Рис. 2.31 Задание номера участка для формирования «Диспетчерского листа».

Отчеты о выполнении плана и о незавершенном производстве создаются на основании параметров, задаваемы в форме на Рис. 2.

23. Печатный вид отчетов представлен в Приложение Д, Рис. Д. 6 и Д7.

Рис. 2.32 Форма выбора параметров для формирования отчетов Обоснование экономической эффективности проекта Выбор и обоснование методики расчёта экономической эффективности Эффективность системы — это степень ее соответствия своему назначению. Оценка экономической эффективности основана на сопоставлении затрат и результатов.

Годовой экономический эффект (экономическая прибыль) является одним из основных показателей расчета экономической эффективности капитальных вложений. Он находится по формуле:

Где:

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

К — единовременные затраты (капиталовложения), связанные с созданием ИС;

Е — норма прибыли (нормативная прибыльность). Показывает, какую часть единовременных затрат мы должны включить в общие затраты, чтобы их вернуть за определенный срок. [12, с. 206].

Произведение ЕК по рыночной терминологии называется неявными затратами бизнеса (Implicit Costs), т.к. характеризует отдачу капитала, которая могла бы быть в иной сфере, например, при его помещении в банк. Величина Е в рыночных условиях не должна быть меньше годовой банковской процентной ставки (надежного банка).

Единицы измерения в формуле (размерность величин) следующие:

Эруб./год, Эгод — руб./год, К — руб., Е — 1/год.

Годовой экономический эффект представляет собой абсолютный показатель эффективности. Система считается эффективной, если Э > 0.

Вспомогательными показателями экономической эффективности являются:

расчетная прибыльность:

срок окупаемости — обратная величина:

Рассмотренные показатели являются статическими показателями эффективности, т.к. не учитывается разновременность затрат на ИСЭ и результатов ее функционирования. [12, с. 207].

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

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

Годовой экономический эффект можно представить как сумму внешнего и внутреннего эффектов:

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

где Пб и П — соответственно годовые приведенные затраты по базовому и предлагаемым вариантам ИС.

где С — годовые эксплуатационные затраты на ИС.

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

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

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

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

Метод «сверху вниз». Здесь рассчитываются общие затраты на проект или на фазу проекта и после этого определяются затраты более мелких составляющих проекта. Чаще всего этот метод используют в тех случаях, когда бюджет проекта жестко ограничен. [16].

В дипломном проекте для определения затрат на создание проекта, а также затрат на эксплуатацию системы будут определяться при помощи наиболее распространенного метода «по параметрам».

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

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

где Кпр — затраты на проектирование ИС;

Ктс — затраты на технические средства управления;

Клс — затраты на создание линий связи локальных сетей;

Кпо — затраты на программное обеспечение. [12, с. 214].

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

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

где: Краб — затраты на заработную плату проектировщиков;

Ксвт — затраты на средства вычислительной техники, необходимой для проектирования комплекса задач;

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

Кпроч — прочие затраты (технические носители, консультации специалистов в предметной области и т. д.).

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

20 процентов — в Федеральный бюджет;

3,2 процента — в ФСС;

0,8 процента — в ФФОМС;

2 процента — в ТФОМС.

Накладные расходы за месяц в среднем составили 50% от затрат на оплату труда.

При помощи Microsoft Project в п.

2.1. 7 был осуществлен стоимостной анализа проекта. На основании расчетов стоимости ресурсов имеем:

Крабп = 96 181,10 руб.

Крабд = 8 126,65 руб.

Крабс = 2 148,86 руб.

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

Краб = 96 181,10 + 8 126,65 + 2 148,86 = 106 456,61 руб.

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

К затратам на проектирование также необходимо отнести затраты на машинное время в период разработки. Для проектирования АРМ диспетчера производственного отдела использовался компьютер разработчика стоимостью 30 000 руб. Для разработки компьютер использовали в среднем на 70% от общего времени работы. Нормативный срок службы компьютера составляет 5 лет.

Годовой фонд машинного времени компьютера, используемого для разработки: 21 день в месяце*12 месяцев*8 часов = 2 016 часов. Стоимость одного часа машинного времени складывается из амортизации компьютера (30 000 руб./5лет = 6 000 руб. в год) и затрат на обслуживание компьютера, которое осуществляется сотрудниками специализированной организации. Стоимость обслуживания составляет 500 руб./мес. за 1 компьютер. В год затраты составят 6 000 руб.

Следовательно стоимость 1 часа машинного времени компьютера для разработки составила: (6 000 руб/год + 6 000 руб/год) / 2 016 часов = 5,95 руб/час.

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

3 месяца*21 рабочий день в месяце*8 часа работы в день = 504 часа.

Значит затраты на машинное время за весь период разработки составили:

Ксвт = 5,06 руб./час*504 часа = 3 000 руб.

Затраты на инструментальные программные средства, необходимые для проектирования комплекса задач равны нулю, т.к. программные средства для проектирования (Microsoft Access 2003 и AllFunction Modeling Suite) были приобретены ранее и уже окупились.

Кипс = 0.

Прочие затраты на проектирование составили:

Материалы: CD-RW диски — 1 шт. = 30 руб.

бумага — 1 пачка = 250 руб.

Кпроч = 30 + 250 = 280 руб.

Итого затраты на проектирование составили:

Кпр = 106 456,61 руб. + 3 000 руб. + 280 руб. = 109 736,61 руб.

Расчёт затрат на технические средства управления.

АРМ диспетчера производственного отдела будет функционировать на компьютере диспетчера, остаточная стоимость которого составляет 22 000 руб. Для решения задач диспетчирования он будет задействован на 60%:

Ктс = 22 000 руб. * 60% = 13 200 руб.

Затраты на создание линий связи равны нулю, т.к. не предусматривается сетевое функционирование АРМа.

Клс = 0.

Затраты на программное обеспечение также равны нулю, т.к. Microsoft Access 2003 уже окупился. Дополнительных программных средств не требуется.

Кпо = 0.

Общая сумма капитальных затрат на создание и внедрение программного комплекса составила К = 109 736,61 + 13 200 = 122 936,61 руб.

Расчет эксплуатационных затрат по базовому и предлагаемому варианту решения задачи диспетчирования В состав эксплуатационных затрат входят:

Где Сзп — зарплата управленческого персонала;

Саоб — амортизационные отчисления;

Стоб — затраты на техническое обслуживание;

Слсб — аренда линий связи (ГВС);

Сниб — затраты на носители информации;

Спрб — прочие затраты. [12, с. 216].

Расчет эксплуатационных затрат на зарплату управленческого персонала в базовом периоде Расчёт заработной платы управленческого персонала До автоматизации, для решения рассмотренных задач диспетчирования было необходимо 2 диспетчера, каждый из которых тратил около 50% своего рабочего времени.

Сзпб = 2*(15 000*1,76*12)*50% = 380 160 руб.

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

Саоб = 22 000 руб./5 лет * 10% = 733,33 руб/год.

Расчёт затрат на техническое обслуживание в базовом периоде Стоб = 6 000 руб./год * 10% = 600 руб/год Затраты на аренду линий связи равны нулю.

Расчёт затрат на носители информации в базовом периоде Дискеты — 5 шт по 12 руб.

Сниб = 60 руб./год Расчёт прочих затрат в базовом периоде Бумага — 1 пачки по 250 руб.

Спрб = 250 руб./ год.

Эксплуатационные затраты по базовому варианту составляют:

Сб = 380 160 + 733,33 + 600 + 60 + 250 = 381 803,33 руб./год.

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

Сзп = (15 000*1,26*12)*50% = 158 400 руб.

Расчёт амортизационных отчислений Компьютер диспетчерской службы соответственно также будет использоваться на 50%.

Сао = 22 000 руб./5 лет*50% = 3 666,67 руб./год.

Расчёт затрат на техническое обслуживание Учитывая, что затраты на техническое обслуживание 1 часа машинного времени составляют 6 000 руб./год:

Сто = 6 000 руб.*50% = 3 000 руб./год.

Затраты на аренду линий связи равны нулю.

Расчёт затрат на носители информации Накопитель USB Flash 256 Мбайт Сни = 300 руб./в год.

Расчёт прочих затрат Бумага — 1 пачка по 250 руб Спр = 250 руб/год.

Общая сумма эксплуатационных затрат по предлагаемому варианту составляет:

Сп = 158 400 + 3 666,67 + 3 000 + 300 + 250 = 165 616,67 руб./год.

Далее рассчитаем срок окупаемости и годовую экономию, связанную с внедрением задачи автоматизации диспетчирования.

Показатели экономической эффективности Нормативный коэффициент эффективности составляет 15%:

Основные показатели экономической эффективности следующие:

Годовая экономия: Эгод = 381 803,33 — 165 616,67 = 216 186,67 руб/год Расчетная прибыльность: Ер = 216 186,67/ 122 754,4 = 1,76.

Срок окупаемости: Ток = 1/1,76 = 0,57 года Годовой экономический эффект:

Э = 216 186,67 — 15*122 936,61 = 197 773,51 руб/год Внутренний экономический эффект:

Эвнут = 381 803,33 — 165 616,67 — 15% * 122 936,61 = 197 773,51 руб./год.

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

Таблица 3.

1. Расчет показателей экономической эффективности представлен в Таблица 3.

2.

Таблица 3.1 Данные для расчета показателей экономической эффективности Показатели Значение Единовременные затраты: Затраты на проектирование 109 736,61 руб. Затраты на технические средства 13 200 руб. Общая сумма единовременных затрат 122 936,61 руб. Эксплуатационные затраты по базовому варианту: Заработная плата управленческого персонала 380 160 руб./год Амортизационные отчисления 733,33 руб./год Затраты на техническое обслуживание 600 руб./год Затраты на носители информации 60 руб./год Прочие затраты 250 руб./год Общая сумма эксплуатационных затрат до внедрения комплекса задач 381 803,33 руб./год Эксплуатационные затраты по предлагаемому варианту: Заработная плата управленческого персонала 158 400 руб./год Амортизационные отчисления 3666,67 руб./год Затраты на техническое обслуживание 3000 руб./год Затраты на носители информации 300 руб./год Прочие затраты 250 руб./год Общая сумма эксплуатационных затрат после внедрения комплекса задач 165 616,67 руб./год.

Таблица 3.2 Результаты расчета показателей экономической эффективности Показатели Формулы для расчета Значение Годовая экономия Эгод = Сб — С 216 186,67 Расчетная прибыльность Ер = Эгод/К 1,76 Срок окупаемости Ток = 1/ Ер = К/Эгод 0,57 года Годовой экономический эффект Э = Эгод — ЕК 197 773,51 руб/год Внутренний экономический эффект Эвнут = Пб — П 197 773,51 руб/год Анализ эффективности проекта автоматизации функций диспетчера производственного отдела показал его экономическую целесообразность. Внутренний эффект достигается за счет снижения временных и трудовых затрат диспетчера для реализации своих функций. Внедрение данной системы позволит производить оперативный и качественный анализ задержек при выполнении производственного плана, что позволит свести к минимуму отклонения от плана. Внешний эффект от автоматизации диспетчирования на предприятии на момент написания дипломного проекта сложно оценить количественно. Источниками внешнего экономического эффекта можно считать приобретение положительной репутации у заказчиков, которые будут получать свой заказ точно в срок. Удержать своих клиентов, а также получить бесплатную рекламу от распространения положительных отзывов довольных заказчиков своим знакомым — одна из основных целей функционирования компании «Бестром».

Заключение

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

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

Во второй главе представлено описание процесса создания программного средства в соответствии со стандартом ИСО 12 207.

Подробно рассмотрены этапы разработки, внедрения и эксплуатации и составлен план график проекта. Реализация АРМ диспетчера производилась при помощи СУБД Microsoft Access 2003. В этой главе описана схема базы данных, функционал и пользовательский интерфейс АРМ диспетчера производственного отдела. Подробно рассмотрена технология сбора, передачи и обработки информации в системе.

В третьей главе приведено обоснование экономической эффективности данного проекта. Автоматизация диспетчирования привела к снижению трудоемкости, что позволило снизить количество диспетчеров. Внутренний эффект составляет 197 773,51 руб/год, срок окупаемости проекта составляет около 7 месяцев.

Список использованной литературы ГОСТ Р ИСО 9000−2001.

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

ГОСТ 2.201−80. Обозначение изделий и конструкторских документов.

ГОСТ Р ИСО/МЭК 12 207−99. Информационные технологии. Процессы жизненного цикла программных средств.

Внутренние стандарты и процедуры компании «Бестром».

Положение компании «Бестром».

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

Годовой отчет компании «Бестром» за 2006 год.

Большой экономический словарь. — 2-е изд. — М.: Большая Российская энциклопедия, 1998. — 1456 с.

Базров Б. М. Основы технологии машиностроения: Учебник для вузов. — М.: Машиностроение, 2005. — 736 с.

Баронов В. В. Автоматизация управления предприятием. — М.: ИНФРА-М, 2000. — 239 с.

Благодатских В. А. Стандартизация разработки программных средств: Учеб. пособие/ Под ред. Разумова О. С. — М.: Финансы и статистика, 2005. — 288 с.

Бугорский В.Н., Соколов Р. В. Экономика и проектирование информационных систем. — СПб.: Роза мира, 1998. — 295 с.

Гаврилов Д. А. Управление производством на базе стандарта MRP II. 2-е изд. — СПб: Питер, 2005. — 416 с.

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

Р. Менеджмент: учеб. — 3-е изд., перераб.

и доп. — М.: ТК Велби, Изд-во Проспект, 2006. — 504 с.

Зубов А.В. MS Project 2003.

Популярный самоучитель. — СПб: Питера, 2005. — 256 с.

Информатика: Учебник. — 3-е перераб. изд. / Под ред. проф. Н. В. Макаровой. ;

М.: Финансы и статистика, 2000. — 768 с.

Маклаков С.В. «Создание информационных систем с AllFunction Modeling Suite». — М.: ДИАЛОГ-МИФИ, 2003 — 432 с.

Петров В. Н. Информационные системы. — СПб.: Питер, 2003. — 688 с:

Производственный менеджмент: Учеб. для вузов /С.Д. Ильенкова, А. В. Бандурин, Г. Я. Горбовцов и др.; Под ред. С. Д. Ильенковой. — М.: ЮНИТИ, 2002 г. — 580 с.

Репин В.В., Елиферов В. Г. Процессный подход к управлению. Моделирование бизнес-процессов. — М.: РИА «Стандарты и качество», 2004. — 408 с.

Смирнова Г. Н., Сорокин А. А., Тельнов Ю. Ф. Проектирование экономических информационных систем (I часть) / Московский государственный университет экономики, статистики и информатики. М., 2001 г. — 232 с.

Соломенцев Ю. М. Проектирование автоматизированных участков и цехов: Учебник для машиностроительных специализированных вузов — 2-е изд. — М.: Высшая школа, 2000 г. — 272 с.

Борисов В. Н. Автоматизация систем управления предприятиями.

http://www.isbp.ru/modules/smartsection/print.php?itemid=19.

Гладкова И., Фролов Е. Б. «Ларчик» национальных технологических традиций открывает MESсистема. Статья с сайта о MES-системах.

http://www.mesa.ru/?p=600 006.

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

http://www.ssga.ru/AllMetodMaterial/metod_mat_for_ioot/metodichki/organization/teorija/content.htm.

Проектирование машиностроительного производства. Курс лекций под ред. Полетаева В. А. с сайта Ивановского государственного энергетического университета.

http://elib.ispu.ru/library/lessons/Poletaev2/index.html.

Информация с корпоративного сайта компании «Бестром».

Информация сайта, посвященного MES-системам.

http://www.mesa.ru/.

Информация сайта инженерной компании Глосис — поставщика MES-система FOBOS.

http://www.glosys.ru/.

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

http://www.zspps.com/.

Сайт фирмы разработчика программного комплекса СПРУТ.

http://www.sprut.vimas.com.

Формы первичных документов.

Рис.А.1 Форма документа «Квартальный план производства с помесячной разбивкой».

Рис.А.2 Форма документа «Подетальный план производства на месяц».

Рис.А.3 Форма документа «АВС подетальный план производства на месяц».

Рис.А.4 Форма документа «Сменное задание».

Рис.А.5 Форма документа «Накладная на сдачу деталей «.

Рис.А.6 Форма документа «Рапорт о сдаче».

Диаграмма Ганта.

Стоимостной план проекта.

Диаграмма Ганта с суммарными показателями стоимости.

Отчетные формы.

Рис.Д.1 Месячный план производства Рис.Д.2 Подетальный производственный план Рис.Д.3 АВС подетальный производственный план Рис.Д.4 Сменное задание Рис.Д.5 Отчет «Диспетчерский лист».

Рис.Д.6 Отчет о выполнении плана Рис.Д.7 Отчет о незавершенном производстве.

Программный код основных программных модулей Модуль «Подетальный план».

Private Sub Кнопка6_Click ().

Dim db As Database.

Dim arec As Recordset.

Dim brec As Recordset.

Dim qrec As Integer.

Dim i As Integer.

' Сохранение подетального плаан.

Set db = CurrentDb.

Set arec = db. OpenRecordset («Подетальный план», dbOpenDynaset, dbAppendOnly).

Set brec = db. OpenRecordset («SELECT Входимости. ID_part, Детали.Name_part, Sum ([Quantity]*[Plan_quantity]) AS Выражение1 FROM (Сборки INNER JOIN (Детали INNER JOIN Входимости ON Детали. ID_part = Входимости. ID_part) ON Сборки. ID_ass = Входимости. ID_ass) INNER JOIN [Месячный план] ON Сборки. ID_ass = [Месячный план]. ID_ass GROUP BY Входимости. ID_part, Детали.Name_part, [Месячный план]. Id_month HAVING ((([Месячный план]. Id_month) = «& Me! month & «))»).

brec.MoveLast.

qrec = brec.RecordCount.

brec.MoveFirst.

For i = 1 To qrec.

arec.AddNew.

arec![Id_month] = Me! month.

arec![ID_part] = brec![ID_part].

arec![Quantity_Plan_podet] = brec![Выражение1].

arec.Update.

brec.MoveNext.

Next i.

brec.Close.

arec.Close.

End Sub.

' Выход.

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

On Error GoTo Err_Кнопка16_Click.

DoCmd.Close.

Exit_Кнопка16_Click:

Exit Sub.

Err_Кнопка16_Click:

MsgBox Err.Description.

Resume Exit_Кнопка16_Click.

End Sub.

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

Private Sub Кнопка.

Отчет_Click ().

On Error GoTo Err_Кнопка.

Отчет_Click.

Dim stDocName As String.

stDocName = ChrW (1054) & ChrW (1090) & ChrW (1095) & ChrW (1077) & ChrW (1090) & ChrW (95) & ChrW (1087) & ChrW (1083) & ChrW (1072) & ChrW (1085).

DoCmd.OpenReport stDocName, acPreview.

Exit_Кнопка.

Отчет_Click:

Exit Sub.

Err_Кнопка.

Отчет_Click:

MsgBox Err.Description.

Resume Exit_Кнопка.

Отчет_Click.

End Sub.

Модуль «АВС подетальный план».

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

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

DoCmd.Close.

Exit_Кнопка18_Click:

Exit Sub.

Err_Кнопка18_Click:

MsgBox Err.Description.

Resume Exit_Кнопка18_Click.

End Sub.

Private Sub Кнопка.

АВС_Click ().

Dim db As Database.

Dim arec As Recordset.

Dim qrec As Integer.

Dim totlab As Double.

Dim i As Integer.

Dim per As Double.

Set db = CurrentDb.

S et arec = db. OpenRecordset («SELECT Месяц.Name_month, Детали.Name_part, Детали. Labour, [Подетальный план]. Q uantity_Plan_podet, [Подетальный план]. P ercent_lab, [Подетальный план].

C lass, [Подетальный план]. ID_ part, [Подетальный план]. I d_month FROM Месяц INNER JOIN (Детали INNER JOIN [Подетальный план] ON Детали. ID_part = [Подетальный план].

ID_ part) ON Месяц. Id_month = [Подетальный план]. I d_month WHERE (((Месяц.Id_month) = «& nmon & «)) ORDER BY [Подетальный план]. Percent_lab DESC»).

arec.MoveLast.

qrec = arec.RecordCount.

arec.MoveFirst.

' Расчет общей трудоемкости подетального плана.

For i = 1 To qrec.

totlab = totlab + arec![Labour] * arec![Quantity_Plan_podet].

arec.MoveNext.

Next i.

arec.MoveFirst.

' Расчет общей трудоемкости изготовления деталей.

For i = 1 To qrec.

arec.Edit.

arec![Percent_lab] = ((arec![Labour] * arec![Quantity_Plan_podet]) / totlab) * 100.

arec.Update.

arec.MoveNext.

Next i.

' Присвоение класса детали.

Form.Repaint.

arec.Requery.

arec.MoveFirst.

arec.Edit.

per = arec![Percent_lab].

arec![Class] = «А» .

arec.Update.

arec.MoveNext.

For i = 2 To (qrec — 1).

arec.Edit.

per = per + arec![Percent_lab].

If (per >= 0) And (per < 81) Then.

arec![Class] = «А» .

ElseIf (per >= 81) And (per < 98) Then.

arec![Class] = «В» .

Else.

arec![Class] = «С» .

End If.

arec.Update.

arec.MoveNext.

Next i.

arec.Edit.

If per < 81 Then.

arec![Class] = «А» .

ElseIf (per >= 81) And (per < 98) Then.

arec![Class] = «В» .

Else.

arec![Class] = «С» .

End If.

arec.Update.

arec.Requery.

Form.Repaint.

arec.Close.

End Sub.

Private Sub Кнопка.

Печать_Click ().

On Error GoTo Err_Кнопка.

Печать_Click.

Dim stDocName As String.

stDocName = ChrW (1054) & ChrW (1090) & ChrW (1095) & ChrW (1077) & ChrW (1090) & ChrW (95) & ChrW (1040) & ChrW (1042) & ChrW (1057).

DoCmd.OpenReport stDocName, acPreview.

Exit_Кнопка.

Печать_Click:

Exit Sub.

Err_Кнопка.

Печать_Click:

MsgBox Err.Description.

Resume Exit_Кнопка.

Печать_Click.

End Sub.

Модуль «Сменное задание».

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

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

DoCmd.GoToRecord, , acNewRec.

Exit_Кнопка14_Click:

Exit Sub.

Err_Кнопка14_Click:

MsgBox Err.Description.

Resume Exit_Кнопка14_Click.

End Sub.

Private Sub Бригады_ID_brigadi_Dirty (Cancel As Integer).

Form.Requery.

End Sub.

Private Sub Кнопка.

Выход_Click ().

On Error GoTo Err_Кнопка.

Выход_Click.

DoCmd.Close.

Exit_Кнопка.

Выход_Click:

Exit Sub.

Err_Кнопка.

Выход_Click:

MsgBox Err.Description.

Resume Exit_Кнопка.

Выход_Click.

End Sub.

Private Sub Кнопка19_Click ().

On Error GoTo Err_Кнопка19_Click.

DoCmd.Close.

Exit_Кнопка19_Click:

Exit Sub.

Err_Кнопка19_Click:

MsgBox Err.Description.

Resume Exit_Кнопка19_Click.

End Sub.

‘ Печать сменного задания.

Private Sub Кнопка20_Click ().

On Error GoTo Err_Кнопка20_Click.

Dim stDocName As String.

stDocName = ChrW (1057) & ChrW (1084) & ChrW (1077) & ChrW (1085) & ChrW (1085) & ChrW (1086) & ChrW (1077) & ChrW (32) & ChrW (1079) & ChrW (1072) & ChrW (1076) & ChrW (1072) & ChrW (1085) & ChrW (1080) & ChrW (1077).

DoCmd.OpenReport stDocName, acPreview.

Exit_Кнопка20_Click:

Exit Sub.

Err_Кнопка20_Click:

MsgBox Err.Description.

Resume Exit_Кнопка20_Click.

End Sub.

' Проверка превышения плана.

Private Sub Quantity_task_Dirty (Cancel As Integer).

If Quantity_task > Quant_paln Then.

MsgBox «Заданное количество превышает остаток в подетальном плане на текущий месяц», vbOKOnly.

End If.

End Sub.

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

Private Sub SpisokID_part_AfterUpdate ().

Dim db As Database.

Dim arec As Recordset.

Set db = CurrentDb.

S et arec = db. OpenRecordset («SELECT [Подетальный план]. I d_month, [Подетальный план]. ID_.

part, [Подетальный план]. Q uantity_Plan_podet, [Подетальный план]. Q.

uantity_made, [Quantity_Plan_podet]-IIf (IsNull ([Quantity_made]), 0,[Quantity_made]) AS Выражение1 FROM [Подетальный план] WHERE ((([Подетальный план]. I d_month)= «& month (Date + 1) & «) AND (([Подетальный план]. ID_part)= '» & ID_part & «'))»).

Me!Planquant = arec![Выражение1].

arec.Close.

End Sub.

Private Sub SpisokID_part_GotFocus ().

SpisokID_part.Requery.

End Sub.

Модуль «Учет выполнения».

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

Private Sub Form_AfterUpdate ().

Dim db As Database.

Dim arec As Recordset.

Set db = CurrentDb.

S et arec = db. OpenRecordset («SELECT [Подетальный план]. I d_month, [Подетальный план]. ID_ part, [Подетальный план]. Q uantity_made FROM [Подетальный план] WHERE ((([Подетальный план].

I d_month)= «& month ([Forms]![Учет]![Date_task]) & «) AND (([Подетальный план]. ID_part)= '» & Me![ID_part] & «'))»).

arec.Edit.

arec!Quantity_made = arec! Quantity_made + Me![Quant_made].

arec.Update.

arec.Close.

End Sub.

Private Sub Quantity_task_Dirty (Cancel As Integer).

If Quantity_task > Quant_paln Then.

MsgBox «Заданное количество превышает остаток в подетальном плане на текущий месяц», vbOKOnly.

End If.

End Sub.

Данные из годового отчета компании «Бестром» за 2006 год.

Данные из годового отчета компании «Бестром» за 2006 год.

Данные из годового отчета компании «Бестром» за 2006 год.

Э = Эгод — ЕK (1).

Ер = Эгод / К (2).

Ток = 1/Ер = К / Эгод (3).

Э = Эвнеш +Эвнут (4).

Эвнут = Пб — П (5).

П = С + ЕК (6).

К = Кпр + Ктс + Клс + Кпо (7).

Кпр = Краб + Ксвт + Кипс + Кпроч (8).

С = Сзп + Сао + Сто + Слс + Сни + Спр (9).