Автоматизированная информационная система обработки данных учета пенсионных начислений и компенсаций ЦСО Военного комиссариата Курской области

 

МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ

Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования

РОССИЙСКИЙ ГОСУДАРСТВЕННЫЙ СОЦИАЛЬНЫЙ УНИВЕРСИТЕТ

КУРСКИЙ ИНСТИТУТ СОЦИАЛЬНОГО ОБРАЗОВАНИЯ

(ФИЛИАЛ) РГСУ

Инженерно-технический факультет

Кафедра информационных систем и информационного права


«УТВЕРЖДАЮ»

Зав. кафедрой

___________________А.Н. Гранкин

«_____»_______________2013 г.


ПОЯСНИТЕЛЬНАЯ ЗАПИСКА

к выпускной квалификационной работе

на тему

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


Автор выпускной квалификационной работы Пахомов И.Н._______________

Обозначение выпускной квалификационной работы ВКР 230102.65.08.021.13 ПЗ

Специальность 230102.65 «Автоматизированные системы обработки информации и управления»

Руководитель выпускной квалификационной работы __________ С.А. Зайцев

Нормоконтроль______________________ А.Н. Гранкин

Курск, 2013

МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ

Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования

РОССИЙСКИЙ ГОСУДАРСТВЕННЫЙ СОЦИАЛЬНЫЙ УНИВЕРСИТЕТ

КУРСКИЙ ИНСТИТУТ СОЦИАЛЬНОГО ОБРАЗОВАНИЯ

(ФИЛИАЛ) РГСУ

Инженерно-технический факультет

Кафедра информационных систем и информационного права


«УТВЕРЖДАЮ»

Зав. кафедрой

___________________А.Н. Гранкин

«_____»_______________2013 г.



ЗАДАНИЕ НА ВЫПУСКНУЮ КВАЛИФИКАЦИОННУЮ РАБОТУ


Студент 21 группа

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

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

.Содержание пояснительной записки:

Введение

Анализ типовых программных решений для учета данных в системах начисления военный пенсий

Обзор программного обеспечения, используемого в ЦСО ВККО

Проектирование автоматизированной информационной системы обработки данных учета пенсионных начислений и компенсаций ЦСО Военного комиссариата Курской области

Тестирование разработанного ПО

Расчет системы кондиционирования офисного помещения ЦСО

Выводы

Библиографический список

Приложения

4. Перечень графического материала:

Руководитель выпускной

квалификационной работыС.А. Зайцев

НормоконтрольА.Н. Гранкин



Содержание


Введение

.Анализ типовых программных решений для учета данных в системах начисления военный пенсий

.1Анализ возможностей использования решений на базе 1С

.1.1Области применения

.1.2Назначение типовых решений

.1.3Автоматизация отдельных задач или комплексная автоматизация

.1.4Поддержка и сервис

.1.5«1С:Документооборот государственного учреждения 8»

.1.6Работа с документами

.1.7Веб-сервисы

.2Анализ возможностей использования решений на базе Microsoft Dynamics AX (Microsoft Axapta)

.2.1Характеристика «Microsoft Dynamics AX»

.2.2Microsoft Dynamics AX 2012 обеспечивает:

.2.3Microsoft Dynamics AX 2012 для России

.3Анализ возможностей использования решений на базе CA Clipper

.4Анализ возможностей использования решений на базе FoxPro

.4.1Особенности языка FoxPro

.5Выводы по главе

.Обзор программного обеспечения, используемого в ЦСО ВККО

.1Общие положения

В настоящее время в ЦСО применяется устаревшая

.1.1Применяемые термины

.1.2Схема организации работы по формированию файлов электронного реестра

.2Назначение пенсий, пособий (компенсаций) индивидуальное

.2.1Назначение пособий, компенсаций

.2.2Назначение пенсий

.2.2.1Разрешение на выплату пенсии

.2.2.2Перерасчет пенсий

.3Назначение пособий (компенсаций) списком

.3.1Формирование списка

.3.2Обработка списка

.4Назначение пенсий списком (после массового перерасчета)

.5Формирование реестра выплат, назначенных исполнителем

.6Печать реестра выплат, назначенных исполнителем

.7Формирование электронного реестра.

.7.1Формирование списка выплат для электронного реестра66

.7.1.1Выбор файла для электронного реестра (даты формирования реестра)

.7.1.2Выбор реестров исполнителей

.7.1.3Загрузка реестров исполнителей

.7.1.4Печать ведомости (списка), вывод данных в файл реестра для ОСБ.

.7.2Формирование файлов электронного реестра

.7.2.1Формирование электронных реестров по каждому подразделению Сбербанка

.7.2.2Формирование единого электронного реестра для всех подразделений Сбербанка

.7.3Формирование транспортных пакетов для передачи в Сбербанк

.7.3.1Установка программы формирования транспортных пакетов ZIP32

.7.3.2Формирование единого транспортного пакета (за все ОСБ)

.7.3.3Формирование транспортных пакетов по каждому ОСБ

.8Выводы по главе.

.Проектирование АвтоматизированнОЙ информационнОЙ системЫ обработки данных учета пенсионных начислений и компенсаций ЦСО Военного комиссариата Курской области

.1Формирование базы данных проекта

.2Проектирование экранных форм

.3Вывод по главе

.Тестирование разработанного ПО

.1Проверка на сохранность целостности данных

.2Проверка на контроль за соответствием типов данных

.3Выводы по главе

.Расчет системы кондиционирования офисного помещения ЦСО

.1Введение

.2Расчет поступления тепла и влаги в помещение (тепловой баланс)

.2.1Расчетные параметры воздуха

.2.2Поступление тепла и влаги в помещение

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

.3.1Расчет производительности СКВ

.3.2Расчет количества тепла для подогревателей 1-ого и 2-ого подогрева

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

.3.4Расчет количества воды, испарившейся в оросительной камере

.4Выбор типоразмера кондиционера и расчет его секций

.4.1Расчет и подбор воздухонагревателей

.4.2Расчет камер орошения

.5Холодоснабжение СКВ

.6Аэродинамический расчет СКВ

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

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

.6.3Подбор вентилятора

.7Выводы по главе

Выводы

Библиографический список

Приложения


Введение


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

В Центре Социальной Обеспечения Военного Комиссариата Курской Области используется программа «PENSION.EXE», реализованная на CA CLIPPER 5.0 под операционную систему MS-DOS 6.22, которая ведет учет пенсионных дел военнослужащих Курской области, а также всех выплат и компенсации по этим делам.

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

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

Цель: обеспечение целостности данных таблиц существующей системы «Pension» путем перевода системы на новую платформу Microsoft® Visual FoxPro 9.0 Professional с сохранением формата данных.

Задачи:

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

.Провести обзор программного обеспечения, используемого в ЦСО ВККО

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

.Выполнить тестирование разработанного приложения

.Выполнить расчет системы кондиционирования офисного помещения ЦСО


1.Анализ типовых программных решений для учета данных в системах начисления военный пенсий


1.1Анализ возможностей использования решений на базе 1С


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


1.1.1Области применения

Гибкость платформы позволяет применять 1С:Предприятие 8.2 в самых разнообразных областях:

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

·поддержка оперативного управления предприятием;

·автоматизация организационной и хозяйственной деятельности;

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

·широкие возможности для управленческого учета и построения аналитической отчетности, поддержка многовалютного учета;

·решение задач планирования, бюджетирования и финансового анализа;

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

·другие области применения.

1.1.2Назначение типовых решений

Типовые прикладные решения фирмы "1С" предназначены для автоматизации типовых задач учета и управления предприятий. При разработке типовых прикладных решений учитывались как современные международные методики управления (MRP II, CRM, SCM, ERP, ERP II и др.), так и реальные потребности предприятий, не укладывающиеся в стандартный набор функциональности этих методик, а также опыт успешной автоматизации, накопленный фирмой "1С" и партнерским сообществом. Состав функциональности, включаемой в типовые решения, тщательно проработан. Фирма "1С" анализирует опыт пользователей, применяющих программы системы "1С:Предприятие" и отслеживает изменение их потребностей.

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

·"1С:Бухгалтерия 8.2",

·"Управление торговлей",

·"Зарплата и Управление Персоналом",

·"Управление производственным предприятием".

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


Рисунок 1.2 - Прикладное решение "Управление производственным предприятием"


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

Стандартизация типовых решений

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

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

1.1.3Автоматизация отдельных задач или комплексная автоматизация

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

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


1.1.4Поддержка и сервис

При выборе системы важно оценить перспективы эксплуатации и развития системы.

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

В России, странах СНГ и Балтии работают десятки тысяч специалистов, профессионально занимающихся внедрением и адаптацией прикладных решений "1С:Предприятия". В каждом регионе существует большое количество франчайзинговых фирм, оказывающих весь спектр услуг по комплексной автоматизации на базе программ системы "1С:Предприятие" - начиная от консультаций по выбору наиболее подходящих программ системы и заканчивая обучением и индивидуальной настройкой системы. Многие из специалистов, занимающихся внедрением "1С:Предприятия", решают не только задачи, связанные с поддержкой или развитием прикладных решений, но и оказывают консалтинговые услуги, помогая принимать правильные решения при постановке учета и управления на предприятии. Фирма "1С" проводит регулярное обучение и сертификацию специалистов.

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


1.1.5«1С: Документооборот государственного учреждения 8»

«1С:Документооборот государственного учреждения 8» в комплексе решает широкий спектр задач автоматизации учета документов, взаимодействия сотрудников, контроля и анализа исполнительской дисциплины. При наличии у пользователя соответствующих клиентских лицензий программа поддерживает многопользовательскую работу в локальной сети или через Интернет, в том числе и через веб-браузеры.

«1С:Документооборот государственного учреждения 8» соответствует основным делопроизводственным стандартам, ГОСТам и нормативным актам:

·ГОСТ Р 6.30-2003 «Унифицированная система организационно-распорядительной документации. Требования к оформлению документов»;

·ГОСТ Р 51141-98 «Делопроизводство и архивное дело. Термины и определения»;

·Федеральный закон от 02.05.2006 № 59-ФЗ «О порядке рассмотрения обращений граждан Российской Федерации»;

·Федеральный закон от 27.07.2006 № 152-ФЗ «О персональных данных». Принят Государственной Думой 08.07.2006;

·Постановление Правительства от 15.06.2009 № 477 «Об утверждении Правил делопроизводства в федеральных органах исполнительной власти»;

·Методические рекомендации по разработке инструкций по делопроизводству в федеральных органах исполнительной власти. Утверждены приказом Росархива от 23.12.2009 № 76;

·Государственная система документационного обеспечения управления. Основные положения. Общие требования к документам и службам документационного обеспечения;

·ГОСТ Р 53898-2010 «Системы электронного документооборота. Взаимодействие систем управления документами. Требования к электронному сообщению»;

·Постановление Правительства Российской Федерации от 22.09.2009 № 754 «Об утверждении Положения о системе межведомственного электронного документооборота»;

·Приказ Министерства связи и массовых коммуникаций Российской Федерации от 02.09.2011 № 221 «Об утверждении Требований к информационным системам электронного документооборота федеральных органов исполнительной власти, учитывающих в том числе необходимость обработки посредством данных систем служебной информации ограниченного распространения».


1.1.6Работа с документами

«1С:Документооборот государственного учреждения 8» позволяет работать с документами любых типов. Каждый документ сопровождается учетно-регистрационной карточкой, набор реквизитов которой соответствует ГОСТ Р 6.30-2003, требованиям ГСДОУ, рекомендациям Росархива и традициям делопроизводства, сложившимся в отечественной практике.

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

Права доступа

В программе «1С:Документооборот государственного учреждения 8» внутренние документы и файлы хранятся в структуре папок с учетом прав доступа.

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

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

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

Регистрация входящих и исходящих документов

«1С:Документооборот государственного учреждения 8» позволяет вести учет и регистрацию входящей и исходящей корреспонденции. При этом осуществляется автоматическая генерация сквозных регистрационных номеров по настроенным правилам.

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

·учет поступивших документов, сканирование бумажных документов, печать штрих-кодов и регистрационных штампов;

·автоматизация процедуры рассмотрения документов, отправки на исполнение и постановки на контроль;

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

·ведение номенклатуры дел, формирование дел, передача закрытых дел на архивное хранение или уничтожение;

·последующее формирование отчетов по поступлению и исполнению документов, по просроченным документам.

Учет обращений граждан

В программе предусмотрена регистрация и обработка обращений граждан в соответствии с Федеральным законом от 02.05.2006 № 59-ФЗ «О порядке рассмотрения обращений граждан Российской Федерации».

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

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

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

Межведомственный электронный документооборот

«1С:Документооборот государственного учреждения 8» имеет возможность передавать и принимать документы посредством МЭДО.

МЭДО обеспечивает автоматический обмен электронными документами между различными предприятиями и учреждениями в соответствии с ГОСТ Р 53898-2010.

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

·обмен входящими и исходящими документами,

·учет поступающих документов в журналах,

·увязывание входящих и исходящих документов в цепочки,

·отслеживание состояния отправленных документов.

Сканирование

В «1С:Документообороте государственного учреждения 8» предусмотрена возможность загружать входящие, исходящие, внутренние документы и файлы со сканеров любых типов, поддерживающих интерфейс TWAIN. Сканирование осуществляется в форматы jpg, pdf и tif, в том числе и многостраничный.

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

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

Электронная почта

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

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

Имеется дополнительная возможность отправки и получения почтовых сообщений с помощью внешних почтовых клиентов. Поддерживаются почтовые клиенты Microsoft Outlook, The Bat, Mozilla Thunderbird и другие клиенты, работающие по протоколу MAPI.

Просмотр, редактирование и контроль версий

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

Текстовые файлы можно просматривать и редактировать во встроенном текстовом редакторе непосредственно в программе.

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

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

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

Непосредственно из карточки файла можно посмотреть список версий, удалить ненужные, сменить активную (текущую) версию. Для файлов популярных форматов (doc, rtf, html, txt, odt) поддерживается сравнение версий.

Шаблоны документов и файлов

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

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

Электронная подпись

В «1С:Документообороте государственного учреждения 8» поддерживается возможность использовать сертифицированные механизмы ЭП для подписания и шифрования документов и файлов. Электронная подпись позволяет установить отсутствие искажения информации в электронном документе.

Печать регистрационных штампов документов

В «1С:Документообороте государственного учреждения 8» пользователи могут выводить на печать регистрационный штамп документа, который содержит название организации, регистрационный номер и дату регистрации, штрих-код. Регистрационный штамп может печататься как на отдельном листе, так и поверх титульного листа бумажного документа.

Формирование дел

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

Контроль переданных документов

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

Связи между документами

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

Учет договоров

В «1С:Документообороте государственного учреждения 8» автоматизирован полный жизненный цикл договорных документов:

.подготовка проекта договора;

.согласование проекта договора, как внешнее, так и внутреннее;

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

.учет и контроль сроков действия договоров;

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

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

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

.контроль возврата переданных экземпляров документов по договору;

.расторжение договора.

Переадресация входящих документов

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

Комплекты документов

Часто возникает потребность работы с несколькими документами и файлами как с единым целым. Для повышения удобства работы в «1С:Документообороте государственного учреждения 8» есть возможность объединять документы в комплекты.

Поиск

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

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

При помощи расширенного полнотекстового поиска можно выбрать метод, а также ограничить область поиска выбранным разделом или разделами. Чтобы начать поиск, достаточно ввести лишь часть искомого слова или фразы.

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

Хранение файлов

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

Процессы и совместная работа пользователей

В программе «1С:Документооборот государственного учреждения 8» коллективная работа с документами реализована при помощи следующих бизнес-процессов:

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

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

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

·параллельное;

·последовательное;

·смешанное (параллельное и последовательное), в том числе и с учетом условий маршрутизации.

Утверждение: документ попадает на утверждение к ответственному лицу и возвращается к автору документа для ознакомления с результатом утверждения.

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

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

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

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

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

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

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

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

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

Предусмотрена возможность назначать задачи не только конкретным исполнителям, но и ролям. Так, например, документ можно отправить на утверждение роли «Директор», и программа автоматически доставит соответствующую задачу тому, кто в данный момент выполняет эту роль, - самому директору или его заместителю.

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

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

Реализован автоматический запуск бизнес-процессов по расписанию.

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

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

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

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

Комплексные процессы

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

Управление мероприятиями

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

Рабочий стол руководителя

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

Обсуждения

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

Протоколирование работы пользователей

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

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

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

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

Проекты

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

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

Бизнес-события

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

Организация распределенной информационной базы

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

Обмен данными с другими типовыми конфигурациями

В «1С:Документообороте государственного учреждения 8» предусмотрены планы обмена с типовыми конфигурациями, работающими на платформе «1С:Предприятие 8.2»:

·«Управление производственным предприятием», 1.3.6;

·«Управление торговлей», 11.0.6;

·«Бухгалтерия предприятия», 2.0.15;

·«Управление небольшой фирмой», 1.2.2.

Дополнительно к программе приложены правила обмена с типовыми конфигурациями, работающими на платформе «1С:Предприятие 8.1»:

·«Бухгалтерия предприятия КОРП», редакция 2.0;

·«Комплексная автоматизация», редакция 1.0;

·«Зарплата и управление персоналом», редакция 2.5;

·«Управление производственным предприятием», редакция 1.2;

·«Управление торговлей», редакция 10.


1.1.7Веб-сервисы

Работа с файлами

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

Работа с документами и процессами

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


1.2Анализ возможностей использования решений на базе Microsoft Dynamics AX (Microsoft Axapta)


1.2.1Характеристика «Microsoft Dynamics AX»

Microsoft Dynamics AX 2012- это комплексная система управления предприятием (ERPII), для предприятий корпоративного и среднего сегментов рынка. Система позволяет управлять финансами, товарно-материальными потоками, отношениями с клиентами, персоналом и другими областями деятельности компании. В ней представлен полный набор предварительной документации, слоев и дополнительных модулей.
Пакет Microsoft Dynamics AX 2012 использует платформу Microsoft SQL Server в качестве системы управления данными по умолчанию. Как считают разработчики, применение MS SQL Server обеспечивает унифицированную работу со средствами бизнес-аналитики. Кроме того, MS SQL Server - пакет Microsoft Dynamics AX 2012 - обеспечивает двунаправленную интеграцию офисными приложениями Microsoft Office 2010 и поддерживает функцию Enterprise Search (поиск по всей организации) через подключение к серверу Microsoft SharePoint 2010 и его службе бизнес-коммуникаций Business Connectivity Services. Наконец, поддерживается интеграция с сервисом коллективной работы Microsoft Lync 2010.
В целом, ERP-платформа Dynamics AX 2012 - очень зрелый подход к дизайну приложений, формализации и оптимизации бизнес-процессов. Также облегчен ролевой доступ к бизнес-информации. Система Dynamics AX 2012 полностью готова к работе в транснациональных масштабах - заказчикам предоставлена поддержка валют, часовых поясов, национальных языков, местных банковских документов, форматов отчетности и юридических процедур для 38 стран мира.

Применение, настройка и управления важными бизнес-приложениями, с помощью решения Microsoft Dynamics AX 2012 на вашем предприятии никогда еще не было таким простым. Знакомый пользовательский интерфейс Microsoft Office и расширенные возможности встроенных средств бизнес-анализа, помогут клиентам взглянуть по-новому на их бизнес, существенно повысить скорость принятия взвешенных и обоснованных решений.

С управленческой точки зрения стоит отметить, что пакет Dynamics AX 2012 продается с пятью высокоуровневыми отраслевыми шаблонами. Эти готовые шаблоны помогут быстро оптимизировать работу предприятий в таких отраслях, как производство, дистрибуция, бюджетная сфера, сервисное обслуживание и розничная торговля. В рамках предлагаемых шаблонов пакет Dynamics AX 2012 содержит изменяемые наборы так называемых «унифицированных естественных моделей» (Unified Natural Model), которые охватывают множество реальных ситуаций, возникающих в этих отраслях.

Пакет Microsoft Dynamics AX 2012 использует платформу Microsoft SQL Server <#"justify">1.2.2Microsoft Dynamics AX 2012 обеспечивает:

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

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

·Простоту по всем направлениям, что позволяет гибко конфигурировать и настраивать собственные решения, одновременно снижая общую стоимость владения для клиентов. Решение Microsoft Dynamics AX 2012 сосредоточено на повышении качества выполнения каждого бизнес-процесса для ИТ-специалистов и конечных пользователей - проще, легче и понятнее.

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

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

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

·Готовое решение по интеграции MS Dynamics AX 2012 с MS Dynamics CRM с помощью нового коннектора.

·Новые инструменты для бизнес-анализа BI <#"justify">1.2.3Microsoft Dynamics AX 2012 для России

В России локализованная версия Microsoft Dynamics AX 2012 доступна с 12 декабря 2012 года.

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

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

Новая ERP-система Microsoft готова успешно конкурировать с решениями основных вендоров в России.


1.3Анализ возможностей использования решений на базе CA Clipper


СА Clipper - система программирования <#"justify">Clipper работает в среде операционной системы MS DOS версии 2.0 и выше. В результате компиляции текстов программ на исходном языке он порождает загрузочные программные модули, не требующие каких-либо системных средств на стадии исполнения.

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

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

В языке программирования системы Clipper отсутствуют такие полноэкранные команды языка dBase, как ASSIST, BROWSE, EDIT, имеются ограничения на использование функции макроподстановки (&). Значением строковой переменной, к которой применяется эта функция, не может быть, в частности, полная команда или фраза команды с ключевым словом, а также список имен полей записи файла БД или других объектов языка с разделителями запятыми. Вместе с тем в язык введены многие расширения. К их числу (в летней версии 1987 г.) относятся возможности работы с массивами переменных, которые могут объявляться при необходимости глобальными величинами, спецификации функций, определяемых пользователем, возможности обращения к функциям на языках Си и ассемблере с передачей им параметров, средства программирования пользовательских интерфейсов, построенных в стиле меню, сохранения и восстановления изображений, показанных на экране, большое количество новых функций различного назначения, в частности, для операциями со строками.

В языке Clipper предусматриваются средства блокирования файлов и записей файлов БД, необходимые для использования программ на этом языке в мультипользовательской среде сетевых систем БД. Введены новые синтаксические конструкции, например циклы FOR...NEXT, новая фраза VALID для верификации данных, вводимых с помощью команды GET, и ряд других.

К пользовательской программе можно легко подключить процедуру HELP, обеспечивающую глобальную и контекстно-зависимую помощь. Эта процедура вызывается на стадии исполнения традиционным нажатием функциональной клавиши F1. При этом ей автоматически передаются необходимые параметры.включает, как уже указывалось, весьма богатые системные библиотеки функций различного характера, существенно обогащающих язык, позволяющих значительно сокращать затраты времени на прикладное программирование и уменьшать объем исходного кода. В летней версии 1987 г. предусмотрено около ста различных функций для анализа состояния системы, операций с массивами, для вычисления элементарных математических функций, операций над строками, редактирования данных, для создания файлов DOS и выполнения операций над ними, работы со значениями полей типа Memo в записях файлов БД и для других целей.

Кроме того, пользователь имеет возможность создавать и использовать собственные библиотеки функций. Что касается системных библиотек, то Nantucket Corp. Постоянно расширяет их состав. В 1988 г. был дополнительно включен ряд новых функций, кроме того, фирма начала поставлять пакет Clipper предназначенного для использования совместно с системой Clipper. Пакет содержит большую новую структурированную библиотеку функций и расширенный драйвер экранов и клавиатуры, призванный заменить имеющийся в системе Clipper драйвер. Эти функции и драйвер могут включаться в приложение на стадии редактирования. Все функции библиотеки обладают высокой производительностью и предъявляют минимальные требования к оперативной памяти. Они реализованы на языке ассемблера и оптимизированы. Библиотека пакета включает ряд функций для конструирования многооконных пользовательских интерфейсов, для непосредственной работы с оборудованием, подключенным к последовательному интерфейсу ПЭВМ, минуя BIOS и обращения к DOS.

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

Важным достоинством системы Clipper является возможность использования дополнительной (свыше 640 Кбайт) памяти персонального компьютера при исполнении разработанных его средствами п/п.

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

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

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

Версия Clipper 5.0 обладает и другими важными достоинствами.

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

Предусматриваются новые типы переменных, а также многомерные массивы. Разработана машинно-ориентированная документация, к которой возможен доступ в режиме on-line с помощью GuidetoClipper или NortonGuide.


1.4Анализ возможностей использования решений на базе FoxPro


СУБД FoxPro, фирмы Fox Software (теперь Microsoft) обладает исключительно высокими скоростными характеристиками и в этом отношении заметно выделяется среди интерпретирующих систем. Сравнительно с dBASE(IV) ее скорость в несколько раз выше. Практически по всем показателям Fox-программы работают заметно быстрее Clipper-программ. Набор команд и функций, предлагаемых разработчикам программных продуктов в среде FoxPro, по мощи и гибкости отвечает любым современным требованиям к представлению и обработке данных. Здесь может быть реализован максимально удобный, гибкий и эффектный пользовательский интерфейс. В FoxPro поддерживаются разнообразные всплывающие и многоуровневые меню, работа с окнами и мышью, реализованы функции низкоуровневого доступа к файлам, управление цветами, 'настройка принтера, данные могут быть представлены в виде, похожем на электронные таблицы, и т.п. Система также обладает средствами быстрой генерации экранов, отчетов и меню, поддерживает язык SQL, устойчиво работает в сети. FoxPro реализован также в средах Macintoch, Unix и MS Windows, сохранив полную преемственность по языку и формату данных, так что DOS-программы могут быть легко перенесены на другую платформу.


1.4.1Особенности языка FoxPro

Интернационализация пакета. С версии FoxPro-2.5 в СУБД можно задать кодовую страницу нужной страны и преобразование и сортировка символов национального алфавита будут выполняться корректно. Кроме того, можно давать имена полям и переменным на родном языке.

Динамическое распределение памяти компьютера. Системе доступна памяти и за пределами 640 Кбайт.

Система "замечает" имеющийся сопроцессор. При этом ее характеристики улучшаются.

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

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

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

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

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

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

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

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

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

Возможность построения многоуровневых световых меню, в качестве элементов которых могут фигурировать как произвольные

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

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

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

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

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

Низкоуровневый доступ к файлам.

Удобный и гибкий отладчик.

Язык FoxPro включает средства создания Windows-подобного 'интерфейса, т.е. так называемого интерфейса, управляемого событиями.

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

В FoxPro на одном экране можно разместить сразу много разнообразных окон редактирования и средств управления данными, все они легко доступны пользователю. Именно здесь эффективно использование мыши. Такой экран является наиболее полным аналогом рабочего стола конторского работника, иногда в беспорядке заваленного горами документов, картотеками, справочниками и т.п., которые могут понадобиться ему в любой момент. FoxPro предлагает интерфейс, обеспечивающий быстрый доступ ко всем нужным данным и вместе с тем возможность поддержания их четкой взаимосвязи и порядка. Если оказывается, что на экране-столе слишком тесно, временно ненужные документы могут быть отодвинуты, уменьшены или даже совсем "убраны" в сторону (временно скрыты с экрана), или отображены только своим заголовком с возможностью раскрыть их при необходимости. Разработчику следует позаботиться о правильном интегрировании всех экранных объектов, а также контролировать свое положение среди них. Программирование такого интерфейса не является тривиальным делом. Как известно, чем удобнее интерфейс пользователя, тем сложнее его программирование.

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

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

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


1.5Выводы по главе


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

Недостатки 1С: Предприятие и Microsoft Dynamics AX, относительно нашей системы можно объединить. Главным их недостатком является несовместимость с устаревшим форматом базы данных, используемой в ЦСО, в этих платформах не отлажена связь с индексами, они их попросту «не видят», из-за чего происходит потеря данных. Из этого следует, что переход системы на одну из этих платформ невозможна, необходимо создавать всю базу данных с самого начала, что не представляется целесообразным. Также из недостатков можно выделить высокую стоимость внедрения, включающую затраты на разработку и поддержку программных модулей, переоборудование рабочих станций и переобучение персонала.

Последнее обновление CA Clipper 5.3b - дата выпуска 20 мая 1997, из чего мы делаем вывод, что платформа морально устарела, создание Windows приложений на ней не представляется возможным. Разработка каких-либо приложений на этой платформе не является целесообразной.

Одним из самых главных достоинств Visual FoxPro 9.0 является его полная совместимость с устаревшими форматами данных. Также в новой платформе внедрены функциональные возможности, обеспечивающие совместимость существующих приложений с более новыми платформами, возможен простой переход системы с платформы Visual FoxPro 9.0 на более мощные и современные, такие как 1С и Microsoft Dynamics AX 2012.

В связи с этим, было принято решение о переводе на современную windows-платформу существующей системы с использованием именно СУБД

Microsoft® Visual FoxPro 9.0 Professional SP2.


2.Обзор программного обеспечения, используемого в ЦСОВККО


2.1 Общие положения


В настоящее время в Центре Социального Обеспечения Военного Комиссариата Курской Области применяется программа «PENSION.EXE», реализованная на CA CLIPPER 2.0, которая ведет учет пенсионных дел военнослужащих Курской области, а также всех выплат и компенсации по этим делам. Программная платформа CA CLIPPER на протяжении длительного времени не обновляется разработчиками, по причине слишком серьезной отсталости от современных информационных разработок, большого количества альтернативных платформ и нецелесообразности данных мероприятий.


.1.1 Применяемые термины

файл выплат (EV.dbf) - файл, в котором хранятся данные обо всех произведенных выплатах, и производится отметка: в какой реестр включены записи и в какой файл электронного реестра они включены,

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

справочник реестров (VEDOMR.dbf) - файл, в котором содержится информация о сформированных реестрах, дата их печати, включения их в электронный реестр, о количестве записей и суммах выплат,

номер реестра - код реестра из справочника VEDOMR.dbf, в который включена конкретная выплата,

реестр назначенных выплат - список назначенных выплат, которым присвоен определенный номер реестра,

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

файл электронного реестра (SPDDMMY.dbf) - файл, содержащий информацию для формирования электронного реестра (SP - общий признак, DD - день, MM - месяц, Y - год формирования),

электронный реестр (DDMMYKKK.nnn) - файл в формате, определенным Сбербанком для передачи (DDMMY - дата формирования файла, KKK - код администратора расходов (для Минобороны 187), nnn - внутренний код отделения Сбербанка),

транспортный пакет (NNNNKKKi.war) - архивный файл, упакованный с использованием архиватора PKZIP.exe, содержащий электронный реестры и предназначенный для передачи в ОСБ (NNNN - код подразделения Сбербанка, KKK - код администратора расходов (для Минобороны 187), i -индекс центра пенсионного обеспечения, war - расширение файла).


2.1.2 Схема организации работы по формированию файлов электронного реестра

Для формирования электронного реестра предлагается следующая схема:

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

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

.после формирование реестра, он распечатывается для проверки и утверждения;

.реестр предоставляется на проверку (утверждение) начальникам отделений (центров);

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

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

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

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

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


2.2 Назначение пенсий, пособий (компенсаций) индивидуальное


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


2.2.1 Назначение пособий, компенсаций

Для того чтобы данные индивидуального назначения попали в электронный реестр, следует при выборе типа документа (после выбора выплаты - F3) выбрать «Список» или «Поручение»


.2.2 Назначение пенсий

1.Разрешение на выплату пенсии

Для того, чтобы разрешение на выплату пенсии попало в файл выплат EV.dbf и, следовательно, в реестр выплат, назначенных пользователем и в файл электронного реестра, в карточке нажмите клавишу «Ш». Откроется форма ввода разрешения на выплату пенсии:

Заполните необходимые поля, распечатайте разрешение, нажав клавишу F6. После этого появится кнопка «Выгрузить в реестр F7», нажав которую, Вы измените запись в БД EV.dbf для вывода в реестр выплат, назначенных пользователем.

2.Перерасчет пенсий

Для того, чтобы изменения размеров пенсии попали в файл выплат EV.dbf и, следовательно, в реестр выплат, назначенных пользователем и в файл электронного реестра, после исчисления пенсии (F6), нажмите F4 и на вопрос «Куда вывести?» просто нажмите клавишу Esc (или распечатайте, если хотите).


2.3 Назначение пособий (компенсаций) списком


Для доступа к назначению компенсаций (пособий) следует установить право пользователю «Назначение компенсаций (пособий) списком», для чего, при выборе пользователя при входе в программу нажмите Alt+F4, введите пароль администратора и добавьте это право, нажав клавишу «пробел» на выделенной строке (см. ниже).


2.3.1 Формирование списка

В основном меню программы выберите пункт «Компенсации (пособия)» и нажмите клавишу «Ввод». Откроется окно назначения пособий (компенсаций):

Выберите выплату, нажав клавишу «F3»

Откройте файл для вывода, нажав клавишу «F2»

Если выбрана выплата ПЕНСИИ, то открывается иное окно:

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

IdPev.dbf, где Id - код исполнителя, Pev - код выплаты.

Далее введите период назначения выплаты, нажав клавишу «F4» и назначьте выбранную выплату для всех, кому она положена, нажав комбинацию клавиш «Ctrl+Insert».

Для компенсации на оздоровление можно производить индивидуальное назначение выплаты, нажав клавишу «Insert»


2.3.2 Обработка списка

После назначения выплат, их можно просмотреть (F5) или распечатать в виде списка по ОСБ (F6).

Для переноса всех назначенных выплат в файл выплат EV.dbf и формирования реестра (т.е. назначения каждой выплате № реестра), нажмите F7, введите дату формирования реестра и выберите, какие записи включать в реестр:

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

ранее не включенные в реестр, если в реестр добавить все записи из списка, которые ранее не были включены в реестр (в файле выплат не назначен № реестра).

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

Кроме того, если пользователю назначены права на формирование реестра для сбербанка, то отобранные записи можно вывести непосредственно в электронный реестр для Сбербанка (F10). Это может потребоваться для повторного формирования реестра для передачи в Сбербанк.



.4 Назначение пенсий списком (после массового перерасчета)


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

произведите перерасчет пенсий (в т.ч. и для 80-летних);

войдите в меню «КОМПЕНСАЦИИ (пособия)»;

выберите выплату «Пенсии» (F3);

откройте файл для вывода (F2);

удалите лишние записи (если они есть) (Ctrl+Del);

выберите период, за который назначены пенсии или дату, с которой произведен перерасчет (F4);

сформируйте список назначенных пенсий (Ctrl+Insert). При этом можно выгрузить данные о назначенных пенсиях:

только на дату перерасчета;

за указанный период;

установить дополнительный фильтр (например: для перерасчета пенсий тем, кому исполнилось 80 лет фильтр «OSNP(основание перерасчета) =26»);

всем, кому назначена пенсия (соцпособие, оклад по воинскому званию);

сформируйте реестр (F7). При этом в реестр будут включены (по Вашему выбору) выплаты (пенсии):

только новые (дата/сумма): те, у которых изменились дата начала выплаты или сумма);

ранее не включенные в реестр: те, которые ранее не были включены в реестр (поле VEDOMR в файле выплат EV.dbf равно 0).

После этого, сформированный реестр можно включать в файл электронного реестра для ОСБ.



.5 Формирование реестра выплат, назначенных исполнителем


В основном меню выберите пункт «Формирование реестра»

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

Будет произведено формирование реестра выплат, назначенных текущим исполнителем за указанный период. Если существует реестр исполнителя, который еще не печатался (поле «Дата печати» пустое), данные будут добавлены в этот реестр, иначе - в новый реестр.


2.6 Печать реестра выплат, назначенных исполнителем


В основном меню выберите пункт «Печать реестра»

Выберите реестр, который Вы собираетесь распечатать, нажмите Enter.

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


2.7 Формирование электронного реестра


Для получения доступа к формированию электронного реестра, следует установить право на формирование реестра: при входе в программу и выборе пользователя нажать Alt+F4, выбрать строку 8 «ФОРМИРОВАНИЕ РЕЕСТРА ДЛЯ СБЕРБАНКА» и нажать пробел для отметки этого права.


2.7.1 Формирование списка выплат для электронного реестра

В основном меню программы выберите пункт «Формирование реестра» и нажмите клавишу «Ввод». Откроется окно подготовки электронного реестра для ОСБ.

3.Выбор файла для электронного реестра (даты формирования реестра)

Для открытия файла выбираете F2, если формируете файл на текущую дату, или F3, если надо открыть ранее сформированный файл.

На каждую дату можно сформировать несколько файлов (при необходимости). Имена файлов - SPDDMMYi.dbf, где: DD - день, MM - месяц, Y - год, i - дополнительный индекс (пусто, 0,1,2…9,A,B,C…Z,a,b,c…z,А,Б,В…Я,а,б,в…я).

Если Вы формируете реестр на текущую дату, нажмите клавишу F2. Если Вы хотите выбрать ранее сформированный реестр, нажмите F3 - откроется окно выбора:

Выберите нужный файл реестра и нажмите клавишу «Enter».

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

4.Выбор реестров исполнителей

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

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

5.Загрузка реестров исполнителей

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

6.Печать ведомости (списка), вывод данных в файл реестра для ОСБ.

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

для печати ведомости реестров исполнителей, включенных в электронный реестр для ОСБ, нажмите F8;

для печати списка всех выплат, включенных в электронный реестр, нажмите F9;

- для вывода сформированного электронного реестра в файл в соответствии со структурой, определенной для передачи в ОСБ, нажмите F10.


2.7.2 Формирование файлов электронного реестра

После формирования списка выплат, следует сохранить (вывести) его в формате электронного реестра, определенным Приложением №1 к Договору. Для этого нажмите клавишу F10 «Вывод в реестр» и выберите вариант формирования электронного реестра: «по ОСБ» или «одним файлом».

7.Формирование электронных реестров по каждому подразделению Сбербанка

В случае выбора варианта вывода по ОСБ, последовательно выберите отделения Сбербанка, для которых осуществляется вывод.

Для каждого ОСБ будут сформированы:

)файлы с информацией с именем DDMMYKKK.nnn, где:

DDMMY - дата формирования файла,

KKK - код администратора расходов (для Минобороны 187),

nnn - внутренний код отделения Сбербанка в соответствии с Вашей кодировкой;

)транспортные пакеты (в виде архивного файла, с использованием архиватора pkzip) с именем NNNNKKKi.war, где:

NNNN - код подразделения Сбербанка,

KKK - код администратора расходов (для Минобороны 187),

i -индекс центра пенсионного обеспечения (по умолчанию 0), изменить можно в файле PENSION.ini, секция [file_osb], имя переменной indexCSO.

По окончании вывода, будет выведено сообщение, куда выведены транспортные пакеты.

По умолчанию транспортные пакеты выводятся в папку ZIP, где:

ZIP - имя подкаталога в каталоге, где находится программа PENSION.exe,

Имя папки для размещения транспортных пакетов можно изменить, для этого в файле PENSION.ini, в секции [file_osb] измените значение переменной dir_zip.

8.Формирование единого электронного реестра для всех подразделений Сбербанка

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

Имя папки для размещения электронных реестров можно изменить, для этого в файле PENSION.ini, в секции [file_osb] измените значение переменной dir_osb.


2.7.3 Формирование транспортных пакетов для передачи в Сбербанк

В связи с тем, что для формирования транспортных пакетов используется архиватор PKZIP версии старше 2.06, который не запускается из DOS-программы PENSION, для формирования транспортных пакетов используется WINDOWS-приложение ZIP32.exe.

9.Установка программы формирования транспортных пакетов ZIP32

Для установки программы загрузите программу Rintime.exe и архив ZIP32.rar

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

Для регистрации библиотек - запустите файл RUNTIME.exe. После появления окна

Распакуйте содержимое архива ZIP32.rar в папку, где находятся программа PENSION.exe.

Для удобства работы с программой - создайте ярлык приложения ZIP32.exe на рабочем столе.

10.Формирование единого транспортного пакета (за все ОСБ)

Если нет необходимости формировать транспортные пакеты отдельно по каждому ОСБ (для чего и используется программа ZIP32.exe), можно сформировать единый пакет (для всех файлов с информацией помещенных в папку ZIP) используя командный файл CSKO.bat, размещенный в папке с программой.

Этот командный файл производит архивацию всех файлов, содержащихся в папке ZIP (кроме файлов с расширением war) в файл CSKO1870.war.

Имя этого файла можно изменить, открыв файл CSKO.bat с помощью любого текстового редактора и заменить в 3 строке имя CSKO1870.war на необходимое.

11.Формирование транспортных пакетов по каждому ОСБ

Имена транспортных пакетов: NNNNKKKi.war, где

NNNN - код подразделения Сбербанка с использованием ведущих нулей;

KKK - код администратора расходов;

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

war - расширение имени файла транспортного пакета для передачи банку.

Перед формированием транспортных пакетов удалите все файлы с расширением WAR (или перенесите их в какой-либо каталог по Вашему усмотрению).

Запустите программу ZIP32.exe, найдя её в проводнике Windows или с помощью ярлыка на рабочем столе.

В процессе работы программа произведет архивацию всех текстовых файлов (размещенных в папке ZIP), предназначенных для передачи в ОСБ, и создаст файлы транспортных пакетов с расширением WAR.

В связи тем, что используемаяDOS-программа PKZIP создает файлы архива с расширением в верхнем регистре (WAR), а для передачи в ОСБ следует использовать расширение файлов в нижнем регистре (war).

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


.8 Выводы по главе


Рассмотрев программное обеспечение, используемое в ЦСО ВККО был сделан вывод, что плюсами этой программы являются: простота интерфейса - пользователям не нужно проходить специализированные обучающие курсы для работы с ней, низкая ресурсопотребность - нет необходимости в обновлении оборудования и покупке новых компьютеров и как следствие высокая скорость работы системы. К минусам можно отнести то, что используемое программное решение «PENSION.EXE» оперируют с несвязанными друг с другом таблицами устаревшего формата *.dbf. Используемые индексные файлы *.cdx и *.idx требуют ручного обновления средствами программы, из этого следует, что целостность базы данных контролируется в ручном режиме только на уровне программного решения «PENSION.EXE».

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


3.Проектирование автоматизированной информационной системы обработки данных учета пенсионных начислений и компенсаций ЦСО Военного комиссариата Курской области


В Центре Социального Обеспечения Военного Комиссариата Курской Области используется программа «PENSION.EXE», реализованная на CA CLIPPER 2.0, которая ведет учет пенсионных дел военнослужащих Курской области, а также всех выплат и компенсации по этим делам. К плюсам этой программы относятся: простота интерфейса - пользователям не нужно проходить специализированные обучающие курсы для работы с ней, низкая ресурсопотребность - нет необходимости в обновлении оборудования и покупке новых компьютеров и как следствие, высокая скорость работы системы. Большим минусом является отсутствие инструментов по контролю за соблюдением целостности базы данных. Для редактирования базы данных необходимо открывать каждую таблицу-справочник, и в каждой таблице дублировать внесенные изменения. Поэтому было принято решение создать автоматизированную информационную систему обработки данных с контролем целостности базы для конкретного программного продукта, без изменения формата данных с минимальными требованиями к визуальному оформлению.

С учетом формата данных и прежде всего устаревшего оборудования, используемого в ЦСО ВККО, для реализации поставленной задачи был выбран Microsoft® Visual FoxPro 9.0 Professional.


3.1Формирование базы данных проекта


Для сведения к минимуму риска потери данных, принято решение вести разработку в одном проекте.


Рисунок 3.1 - Стартовое окно Microsoft Fox Pro


Для создания базы данных нам необходимы следующие таблицы - справочники: «BANK.dbf» - справочник отделений банка; «EV.dbf» - файл выплат, в котором хранятся данные обо всех произведенных выплатах, и производится отметка: в какой реестр включены записи и в какой файл электронного реестра они включены; «GRVK.dbf» - справочник Военных Комиссариатов Курской области; «USER.dbf» - справочник пользователей, зарегистрированных в программе; «VEDOMR.dbf» - справочник выплат, в котором содержится информация о сформированных реестрах, дата их печати, включения их в электронный реестр, о количестве записей и суммах выплат.


Рисунок 3.2 - Окно проекта Microsoft Fox Pro


Таблица «EV.dbf «- дочерняя, таблицы «BANK.dbf», «GRVK.dbf», «USER.dbf», «VEDOMR.dbf» - родительские. При проектировании базы данных задачей является обеспечить возможность редактирования только родительским таблицам.

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

Так индекс kod_vedomr из родительской таблицы Vedomr.dbf связан с индексом vedomr из дочерней таблицы EV.dbf с помощью реляционной связи «один-ко-многим», индекс kod_bank из родительской таблицы Bank.dbf связан с индексом bank из дочерней таблицы EV.dbf также с помощью реляционной связи «один-ко-многим», индекс kod_grwk из родительской таблицы Grwk.dbf связан с индексом grwk из дочерней таблицы EV.dbf при помощи реляционной связи «один-ко-многим», индекс kod_user из родительской таблицы User.dbf связан с индексом id из таблицы EV.dbf с помощью реляционной связи «один-ко-многим», и индекс kod_user из таблицы User.dbf связан с индексом id из таблицы Vedomr.dbf с помощью реляционной связи «один-ко-многим». Полная схема связей и индексов базы данных представлена на рисунке 3.3.


Рисунок 3.3 - Схема связей индексов таблиц


Важно убедиться в том, что типы данных связанных индексов совпадают.

Только при условии совпадения типов связанных индексов можно воспользоваться функцией «Referential Integrity», которая отвечает за контроль целостности базы данных.


Рисунок3.4 - Окно функции «Referential Integrity»


3.2Проектирование экранных форм


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


Рисунок 3.5 - Окно проекта, отображающее формы.


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

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

Рисунок 3.6 - Окно справочника выплат


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

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


Рисунок 3.7 - Окно справочника банков


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

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


Рисунок 3.8 - Окно справочника ВККО


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

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


Рисунок 3.9 - окно справочника пользователей


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


Рисунок 3.10 - Окно формы справочники


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


Рисунок 3.11 - Окно готового проекта

программный реестр электронный пенсия

3.3Вывод по главе


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


4.Тестирование разработанного ПО


4.1Проверка на сохранность целостности данных


Для запуска проекта необходимо кликнуть по ярлыку «Zapysk»


Рисунок 4.1 - Ярлык запуска проекта


После этого откроется стартовое окно Visual FoxPro и запустится форма «Справочники».


Рисунок 4.2 - Окно проекта с запущенной формой «Справочники»


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


Рисунок 4.3 - Окно формы «Справочники ВККО»


На форме выбираем к примеру последний в списке Военный Комиссариат и нажимаем кнопку «Редактировать», изменяем код ВККО с 31 на 32. В файле выплат код данного Военного Комиссариата по прежнему 31.


Рисунок 4.4 - Внесение изменений в форме «Справочник ВККО»


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


Рисунок 4.5 - Сохранение изменений в форме «Справочник ВККО»


4.2Проверка на контроль за соответствием типов данных


Снова запускаем проект кликнув по ярлыку «Zapysk»


Рисунок 4.6 - Ярлык запуска проекта


После этого откроется стартовое окно Visual FoxPro и запустится форма «Справочники».


Рисунок 4.7 - Окно формы Справочники


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


Рисунок 4.8 - Окно формы Справочник банков


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


Рисунок 4.9 - Окно формы Справочник банков в режиме редактирования


Стираем существующую запись типа numeric и пытаемся внести символьные данные. Программа не позволяет это сделать, попросту игнорируя попытки внести символы другого формата.


4.3Выводы по главе


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


5.Расчет системы кондиционирования офисного помещения ЦСО


Исходные данные

г. Курск

Остекление-2-е

Стена - кирпич 250 мм+125 мм, прослойка (минеральная вата)70 мм

Кровля- Стяжка 100 мм, ж/б плита- 50 мм, прослойка 200 мм.

Высота окна- 1,5 м

Высота помещения- 3м

Ориентация оси -Ю

Ф= 40%-60%

Люди, оргтехника и бытовая техника в помещениях для кондиционирования.


Таблица 5.1 - Исходные данные

Помещения№ 1№ 3№ 4№ 5№ 6Кол-во людей, чел22252Оргтехника, и.т.д1 к1к1к5 к1к

5.1Введение


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

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

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

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


5.2Расчет поступления тепла и влаги в помещение (тепловой баланс)


5.2.1Расчетные параметры воздуха

В качестве расчетных параметров наружного воздуха принимают расчетные параметры Б для заданного района строительства в холодный период (таблица 5.2), в теплый - температуру наружного воздуха на 20С и удельную энтальпию на 2 кДж/кг ниже, чем при параметрах Б.


Таблица 5.2 - Расчетные параметры наружного воздуха

Наименование пунктаРасчетная географическая широта, °с .ш.Барометрическое давление ГПаПериод годаПараметры Бтемпература воздуха, °Судельная энтальпия, кДж/кгскорость ветра, м/сКурск601010ТП ХП24,8 -2651,5 -25,31 3

Принимаем:

Летний режим

Расчетные параметры наружного воздуха

tН = +22,8°С; I= 49,5кДж/кг

Расчетные параметры внутри помещения

tВ = +20°С ?= 60%

Зимний режим

Расчетные параметры наружного воздуха

tН = -26°С; I= -25,3 кДж/кг

Расчетные параметры внутри помещения

tВ = +18°С ?= 40%


5.2.2Поступление тепла и влаги в помещение

а) Теплопоступления за счет разности температур в теплый период года


, Вт


где - коэффициент, зависящий от цвета ограждения, принимаем светлый цвет (=0,5)

К- расчетный коэффициент теплопередачи, который определяется по формуле:



соответствии со СНиП II-3-79* находим:


;


для стены


;


для чердачного перекрытия



для стен



для чердака



б) Теплопоступления за счет инфильтрации наружного воздуха



где М- количество воздуха, определяемое по формуле:



где ?- коэффициент учитывающий остекление; принимаем 0,3

m- коэффициент учитывающий величину щели, принимаем = 35,5

l - длина щели.

С- теплоемкость воздуха- 1,005

в) Теплопоступления от людей.

Количество теплоты (Сумма скрытой и явной) определяется по формулам: полное:



и явное



б) Теплопоступления от источников искусственного освещения.

Теплопоступления от источников искусственного освещения определяем по следующей формуле:



-удельная мощность светильников, принимаем

- доля теплоты, поступающей в помещение;

г)Теплопоступления от солнечной радиации.

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

для остекленных поверхностей



для покрытий:



где , - площади поверхности остекления и покрытия, м2.

,- теплопоступления от солнечной радиации через 1м2 поверхности остекления и покрытия, Вт/м2;

- коэффициент зависящий от характера остекления и солнцезащитных устройств;

- коэффициент теплопередачи покрытия Вт/(м3*К)

также вводим поправку на защиту окон Z=0,2

д) Теплопоступления от технологического оборудования

Принимаем 300 Вт- 1компьютер.

Результаты расчетов сведены в таблицу 5.3 и 5.4.


Таблица 5.3 - Тепловой расчет помещений (ТП)

№ помещенияКоличество людейТеплопоступления, кВтРасход воздуха, м3/чот разности температурот инфильтрации наружного воздухаот оборудованияот солнечной радиацииОт источников искусственного освещенияОт людейВсегоКоличество наружного воздуха, необ. для дыхания120,1022,9660,31,6576,8110,312,1120320,0030,2700,30,0600,4360,31,4120420,0060,2400,30,0750,5450,31,5120550,0080,2401,50,0920,6720,753,3300620,0111,4680,30,7001,9420,34,7120?23,0*Примечание: Qя меньше на 0,65 кВт



Таблица 5.4 - Тепловой расчет помещений (ХП)

№ помещенияКоличество людейТеплопоступления, кВтРасход воздуха, м3/чот оборудованияОт источников искусственного освещенияОт людейВсегоКоличество наружного воздуха, необходим.для дыхания120,36,8110,37,4120320,30,4360,31,0120420,30,5450,31,1120551,50,6720,752,9300620,31,9420,32,5120?15,1

е) Влаговыделения

Определяется по формуле:


, кг/ч


где Wi - влаговыделения одним человеком г/ч; ni- число людей в помещении.

Также добавляют 1,5 кг/ч на влажную уборку помещения, принимаемую один раз в день.


Таблица 5.5 - Итоги расчета теплового баланса

№ Помещения13456уборка?Кол-во людей22252-13Влаговыделения ТП0,150,150,150,3750,151,52,48Влаговыделения ХП0,130,130,130,3250,131,52,35

5.3Построение в Id диаграмме процессов обработки воздуха в теплый и холодный период года


5.3.1Расчет производительности СКВ


а) ТП (Теплый период)

. Определяем угловой коэффициент луча процесса:



. Находим температуры приточного и удаляемого воздуха:



Строим на Id- диаграмме луч процесса, через точку В и наносим точки П, У, соответствующие найденным температурам.

. Определяем необходимый воздухообмен.

Определяем воздухообмен по полному тепловыделению:



Определяем теплообмен по явному тепловыделению:



Определяем воздухообмен по влаговыделению:


Затем на поле I-d диаграммы наносим линию dП= const, по которой находим положение точек П' и О, характеризующих состояние воздуха на выходе из кондиционера и из камеры орошения.

б) ХП (Холодный период)

. Определяем угловой коэффициент луча процесса:



. Находим температуры приточного и удаляемого воздуха:



Строим на Id- диаграмме луч процесса, через точку В и наносим точки П, У, соответствующие найденным температурам.

. Определяем необходимый воздухообмен.

Определяем воздухообмен по полному тепловыделению:



Определяем теплообмен по явному тепловыделению:



Определяем воздухообмен по влаговыделению:


Затем на поле I-d диаграммы наносим линию dП= const, по которой находим положение точек П и О, характеризующих состояние воздуха на выходе из кондиционера и из камеры орошения.


5.3.2Расчет количества тепла для подогревателей 1-ого и 2-ого подогрева

Выбираем максимальный воздухообмен с запасом 5% = 10675*5%=11200 кг/ч,



Мощность воздухоподогревателя I ступени - 135 кВт



Мощность воздухоподогревателя II ступени- 28 кВт

Для теплого периода, судя по диаграмме подогревателей II подогрева не понадобится, воздух с температуры 140С нагреется до расчетной внутренней за счет теплоизбытков в помещении:


= 20 кВт


5.3.3Расчет количества холода в воздухоохладителях для летнего периода

Расход холода для осуществления процесса охлаждения и осушки воздуха:



производительность СКВ должна равняться 45 кВт


5.3.4Расчет количества воды, испарившейся в оросительной камере

Расход влаги на испарение в камере орошения:


ХП:


5.4Выбор типоразмера кондиционера и расчет его секций


Расчетный воздухообменG = 11200 кг/ч =>L = 9300 м3/ч.

По расчетному воздухообмену принимаем центральный кондиционер КТЦ 2А-10

5.4.1Расчет и подбор воздухонагревателей


Задача расчета воздухонагревателя заключается в выборе поверхности воздухонагревателя с запасом 10%

Исходя из доступного перепада температур, вычисляют расход горячей воды, кг/ч;



Средний арифметический температурный напор в воздухонагревателе, 0С;



Вычисляют массовую скорость в живом сечении Vp, кг/(м2?с);



где G- расход воздуха через сечение теплообменника, кг/ч;

- площадь сечения для прохода воздуха

Скорость течения воды:



Требуемая площадь поверхности воздухонагревателя, м2;



где К- коэффициент теплопередачи, Вт/ (м2?с)



С- коэффициент для двухрядных -16,86; однорядных- 15,6.

Расчет I ступени подогрева воздуха:

Запас +10% = 51,66м2;51,66/2 = 25,83

Принимаем 2 двухрядных теплообменника высотой 1метр с площадью 25,9 м2 каждый с обводным каналом ВНО. Индекс 01.11213

Расчет II ступени подогрева воздуха:

Принимаем 1 однорядный теплообменник высотой 1,25 с площадью 16,35 м2 без обводного канала ВН. Индекс 01.10113


5.4.2Расчет камер орошения

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

а)Расчет для теплого периода

По расходу воздуха G=11200задаются типом камеры и числом форсунок nф. По диаграмме в зависимости от конечной и начальной относительной влажности обрабатываемого в камере орошения воздуха определяют давление перед форсунками РФ. Оно составит 120 кПа. Для этого значения расход воды через форсункуgф составит 420 кг/ч.

Выбираем для кондиционера КТЦ 2А-10 с общим числом форсунок - 42. (Исполнение 1).

Общий расход воды через форсунки составит:



Определяем коэффициент орошения:



По значению коэффициента орошения определяют достижимое значение = 0,57

Энтальпия насыщенного воздуха при начальной температуре воды, кДж/кг:



На Id диаграмме на пересечении линии Iwн с линией полного насыщения (?=100%), находят требуемую начальную температуру воды twн и вычисляют конечную температуру воды. Температура воды перед форсункой составит tm=7,70С.



б) Расчет для холодного периода

По Id- диаграмме находят начальные и конечные параметры воздуха и температуру мокрого термометра.

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



По таблице найдем В= 1,55



Вычисляем производительность одной форсунки:



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

Принимаем камеру орошения Индекс 01.01300 исполнение 1


5.5Холодоснабжение СКВ


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



Подбираем чиллер серии WRAT182, Холодопроизводительностью 47,9 кВт

Мощность потребляемая компрессором- 14,4 кВт

Тип компрессора- Поршневой

Напряжение питания компрессора- 380-415/3/50+N

Число герм. компрессоров (охл. контуров) - 2/2

Осевые вентиляторы с установочной мощностью- 2×0,32 кВт

Общая производительность по воздуху - 4,16 м3/с

Транспортная масса- 430 кг.

Длина- 1642 мм.

Глубина- 954 мм.

Высота- 1570 мм.

Принимаем объем аккумулирующего бака 150L× GPA 150

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



где Q- холодопроизводительность чиллера, кВт

- перепад температур на чиллере (5-6 0С)

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

) Потери в теплообменнике чиллера (+50% к потерям в трубопроводе, от бака к чиллеру и обратно.

) Потери в самой насосной станции и потери на соединениях между чиллером и насосной станцией.

) Потери в сети (трубопроводах, арматуре)

По номограмме подбираем диаметр50 мм, задавшись скоростью 1,5 м/с, и расходом 6,84 м3/ч, потери давления составят 420 Па/м

Длина трубопровода5м, Ртр= 2100 Па + Рм = 3000 Па

Полные потери составят +50 = 3000*1,5= 4500 Па.

По каталогу принимаем насостипа АЦКМ 65-40-180

n= 1500 мин-1, КПД = 70%,


5.6Аэродинамический расчет СКВ


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


5.6.1Выбор схемы распределения воздуха в помещении

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

Установив в помещении место расположения приточных и вытяжных решеток необходимо предварительно определить их размеры.

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



Vрек- рекомендуемая скорость в решетках, не более 6 м/с

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




Таблица 5.6 - Результаты воздухообменов и подбор решеток

№ помещенияРасход L, м3/чПлощадь FрасчКол-воРазмеры, ммПлощадь живого сечения,м2Скоростьприточные решетки149000,2472200×8000,2665,135600,0281150×6000,0722,246000,0301150×6000,0722,3513500,0681200×8000,1332,8619000,0961200×8000,1334,0вытяжные решетки144000,2222200×8000,2664,635000,0251150×6000,0721,945400,0271150×6000,0722,1512000,0611200×8000,1332,5617000,0861200×8000,1333,6

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


5.6.2Подбор диаметров воздуховодов и расчет потерь давления

Подбор диаметров воздуховодов сведен в таблицу 5.7 для приточной системы и таблицу 5.8 для вытяжной системы.



Таблица 5.7 - Аэродинамический расчет приточной системы


Таблица 5.8 - Аэродинамический расчет вытяжной системы


5.6.3Подбор вентилятора

Для приточной системы

Вентилятор подбирается по двум параметрам:

L= 9300 м3/ч

P=509,3+120+37+60+200= 926 Па

Требуемое давление, развиваемое вентилятором

Pтр= 1кПа

Технические характеристика вентилятора:

индекс: 01.41430

Полное давление 1,6 кПа

Номинальная производительность 12,5 тыс. м3/ч

Частота вращения 1440 об/мин

Электродвигатель 4А132М4, мощность 11 кВт.

Для вытяжной системы

L= 8340 м3/ч

P= 536 кПа

Требуемое давление Pтр= 0,6 кПа.

Технические характеристики вентилятора:

индекс: 01.41330

Полное давление 1,1 кПа

Номинальная производительность 12,5 тыс. м3/ч

Частота вращения 1440 об/мин

Электродвигатель 4А132М4, мощность 7,5 кВт.


5.7Выводы по главе


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

.Рассчитано поступление тепла и влаги в помещение серверной.

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

.Выбран типоразмер кондиционера и рассчитаны его секции.

.Рассчитано холодоснабжение СКВ.

.Проведен аэродинамический расчет СКВ.

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


Выводы


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

Проведен анализ типовых программных решений для учета данных в системах начисления военный пенсий. Анализ показал, что универсального автоматизированного модуля не существует, оценив все преимущества и недостатки существующих платформ, было принято решение о переводе на современную windows-платформу существующей системы с использованием СУБД Microsoft® Visual FoxPro 9.0 Professional SP2.

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

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

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

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

Осуществлен перевод существующей системы «Pension» на новую платформу MSVFP с сохранением формата данных и обеспечена целостность данных таблиц.

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


Библиографический список


1.Басаков М. И. Современное делопроизводство: учебное пособие для вузов / М. И. Басаков. - Ростов н/Д : Феникс, 2007. - 480с
Винокуров М.А. , Гутгарц Р.Д., Пархомов В.А. Автоматизация кадрового учета: Учеб. пособие. - М.:изд-во «Инфра», 2001. - 325 с.
.Радченко М.Г. (фирма "1С) "1С:Предприятие 8.2. Коротко о главном. Новые возможности версии 8.2", изд-во ООО "1С-Паблишинг", 2009г.-416 с.

.Гончаров Д. И., Хрусталева Е. Ю. "Технологии интеграции 1С:Предприятия 8.2", "1С-Паблишинг", 2011г. - 358 с.

.Габец А.П., Д.В. Козырев, Д.С. Кухлевский, Е.Ю. Хрусталева, «Реализация прикладных задач в системе "1С:Предприятие 8.2", "1С-Паблишинг", 2010г. - 714 с.

.Мансурова Н.А., Веселов П.С. Предпосылки и этапы внедрения системы электронного документооборота в сфере малого и среднего бизнеса // Экономические исследования. 2010г.

.В. Корепин, Microsoft Dynamics AX 2009. Руководство пользователя. Том 1, Эком, 2010г. - 1520с.

7.В. Корепин, Microsoft Dynamics AX 2009. Руководство пользователя. Том 1, ЭКОМ Паблишерз <#"justify">13.Попов А.А., Создание приложений для FOXPRO 2.5/2.6 в DOS и WINDOWS, "Калашников и Ко", 1997г. - 660с.

14.Попов А.А. Программирование в среде FoxPro 2.0. Построение систем обработки данных. - М.: Радио и связь, 1994. - 352 с.

.Щекин Р.В. Справочник по теплоснабжению и вентиляции, кн. 1. Отопление и теплоснабжение. Киев.: "Будевельник", 2006 г.- 416с.

.Щекин Р.В. Справочник по теплоснабжению и вентиляции, кн. 2 Вентиляция и кондиционирование воздуха. Киев: "Будевельник", 2006 г.- 352с.

.Штокман Е.А, В.А. Шилов и др. Вентиляция, Кондиционирование и очистка воздуха на предприятиях пищевой промышленности. Москва, 2001 г. 688с.

.Методические указания к курсовой работе. Кондиционирование воздуха и холодоснабжение.

.СНиП 2.04.05-91. М.: Стройиздат, 2008г.

.СНиП II-3-79*. Строительная теплотехника/ Госстрой России.- М.: ГУП ЦПП, 2008г.

Интернет ресурсы

1.<#"justify">Приложения


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

**__RI_HEADER!@ Do NOT REMOVE or MODIFY this line!!!! @!__RI_HEADER**=.t.(ISRLOCKED() and !deleted()) OR !RLOCK()=.F.!deleted()CURSORGETPROP('BUFFERING') > 1

=TABLEUPDATE()not already deletedRECORD (RECNO())=pnerror=0llRetVal,tcNewValue,tcCascadeParent=.t.ISRLOCKED() OR !RLOCK()=.F.EVAL(tcFieldName)<>tcNewValuepcCascadeParent=upper(iif(type("tcCascadeParent")<>"C","",tcCascadeParent))(tcFieldName) WITH tcNewValueCURSORGETPROP('BUFFERING') > 1

=TABLEUPDATE()values don't already matchit's locked already, or I was able to lock itRECORD (RECNO())=pnerror=0,tcMessage,tcCode,tcProgram,lnXX=alen(gaErrors,1)type('gaErrors[lnErrorRows,1]')<>"L"[lnErrorRows+1,alen(gaErrors,2)]=lnErrorRows+1[lnErrorRows,1]=tnErrNo[lnErrorRows,2]=tcMessage[lnErrorRows,3]=tcCode[lnErrorRows,4]=""=1while !empty(program(lnXX))[lnErrorRows,4]=gaErrors[lnErrorRows,4]+","+;(lnXX)=lnXX+1[lnErrorRows,5]=pcParentDBF[lnErrorRows,6]=pnParentRec[lnErrorRows,7]=pcParentID[lnErrorRows,8]=pcParentExpr[lnErrorRows,9]=pcChildDBF[lnErrorRows,10]=pnChildRec[lnErrorRows,11]=pcChildID[lnErrorRows,12]=pcChildExprriopentcTable,tcOrderlcCurWkArea,lcNewWkArea,lnInUseSpot,lnOccurs,lnOccurance=0= OCCURS(UPPER(tcTable)+"*",UPPER(pcRIcursors))lnOccurance = 1 TO lnOccurs=ATC(tcTable+"*",pcRIcursors,lnOccurance)ISDIGIT(SUBSTR(pcRIcursors,lnInUseSpot-1,1)) OR;(SUBSTR(pcRIcursors,lnInUseSpot-1,1))=0lnInUseSpot=0=select()0=select()NOT EMPTY(tcOrder)(tcTable) AGAIN ORDER (tcOrder) ;("__ri"+LTRIM(STR(SELECT()))) share(tcTable) AGAIN ALIAS ("__ri"+LTRIM(STR(SELECT()))) share=0=pcRIcursors+upper(tcTable)+"?"+STR(SELECT(),5)=0bad happened while attempting to open the file=val(substr(pcRIcursors,lnInUseSpot+len(tcTable)+1,5))= strtran(pcRIcursors,upper(tcTable)+"*"+str(lcNewWkArea,5),;(tcTable)+"?"+str(lcNewWkArea,5))NOT EMPTY(tcOrder)ORDER TO (tcOrder) IN (lcNewWkArea)sent an order<>0=0bad happened while setting order(lcNewWkArea)riendtlSuccess,lnSpot,lcWorkAreatlSuccessTRANSACTIONDELETED OFFDELETED ONEMPTY(pcRIolderror)ERRORERROR &pcRIolderror.lnXX=1 TO occurs("*",pcRIcursors)=atc("*",pcRIcursors,lnXX)+1IN (VAL(substr(pcRIcursors,lnSpot,5)))pcOldCompat = "ON"COMPATIBLE ONpcOldDele="OFF"DELETED OFFpcOldExact="ON"EXACT ONpcOldTalk="ON"TALK ONcaseempty(pcOldDBC)data to<>DBC()data to (pcOldDBC).T.rireuse

* rireuse.prgtcTableName,tcWkArea= strtran(pcRIcursors,upper(tcTableName)+"?"+str(tcWkArea,5),;(tcTableName)+"*"+str(tcWkArea,5)).t.

************************************************************

** "Referential integrity delete trigger for" bank__RI_DELETE_bankllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcChildWkArea && child work area handle returned by riopenlcParentWkAreallDelHeaderarealcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()KOD_BANK TO lcParentID,pcParentID="KOD_BANK"=riopen("ev","bank")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level.F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)lcParentIDWHILE BANK=lcParentID AND llRetVal=recno()=BANK="BANK"=ridelete()get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Delete trigger for" bank

*************************************************************

*************************************************************__RI_UPDATE_bank

** "Referential integrity update trigger for" bankllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcOldParentID && previous parent id valuelcChildWkArea && child work area handle returned by riopenlcChildID && child's value to be sought in parentlcOldChildID && old child id valuelcParentWkArea && parentwork area handle returned by riopenlcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()=OLDVAL("KOD_BANK")=lcOldParentID="KOD_BANK"=KOD_BANKlcParentID<>lcOldParentID=riopen("ev")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)FOR BANK=lcOldParentID=recno()=BANK="BANK"NOT llRetVal&& not llretval=riupdate("BANK",lcParentID,"BANK")get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValthis parent id changed_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Update trigger for" bank

**********************************************************

*************************************************************__RI_UPDATE_ev

** "Referential integrity update trigger for" evllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcOldParentID && previous parent id valuelcChildWkArea && child work area handle returned by riopenlcChildID && child's value to be sought in parentlcOldChildID && old child id valuelcParentWkArea && parentwork area handle returned by riopenlcStartArea=select()=.t.=select()_triggerlevel=1 or type("pccascadeparent")#"C" or (NOT pccascadeparent=="VEDOMR")(lcChildWkArea)=VEDOMR=oldval("VEDOMR")=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcOldChildID="VEDOMR"isnull(lcChildID) or isnull(lcOldChildID) or lcChildID <> lcOldChildID=riopen("vedomr","kod_vedomr")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("vedomr",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValno parentthis value was changednot part of a cascade from "vedomr"_triggerlevel=1 or type("pccascadeparent")#"C" or (NOT pccascadeparent=="BANK")(lcChildWkArea)=BANK=oldval("BANK")=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcOldChildID="BANK"isnull(lcChildID) or isnull(lcOldChildID) or lcChildID <> lcOldChildID=riopen("bank","kod_bank")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("bank",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValno parentthis value was changednot part of a cascade from "bank"_triggerlevel=1 or type("pccascadeparent")#"C" or (NOT pccascadeparent=="GRWK")(lcChildWkArea)=GRWK=oldval("GRWK")=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcOldChildID="GRWK"isnull(lcChildID) or isnull(lcOldChildID) or lcChildID <> lcOldChildID=riopen("grwk","kod_grvk")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("grwk",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValno parentthis value was changednot part of a cascade from "grwk"_triggerlevel=1 or type("pccascadeparent")#"C" or (NOT pccascadeparent=="USER")(lcChildWkArea)=ID=oldval("ID")=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcOldChildID="ID"isnull(lcChildID) or isnull(lcOldChildID) or lcChildID <> lcOldChildID=riopen("user","kod_user")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("user",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValno parentthis value was changednot part of a cascade from "user"=lcChildWkArea_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Update trigger for" ev

*********************************************************

*************************************************************

** "Referential integrity insert trigger for" ev__RI_INSERT_evllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcChildID && child's value to be sought in parentlcParentWkArea && parentwork area handle returned by riopenlcChildWkArea && child's work arealcStartArea=select()=.t.=SELECT()(lcChildWkArea)=VEDOMR=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcChildID="VEDOMR"=riopen("vedomr","kod_vedomr")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("vedomr",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal(lcChildWkArea)=BANK=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcChildID="BANK"=riopen("bank","kod_bank")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("bank",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal(lcChildWkArea)=GRWK=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcChildID="GRWK"=riopen("grwk","kod_grvk")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("grwk",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal(lcChildWkArea)=ID=dbf(lcChildWkArea)=recno(lcChildWkArea)=lcChildID="ID"=riopen("user","kod_user")lcParentWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcParentWkArea)=SEEK(lcChildID,lcParentWkArea)=recno(lcParentWkArea)and not (isrlocked(pnParentRec, lcParentWkArea) or ;(lcParentWkArea))rlock(lcParentWkArea)record pnParentRec in (lcParentWkArea)

=rireuse("tparen",lcParentWkArea)= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal

=rireuse("user",lcParentWkArea)NOT llRetVal= rierror(-1,"Insert restrict rule violated.","","")_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity insert trigger for" ev

*********************************************************

*************************************************************

** "Referential integrity delete trigger for" grwk__RI_DELETE_grwkllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcChildWkArea && child work area handle returned by riopenlcParentWkAreallDelHeaderarealcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()KOD_GRVK TO lcParentID,pcParentID="KOD_GRVK"=riopen("ev","grvk")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level.F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)lcParentIDWHILE GRWK=lcParentID AND llRetVal=recno()=GRWK="GRWK"=ridelete()get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Delete trigger for" grwk

*******************************************************

*************************************************************__RI_UPDATE_grwk

** "Referential integrity update trigger for" grwkllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcOldParentID && previous parent id valuelcChildWkArea && child work area handle returned by riopenlcChildID && child's value to be sought in parentlcOldChildID && old child id valuelcParentWkArea && parentwork area handle returned by riopenlcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()=OLDVAL("KOD_GRVK")=lcOldParentID="KOD_GRVK"=KOD_GRVKlcParentID<>lcOldParentID=riopen("ev")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)FOR GRWK=lcOldParentID=recno()=GRWK="GRWK"NOT llRetVal&& not llretval=riupdate("GRWK",lcParentID,"GRWK")get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValthis parent id changed_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Update trigger for" grwk

*****************************************************

************************************************************

** "Referential integrity delete trigger for" user__RI_DELETE_userllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcChildWkArea && child work area handle returned by riopenlcParentWkAreallDelHeaderarealcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()KOD_USER TO lcParentID,pcParentID="KOD_USER"=riopen("ev","id")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level.F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)lcParentIDWHILE ID=lcParentID AND llRetVal=recno()=ID="ID"=ridelete()get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Delete trigger for" user

*************************************************************

*************************************************************__RI_UPDATE_user

** "Referential integrity update trigger for" userllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcOldParentID && previous parent id valuelcChildWkArea && child work area handle returned by riopenlcChildID && child's value to be sought in parentlcOldChildID && old child id valuelcParentWkArea && parentwork area handle returned by riopenlcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()=OLDVAL("KOD_USER")=lcOldParentID="KOD_USER"=KOD_USERlcParentID<>lcOldParentID=riopen("ev")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)FOR ID=lcOldParentID=recno()=ID="ID"NOT llRetVal&& not llretval=riupdate("ID",lcParentID,"USER")get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValthis parent id changed_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Update trigger for" user

*************************************************************

************************************************************

** "Referential integrity delete trigger for" vedomr__RI_DELETE_vedomrllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcChildWkArea && child work area handle returned by riopenlcParentWkAreallDelHeaderarealcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()KOD_VEDOMR TO lcParentID,pcParentID="KOD_VEDOMR"=riopen("ev","vedomr")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level.F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)lcParentIDWHILE VEDOMR=lcParentID AND llRetVal=recno()=VEDOMR="VEDOMR"=ridelete()get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetVal_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Delete trigger for" vedomr

************************************************************

*************************************************************__RI_UPDATE_vedomr

** "Referential integrity update trigger for" vedomrllRetVal= .t.pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildIDpcParentExpr,pcChildExpr"" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr0 TO pnParentRec,pnChildRec_triggerlevel=1TRANSACTIONpcRIcursors,pcRIwkareas,pcRIolderror,pnerror,;,pcOldExact,pcOldTalk,pcOldCompat,PcOldDBC=SET("TALK")TALK OFF=SET("DELETED")=SET("EXACT")=SET("COMPATIBLE")COMPATIBLE OFFDELETED ONEXACT OFF=""=""=ON("error")=0ERROR pnerror=rierror(ERROR(),message(),message(1),program())TYPE('gaErrors(1)')<>"U"gaErrors(1,12)=DBC()DATA TO ("DATA1")first triggerlcParentID && parent's value to be sought in childlcOldParentID && previous parent id valuelcChildWkArea && child work area handle returned by riopenlcChildID && child's value to be sought in parentlcOldChildID && old child id valuelcParentWkArea && parentwork area handle returned by riopenlcStartArea=select()=.t.=select()(lcParentWkArea)=dbf()=recno()=OLDVAL("KOD_VEDOMR")=lcOldParentID="KOD_VEDOMR"=KOD_VEDOMRlcParentID<>lcOldParentID=riopen("ev")lcChildWkArea<=0_triggerlevel=1riend WITH .F.at the end of the highest trigger level(lcStartArea).F.not able to open the child work area=dbf(lcChildWkArea)(lcChildWkArea)FOR VEDOMR=lcOldParentID=recno()=VEDOMR="VEDOMR"NOT llRetVal&& not llretval=riupdate("VEDOMR",lcParentID,"VEDOMR")get all of the ev records

=rireuse("ev",lcChildWkArea)NOT llRetVal_triggerlevel=1riend WITH llRetValat the end of the highest trigger level(lcStartArea)llRetValthis parent id changed_triggerlevel=1with llRetValat the end of the highest trigger level(lcStartArea)llRetVal

** "End of Referential integrity Update trigger for" vedomr

*************************************************************

**__RI_FOOTER!@ Do NOT REMOVE or MODIFY this line!!!! @!__RI_FOOTER**


МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования

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

КОНТАКТНЫЙ EMAIL: [email protected]

Скачать реферат © 2017 | Пользовательское соглашение

Скачать      Реферат

ПРОФЕССИОНАЛЬНАЯ ПОМОЩЬ СТУДЕНТАМ