Диплом на тему Автоматизированной информационная библиотечная система
Работа добавлена на сайт bukvasha.net: 2014-11-02Поможем написать учебную работу
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
от 25%
договор
Реферат
В процессе дипломной разработки была создана автоматизированной информационная библиотечная система Астраханского колледжа вычислительной техники. Был разработан программный комплекс средств обработки литературы, начиная от комплектования (заказа) и кончая списанием, и работы с читателями. Разработка осуществлялась на основании существующей в настоящее время технологии ведения библиотечных процессов. В выпускной квалификационной работе рассмотрены вопросы внедрения системы в работу библиотеки, проведен анализ условий труда, организации рабочего места пользователя системы (библиотекаря). Рассмотрены вопросы экономической эффективности внедрения разработки. Была проведена проверка работоспособности системы.Перспективным направлением развития является постепенный переход к электронным библиотекам. Электронная библиотека – электронный аналог традиционной библиотеки с электронным каталогом и фондами машиночитаемых документов, хранящихся в адекватной объему и типу данных высоконадежной аппаратно-программной среде с доступом пользователей через глобальные телекоммуникационные сети.
УДК 681. 3.06
АННОТАЦИЯ
Результатом разработки в данной дипломной работе является создание автоматизированной информационной библиотечной системы Астраханского колледжа вычислительной техники. Автоматизированная информационная библиотечная система представляет собой комплекс программных, разработанный с учетом существующей технологией обработки литературы, принятой в стране, с учетом требований перспективы развития библиотечного дела, а также с учетом требований к организации библиотечного дела в АКВТ. Комплекс позволяет последовательно обрабатывать литературу, начиная от комплектования (заказа) и кончая списанием. Эксплуатация автоматизированной библиотечной системы должна осуществляться на основании разработанной инструкции пользователя. В выпускной квалификационной работе рассмотрены вопросы внедрения системы в работу библиотеки, проведен анализ условий труда, организации рабочего места пользователя системы (библиотекаря). Рассмотрены вопросы экономической эффективности внедрения разработки. Была проведена проверка работоспособности системы.
СОДЕРЖАНИЕ
Введение
1. Взаимодействие пользователя с системой
2. Организация вычислительных процессов в автоматизированной информационной библиотечной системе
3. Системотехнический уровень
3.1. Обзор известных методов решения поставленной задачи
3.2. Разработка лингвистического обеспечения системы
3.3. Разработка информационного обеспечения системы
3.4. Программное обеспечение системы
3.4.1. Обоснование выбора базового программного обеспечения системы
3.4.2. Разработка прикладного программного обеспечения системы
3.5. Расчет вычислительных ресурсов, необходимых для функционирования
автоматизированной информационной библиотечной системы
4. Инструкция пользователя информационной библиотечной системы АКВТ
5. Экспериментальная часть
5.1. Исходные тексты программ
5.2. Описание проведенных экспериментальных исследований
6. Технико-экономическое проектирование
6.1. Маркетинговые исследования рынка
6.2. Выбор и обоснование объекта для сравнения
6.3. Расчет себестоимости и цены АИБС АКВТ
6.4. Расчет суммарной экономии затрат
6.5. Расчет капитальных вложений и эксплуатационных расходов
6.6. Расчет показателей экономической эффективности и ожидаемого
годового экономического эффекта от внедрения разработки
7. Безопасность жизнедеятельности
7.1. Анализ условий труда, тяжести и напряженности трудового процесса
7.2. Разработка мероприятий по улучшению условий труда
7.3. Пожарная безопасность
7.4. Защита окружающей природной среды
Заключение
Приложение 1
Приложение 2
ВВЕДЕНИЕ
На сегодняшний день введение компьютерных и телекоммуникационных технологий в работу библиотек является настоятельным требованием к повышению производительности и качества труда библиотечно-информационных работников на основе автоматизированного взаимного использования и интеграции электронных ресурсов. Сегодня количество автоматизированных библиотек достигло нескольких тысяч. В настоящее время под влияние распространения Internet и развития операционных систем MS Windows 9x, Windows NT и UNIX совершенствовались все современные отечественные информационные системы “АС-Библиотека” (ГИВЦ МК РФ), “ИРБИС” (ГПНТБ России и международная ассоциация ISIS), “Библиотека 4.0” (ООО “БКС”), “МАРК” (НПО “Информсистема”), АС “Наука” (БЕН РАН). В силу высокой стоимости данных продуктов требуется их эффективное использование, что означает их ориентированность на крупные библиотеки, региональные межбиблиотечные онлайновые центры и библиотечно-информационные системы, в которых риск потери информации должен быть сведен к минимуму.
Основное преимущество автоматизации для данной отрасли заключается в предоставлении читателю более полной и достоверной информации о состоянии библиотечного фонда, возможности быстрой и эффективной ориентации в довольно больших объемах информации. В настоящее время основным направлением развития автоматизации всех библиотек является разработка каталога библиографических описаний. Перспективным направлением - переход к электронным библиотекам. Как правило, внедрение любой автоматизированной системы влечет за собой изменение существующих организационных структур и методов управления, требует более четкой регламентации документооборота и процедур управления, упорядочения используемых и создание новых нормативов, совершенствование условий труда.
Представленная в данной работе автоматизированная информационная библиотечная система АКВТ (АИБС АКВТ) разработана с целью обеспечения информативности и ускорения ориентации в объемах библиотечного фонда.
1. Взаимодействие пользователя с системой
Автоматизированная информационная библиотечная система предназначена для эксплуатации в библиотеке колледжа и должна быть установлена на рабочем месте библиотекаря. Установка разработанной системы требует реорганизации рабочего места библиотекаря. Для функционирования разработанной системы требуется установка на рабочем месте библиотекаря персональной ЭВМ, в которой будет храниться разработанная система и будут выполняться все библиотечные процессы по комплектованию фонда, поиска и управлению системой, для взаимодействия пользователя с ЭВМ необходимы клавиатура, монитор, манипулятор типа “мышь”. Для ввода аннотаций и статей в автоматизированную систему можно предусмотреть установку сканера. После осуществления процесса ретроконверсии каталога на рабочее место библиотекаря должен добавиться модем для обеспечения связи с Internet и локальной сетью колледжа. Подключение к локальной сети колледжа позволит читателям самостоятельно производить поиск литературы, не отвлекая работников библиотеки, что позволит сократить рабочее время не только пользователям, но и библиотекарям. Подключение библиотеки к Internet предоставит возможность осуществлять поиск запрашиваемой библиографической информации, находящейся в других библиотеках, и комплектование фонда библиотеки на основе анализа предоставляемой информации электронными издательствами.
2. Организация вычислительных процессов в автоматизированной информационной библиотечной системе
Ежегодное возрастание потоков студентов, связанное с увеличением набора контингента, приводит к перегрузке работников библиотеки, связанной с обслуживанием увеличивающегося потока читателей. Задача разгрузки библиотечных работников на текущих обязанностях обслуживания может быть успешно решена созданием автоматизированной библиотечной системы. Данная проблема охватывает прежде всего разработку теории автоматизированной информационной библиотечной системы, разработку технических средств, обеспечивающих накопление, хранение, обновление, поиск, преобразование и выдачу информации, разработку методов автоматического поиска и преобразования информации.
Разрабатываемая система упрощенно может быть представлена как упорядоченное хранилище состояния предоставляемой информации.
Целесообразно выделить в автоматизированной информационной системе следующие элементы:
а) информируемое звено;
б) информирующее звено.
В роли информируемого звена системы выступает читатель – студент или преподаватель колледжа. В роли органа, предоставляющего информационные ресурсы – библиотека. Информирующее звено является ответственным за состояние информационных ресурсов, информируемое звено ответственно перед информирующим за возврат фонда.
Информационная система является замкнутой, так как происходит обмен между процессами информирования о состоянии и работой с читателями.
Информационная система не может существовать без мощной программной поддержки. Программное обеспечение информационной системы должно обеспечивать функционирование в соответствии целевым назначение системы.
Вычислительные процессы автоматизированной информационной библиотечной системы должны предусматривать автоматизацию текущих библиотечных работ. Прежде всего, необходимо освободить библиотекаря от рутинных библиографических операций и операций комплектации, операций поиска литературы по запросам читательских интересов в объеме библиотечного фонда, заполнения читательских формуляров. Автоматизация этих процессов возможна в результате создания электронной базы данных на библиотечный фонд и на читателей. В базе данных должна быть предусмотрена обратная связь между литературой, содержащейся в фонде, и литературой, находящейся на руках у читателя. Процессы в автоматизированной библиотечной системе должны быть реализованы следующим образом. Библиотекарь заносит библиографические описания поступившей литературы, распределенные по полям, в электронный каталог и присваивает инвентарные номера книгам (данный процесс автоматизирован) по количеству экземпляров данного наименования. Система предоставляет функции печати инвентарной книги (листы инвентарной книги подшиваются) и библиографической карточки на отобранное подмножество.
Процесс обслуживания читателей для данной системы заключается в поиске требуемой литературы (причем число обращений в книгохранилище значительно сократиться, так как предоставляются сведения о состоянии фонда), и занесении инвентарного номера книги, выдаваемой читателю в формуляр. При возврате литературы ставиться отметка о возвращении литературы в фонд. Структура реализации библиотечных процессов в автоматизированной информационной библиотечной системе приведена на плакате “Организация библиотечных процессов.”
3. Системотехнический уровень
3.1 Обзор известных методов решения поставленной задачи
Весь фонд библиотеки, содержащийся в книгохранилищах, отражается в тематических, алфавитных и других видах каталогов, необходимых для поиска требуемой информации. Все библиографические карточки оформляются в соответствии с ГОСТ 7.1-81. Автоматизация на настоящий момент предусматривает создание библиографических и полнотекстовых ресурсов. Создание электронных библиографических ресурсов – одна из главных задач, решаемых библиотеками при автоматизации. Информационные ресурсы библиотек России не содержат единых требований к системам на национальном уровне. Важнейшим шагом на пути интеграции российских библиотек стало создание большой группой отечественных специалистов (под эгидой Российской библиотечной ассоциации) национальных коммуникационных форматов представления библиографических и авторитетных записей RUSMARC. На основе единых коммуникационных форматов российские библиотеки смогут работать корпоративно, с минимальными общими затратами на одну “корзину” единого информационного пространства России.
Создание электронных библиографических ресурсов должно предусматривать создание проекта ретроконверсии каталога в машиночитаемую форму. Проект ретроконверсии каталогов является частью проекта автоматизированной информационно-библиотечной системы и реализуется как силами самой библиотеки, так и с привлечением других организаций на базе внедрения наиболее прогрессивных технологий в координации с ведущими библиографирующими учреждениями России, зарубежными и международными информационно-библиографическими системами, такими, как Европейский консорциум библиотек, OCLC и др. Ретроспективная конверсия – часть работ по электронной каталогизации, позволяет поднять и донести до конечного пользователя огромный пласт информации, практически не используемый сейчас по многим причинам. Существуют различные сочетания известных методов ретроконверсии каталогов в карточной и книжной форме. Основные из них следующие:
а) перевод в машиночитаемую форму библиографических записей непосредственно с карточек или из книжного варианта:
- ручным набором линейного текста с разметкой полей MARC-формата в процессе работы;
- ручным набором линейного текста и созданием структуры записей автоматически (распознавание знаков препинания, последовательности символов, использование специальных словарей и лексиконов);
- оптическое распознавание символов отпечатанных каталожных карточек хорошего качества после сканирования каталога и приведение записей к стандартному формату записи вручную или автоматически;
- использование библиографических записей из других электронных каталогов.
б) предварительное изготовление копий библиографических карточек на микрофишах, их сканирование и последующая ручная или программная обработка описанными выше способами.
Отечественные библиотеки, приступившие к длительному и трудоемкому процессу ретроконверсии каталогов, в подавляющем большинстве используют, казалось бы, наименее эффективную и наиболее трудоемкую методику непосредственного ручного ввода текста библиографической карточки в соответствующую базу данных. Информация вводится или непосредственно с каталожных карточек или реже с графического изображения каталожной карточки, полученной в результате сканирования каталога, подвергающегося ретроконверсии. Однако опыт работы с зарубежными фирмами показал, что этот метод не продуктивен в тех случаях, когда, во-первых, тексты на карточках настолько ужасно выглядят, что их нерентабельно сканировать оптическим распознавателем образов знаков и, во вторых, ввод осуществляется мало подготовленными к этой работе людьми без необходимой организации технологического процесса и за очень низкую плату. Такой подход к решению проблемы даже при экономии на ручном труде требует огромных затрат. Низкая производительность ручного ввода информации при описанных условиях доказана и зарубежным и отечественным опытом ретроконверсии. В противовес ручному вводу существует сканирование карточек с последующим распознаванием их образов в тексте. При обработке карточек хорошего качества в печатной форме и при использовании сильного программного обеспечения с тщательно продуманными справочниками, словарями действительно получается серьезная экономия времени и средств. Однако, учитывая качество наших каталогов, где на карточках есть и машинописный и рукописный текст разным почерком, причем сбоку и наискосок и с помарками, затертый пальцами, очевидна сложность и дороговизна программирования эталонов знаков на все эти случаи из библиотечной практики. Кроме того считается, что после программного распознавания знаков процент ошибок обычно составляет 2-5%. Поэтому затраты на обработку и последующую проверку и коррекцию ошибок в данном случае будут превышать затраты при технологии ручного формирования машинных записей на основе изображения карточки при тех же временных затратах. Использование смешанных технологий также нецелесообразно, что объясняется, помимо прочего, небольшим объемом фонда библиотеки и большой экземплярностью наименований.
Можно рассчитать время проведения ретроконверсии ручным способом, взяв за основу среднюю производительность труда каталогизатора – 10 записей в час при занятости 100% рабочего времени.
Разработка электронного каталога в автоматизированной информационной библиотечной системе должна осуществляться с учетом существующей технологии обработки литературы, принятой в стране, с учетом требований перспективы развития библиотечного дела, а также с учетом требований к организации библиотечного дела в АКВТ.
3.2 Разработка лингвистического обеспечения системы
Входными данными для любой библиотеки являются новые поступления литературы и периодических изданий, распоряжения о списании. На основании входных данных библиотека осуществляет комплектование фондов: учет новых поступлений литературы и периодических изданий, учет списанной литературы. Библиотека АКВТ ведет картотеку читателей. Все читатели проходят предварительную регистрацию. Библиотека АКВТ регистрирует всех вновь поступивших на основании приказа директора, в дальнейшем ежегодно все читатели походят перерегистрацию на протяжении всего курса обучения (4-5 лет). При регистрации библиотека заносит в читательский формуляр паспортные данные читателя и в дальнейшем в читательском формуляре отмечаются все книги, взятые читателем и сроки взятия и возврата книг. На основе картотек читателей и библиотечного фонда библиотека осуществляет статистическую обработку данных (создание и ведение каталогов и картотек, составление библиографических описаний, семантическая обработка текстов) и осуществляет, в соответствии с наличием, реакцию на запросы литературы от читателей. На основании проведенного анализа в качестве лингвистического обеспечения системы выступает вся предоставляемая библиографическая информация, отчетность библиотеки (инвентарные книги, акты списания), регистрационные данные читателя и списки книг на формулярах у читателя. Концепция автоматизированной информационной библиотечной системы колледжа (АБИС АКВТ) предполагает создание электронного каталога на основе базы данных библиографических описаний книжных изданий, периодики и базы данных читательских формуляров.
Создание структур данных для электронного представления библиографической информации и структур данных для читательских формуляров предъявляет требования обеспечения качественного и удобного поиска в довольно больших объемах информации. В процессе дипломной разработки была создана автоматизированной информационная библиотечная система Астраханского колледжа вычислительной техники. Был разработан программный комплекс средств обработки литературы, начиная от комплектования (заказа) и кончая списанием, и работы с читателями. Разработка осуществлялась на основании существующей в настоящее время технологии ведения библиотечных процессов. В выпускной квалификационной работе рассмотрены вопросы внедрения системы в работу библиотеки, проведен анализ условий труда, организации рабочего места пользователя системы (библиотекаря). Рассмотрены вопросы экономической эффективности внедрения разработки. Была проведена проверка работоспособности системы.Перспективным направлением развития является постепенный переход к электронным библиотекам. Электронная библиотека – электронный аналог традиционной библиотеки с электронным каталогом и фондами машиночитаемых документов, хранящихся в адекватной объему и типу данных высоконадежной аппаратно-программной среде с доступом пользователей через глобальные телекоммуникационные сети.
УДК 681. 3.06
АННОТАЦИЯ
Результатом разработки в данной дипломной работе является создание автоматизированной информационной библиотечной системы Астраханского колледжа вычислительной техники. Автоматизированная информационная библиотечная система представляет собой комплекс программных, разработанный с учетом существующей технологией обработки литературы, принятой в стране, с учетом требований перспективы развития библиотечного дела, а также с учетом требований к организации библиотечного дела в АКВТ. Комплекс позволяет последовательно обрабатывать литературу, начиная от комплектования (заказа) и кончая списанием. Эксплуатация автоматизированной библиотечной системы должна осуществляться на основании разработанной инструкции пользователя. В выпускной квалификационной работе рассмотрены вопросы внедрения системы в работу библиотеки, проведен анализ условий труда, организации рабочего места пользователя системы (библиотекаря). Рассмотрены вопросы экономической эффективности внедрения разработки. Была проведена проверка работоспособности системы.
СОДЕРЖАНИЕ
Введение
1. Взаимодействие пользователя с системой
2. Организация вычислительных процессов в автоматизированной информационной библиотечной системе
3. Системотехнический уровень
3.1. Обзор известных методов решения поставленной задачи
3.2. Разработка лингвистического обеспечения системы
3.3. Разработка информационного обеспечения системы
3.4. Программное обеспечение системы
3.4.1. Обоснование выбора базового программного обеспечения системы
3.4.2. Разработка прикладного программного обеспечения системы
3.5. Расчет вычислительных ресурсов, необходимых для функционирования
автоматизированной информационной библиотечной системы
4. Инструкция пользователя информационной библиотечной системы АКВТ
5. Экспериментальная часть
5.1. Исходные тексты программ
5.2. Описание проведенных экспериментальных исследований
6. Технико-экономическое проектирование
6.1. Маркетинговые исследования рынка
6.2. Выбор и обоснование объекта для сравнения
6.3. Расчет себестоимости и цены АИБС АКВТ
6.4. Расчет суммарной экономии затрат
6.5. Расчет капитальных вложений и эксплуатационных расходов
6.6. Расчет показателей экономической эффективности и ожидаемого
годового экономического эффекта от внедрения разработки
7. Безопасность жизнедеятельности
7.1. Анализ условий труда, тяжести и напряженности трудового процесса
7.2. Разработка мероприятий по улучшению условий труда
7.3. Пожарная безопасность
7.4. Защита окружающей природной среды
Заключение
Приложение 1
Приложение 2
ВВЕДЕНИЕ
На сегодняшний день введение компьютерных и телекоммуникационных технологий в работу библиотек является настоятельным требованием к повышению производительности и качества труда библиотечно-информационных работников на основе автоматизированного взаимного использования и интеграции электронных ресурсов. Сегодня количество автоматизированных библиотек достигло нескольких тысяч. В настоящее время под влияние распространения Internet и развития операционных систем MS Windows 9x, Windows NT и UNIX совершенствовались все современные отечественные информационные системы “АС-Библиотека” (ГИВЦ МК РФ), “ИРБИС” (ГПНТБ России и международная ассоциация ISIS), “Библиотека 4.0” (ООО “БКС”), “МАРК” (НПО “Информсистема”), АС “Наука” (БЕН РАН). В силу высокой стоимости данных продуктов требуется их эффективное использование, что означает их ориентированность на крупные библиотеки, региональные межбиблиотечные онлайновые центры и библиотечно-информационные системы, в которых риск потери информации должен быть сведен к минимуму.
Основное преимущество автоматизации для данной отрасли заключается в предоставлении читателю более полной и достоверной информации о состоянии библиотечного фонда, возможности быстрой и эффективной ориентации в довольно больших объемах информации. В настоящее время основным направлением развития автоматизации всех библиотек является разработка каталога библиографических описаний. Перспективным направлением - переход к электронным библиотекам. Как правило, внедрение любой автоматизированной системы влечет за собой изменение существующих организационных структур и методов управления, требует более четкой регламентации документооборота и процедур управления, упорядочения используемых и создание новых нормативов, совершенствование условий труда.
Представленная в данной работе автоматизированная информационная библиотечная система АКВТ (АИБС АКВТ) разработана с целью обеспечения информативности и ускорения ориентации в объемах библиотечного фонда.
1. Взаимодействие пользователя с системой
Автоматизированная информационная библиотечная система предназначена для эксплуатации в библиотеке колледжа и должна быть установлена на рабочем месте библиотекаря. Установка разработанной системы требует реорганизации рабочего места библиотекаря. Для функционирования разработанной системы требуется установка на рабочем месте библиотекаря персональной ЭВМ, в которой будет храниться разработанная система и будут выполняться все библиотечные процессы по комплектованию фонда, поиска и управлению системой, для взаимодействия пользователя с ЭВМ необходимы клавиатура, монитор, манипулятор типа “мышь”. Для ввода аннотаций и статей в автоматизированную систему можно предусмотреть установку сканера. После осуществления процесса ретроконверсии каталога на рабочее место библиотекаря должен добавиться модем для обеспечения связи с Internet и локальной сетью колледжа. Подключение к локальной сети колледжа позволит читателям самостоятельно производить поиск литературы, не отвлекая работников библиотеки, что позволит сократить рабочее время не только пользователям, но и библиотекарям. Подключение библиотеки к Internet предоставит возможность осуществлять поиск запрашиваемой библиографической информации, находящейся в других библиотеках, и комплектование фонда библиотеки на основе анализа предоставляемой информации электронными издательствами.
2. Организация вычислительных процессов в автоматизированной информационной библиотечной системе
Ежегодное возрастание потоков студентов, связанное с увеличением набора контингента, приводит к перегрузке работников библиотеки, связанной с обслуживанием увеличивающегося потока читателей. Задача разгрузки библиотечных работников на текущих обязанностях обслуживания может быть успешно решена созданием автоматизированной библиотечной системы. Данная проблема охватывает прежде всего разработку теории автоматизированной информационной библиотечной системы, разработку технических средств, обеспечивающих накопление, хранение, обновление, поиск, преобразование и выдачу информации, разработку методов автоматического поиска и преобразования информации.
Разрабатываемая система упрощенно может быть представлена как упорядоченное хранилище состояния предоставляемой информации.
Целесообразно выделить в автоматизированной информационной системе следующие элементы:
а) информируемое звено;
б) информирующее звено.
В роли информируемого звена системы выступает читатель – студент или преподаватель колледжа. В роли органа, предоставляющего информационные ресурсы – библиотека. Информирующее звено является ответственным за состояние информационных ресурсов, информируемое звено ответственно перед информирующим за возврат фонда.
Информационная система является замкнутой, так как происходит обмен между процессами информирования о состоянии и работой с читателями.
Информационная система не может существовать без мощной программной поддержки. Программное обеспечение информационной системы должно обеспечивать функционирование в соответствии целевым назначение системы.
Вычислительные процессы автоматизированной информационной библиотечной системы должны предусматривать автоматизацию текущих библиотечных работ. Прежде всего, необходимо освободить библиотекаря от рутинных библиографических операций и операций комплектации, операций поиска литературы по запросам читательских интересов в объеме библиотечного фонда, заполнения читательских формуляров. Автоматизация этих процессов возможна в результате создания электронной базы данных на библиотечный фонд и на читателей. В базе данных должна быть предусмотрена обратная связь между литературой, содержащейся в фонде, и литературой, находящейся на руках у читателя. Процессы в автоматизированной библиотечной системе должны быть реализованы следующим образом. Библиотекарь заносит библиографические описания поступившей литературы, распределенные по полям, в электронный каталог и присваивает инвентарные номера книгам (данный процесс автоматизирован) по количеству экземпляров данного наименования. Система предоставляет функции печати инвентарной книги (листы инвентарной книги подшиваются) и библиографической карточки на отобранное подмножество.
Процесс обслуживания читателей для данной системы заключается в поиске требуемой литературы (причем число обращений в книгохранилище значительно сократиться, так как предоставляются сведения о состоянии фонда), и занесении инвентарного номера книги, выдаваемой читателю в формуляр. При возврате литературы ставиться отметка о возвращении литературы в фонд. Структура реализации библиотечных процессов в автоматизированной информационной библиотечной системе приведена на плакате “Организация библиотечных процессов.”
3. Системотехнический уровень
3.1 Обзор известных методов решения поставленной задачи
Весь фонд библиотеки, содержащийся в книгохранилищах, отражается в тематических, алфавитных и других видах каталогов, необходимых для поиска требуемой информации. Все библиографические карточки оформляются в соответствии с ГОСТ 7.1-81. Автоматизация на настоящий момент предусматривает создание библиографических и полнотекстовых ресурсов. Создание электронных библиографических ресурсов – одна из главных задач, решаемых библиотеками при автоматизации. Информационные ресурсы библиотек России не содержат единых требований к системам на национальном уровне. Важнейшим шагом на пути интеграции российских библиотек стало создание большой группой отечественных специалистов (под эгидой Российской библиотечной ассоциации) национальных коммуникационных форматов представления библиографических и авторитетных записей RUSMARC. На основе единых коммуникационных форматов российские библиотеки смогут работать корпоративно, с минимальными общими затратами на одну “корзину” единого информационного пространства России.
Создание электронных библиографических ресурсов должно предусматривать создание проекта ретроконверсии каталога в машиночитаемую форму. Проект ретроконверсии каталогов является частью проекта автоматизированной информационно-библиотечной системы и реализуется как силами самой библиотеки, так и с привлечением других организаций на базе внедрения наиболее прогрессивных технологий в координации с ведущими библиографирующими учреждениями России, зарубежными и международными информационно-библиографическими системами, такими, как Европейский консорциум библиотек, OCLC и др. Ретроспективная конверсия – часть работ по электронной каталогизации, позволяет поднять и донести до конечного пользователя огромный пласт информации, практически не используемый сейчас по многим причинам. Существуют различные сочетания известных методов ретроконверсии каталогов в карточной и книжной форме. Основные из них следующие:
а) перевод в машиночитаемую форму библиографических записей непосредственно с карточек или из книжного варианта:
- ручным набором линейного текста с разметкой полей MARC-формата в процессе работы;
- ручным набором линейного текста и созданием структуры записей автоматически (распознавание знаков препинания, последовательности символов, использование специальных словарей и лексиконов);
- оптическое распознавание символов отпечатанных каталожных карточек хорошего качества после сканирования каталога и приведение записей к стандартному формату записи вручную или автоматически;
- использование библиографических записей из других электронных каталогов.
б) предварительное изготовление копий библиографических карточек на микрофишах, их сканирование и последующая ручная или программная обработка описанными выше способами.
Отечественные библиотеки, приступившие к длительному и трудоемкому процессу ретроконверсии каталогов, в подавляющем большинстве используют, казалось бы, наименее эффективную и наиболее трудоемкую методику непосредственного ручного ввода текста библиографической карточки в соответствующую базу данных. Информация вводится или непосредственно с каталожных карточек или реже с графического изображения каталожной карточки, полученной в результате сканирования каталога, подвергающегося ретроконверсии. Однако опыт работы с зарубежными фирмами показал, что этот метод не продуктивен в тех случаях, когда, во-первых, тексты на карточках настолько ужасно выглядят, что их нерентабельно сканировать оптическим распознавателем образов знаков и, во вторых, ввод осуществляется мало подготовленными к этой работе людьми без необходимой организации технологического процесса и за очень низкую плату. Такой подход к решению проблемы даже при экономии на ручном труде требует огромных затрат. Низкая производительность ручного ввода информации при описанных условиях доказана и зарубежным и отечественным опытом ретроконверсии. В противовес ручному вводу существует сканирование карточек с последующим распознаванием их образов в тексте. При обработке карточек хорошего качества в печатной форме и при использовании сильного программного обеспечения с тщательно продуманными справочниками, словарями действительно получается серьезная экономия времени и средств. Однако, учитывая качество наших каталогов, где на карточках есть и машинописный и рукописный текст разным почерком, причем сбоку и наискосок и с помарками, затертый пальцами, очевидна сложность и дороговизна программирования эталонов знаков на все эти случаи из библиотечной практики. Кроме того считается, что после программного распознавания знаков процент ошибок обычно составляет 2-5%. Поэтому затраты на обработку и последующую проверку и коррекцию ошибок в данном случае будут превышать затраты при технологии ручного формирования машинных записей на основе изображения карточки при тех же временных затратах. Использование смешанных технологий также нецелесообразно, что объясняется, помимо прочего, небольшим объемом фонда библиотеки и большой экземплярностью наименований.
Можно рассчитать время проведения ретроконверсии ручным способом, взяв за основу среднюю производительность труда каталогизатора – 10 записей в час при занятости 100% рабочего времени.
Разработка электронного каталога в автоматизированной информационной библиотечной системе должна осуществляться с учетом существующей технологии обработки литературы, принятой в стране, с учетом требований перспективы развития библиотечного дела, а также с учетом требований к организации библиотечного дела в АКВТ.
3.2 Разработка лингвистического обеспечения системы
Входными данными для любой библиотеки являются новые поступления литературы и периодических изданий, распоряжения о списании. На основании входных данных библиотека осуществляет комплектование фондов: учет новых поступлений литературы и периодических изданий, учет списанной литературы. Библиотека АКВТ ведет картотеку читателей. Все читатели проходят предварительную регистрацию. Библиотека АКВТ регистрирует всех вновь поступивших на основании приказа директора, в дальнейшем ежегодно все читатели походят перерегистрацию на протяжении всего курса обучения (4-5 лет). При регистрации библиотека заносит в читательский формуляр паспортные данные читателя и в дальнейшем в читательском формуляре отмечаются все книги, взятые читателем и сроки взятия и возврата книг. На основе картотек читателей и библиотечного фонда библиотека осуществляет статистическую обработку данных (создание и ведение каталогов и картотек, составление библиографических описаний, семантическая обработка текстов) и осуществляет, в соответствии с наличием, реакцию на запросы литературы от читателей. На основании проведенного анализа в качестве лингвистического обеспечения системы выступает вся предоставляемая библиографическая информация, отчетность библиотеки (инвентарные книги, акты списания), регистрационные данные читателя и списки книг на формулярах у читателя. Концепция автоматизированной информационной библиотечной системы колледжа (АБИС АКВТ) предполагает создание электронного каталога на основе базы данных библиографических описаний книжных изданий, периодики и базы данных читательских формуляров.
Таким образом, к лингвистическому обеспечению предъявляются требования создания средств “свободного” поиска по содержанию с применением метода поиска по свободному тексту полей с использованием контекстных операторов и “маскирования” терминов (усечение справа, слева, в середине).
Поиск в электронном каталоге системы организуется формированием фильтров на основе инструкций SQL. Предоставляются готовые фильтры (алфавитный, тематический каталоги) и фильтры, формируемые пользователем для его конкретных нужд (поиск по одному полю документа и фильтр поиска по множеству полей, с указанием условий поиска).
3.3 Разработка информационного обеспечения системы
Концепция автоматизированной библиотечной информационной системы АКВТ предполагает создание электронного каталога на основе баз данных библиографических описаний; разработку высокопроизводительного программного обеспечения, способного создавать такую базу данных в короткий срок. Высокие требования к производительности диктовались в числе прочего и скудным финансирование библиотеки в частности. Электронный каталог является доступным и понятным для пользователя отображением на экране содержимого базы библиографических данных. Сама база имеет сложную структуру.
Приступая к проектированию структуры базы данных были проанализированы существующие документы и отчеты, проанализирована работа библиографического отдела библиотеки. Результатом проектирования, является структура базы данных библиографических описаний, в которую были включены только те поля, которые реально нужны библиотеке для обслуживания читателей.
Анализ данных: основной документ, формируемый библиографом – создание полного библиографического описания издания в виде стандартизированной библиографической карточки. Предварительно, вся поступающая литература должна фиксироваться в книге инвентарного учета. В книгу инвентарного учета заносятся частичная информация библиографического описания издания (название, автор, год издания) и проставляются инвентарные номера для каждого наименовнаия издания, то есть, осуществляется регистрация поступлений. При переходе к электронному каталогу изданий, процесс заполнения инвентарной книги и составления полного библиографического описания может быть совмещен. Таким образом процессы инвентаризации и библиографирования совмещаются в один. Библиографическое описание издания в соответствии с существующими стандартами (ГОСТ 7.1-81 и коммуникативным форматом библиографических и авориретных записей RUSMARC) разделяется на элементы. Анализ технологии представления библиографического описания в стандарте RUSMARC и требований библиотеки колледжа показал, что детализация библиографического представления записей в стандарте RUSMARC для нужд библиотеки колледжа является избыточной. В итоге были спроектированы довольно компактные структуры данных, которые в значительной мере предопределяют высокую производительность прикладных программ. Инфологическая модель реляционной базы данных библиографических описаний построена на совокупности отношений в третьей нормальной форме. Xарактеристики томов (инвентарный номер, место дислокации) храняться в базе данных отдельно. Факты связаны внутренним системным номером. Все необязательные поля, как “Автор”, “Другие авторы”, “Коллективный автор”, “Том”, “Серия”, “Аннотация” и др., хранятся в специальных файлах и обращаться к ним через внутрисистемный номер. Такая модель хорошо вписывается в существующие библиотечные технологии.
В автоматизированной информационной библиотечной системе частично автоматизирована работа абонемента. Основным документом, с которым работает абонемент является читательский формуляр. Читательский формуляр при регистрации заполняется сведениями о читателе, которые необходимы для формирования извещений читателя о задолженностях. При пользовании абонементом, в читательский формуляр заносятся перечень взятой читателем литературы, дата взятия книг и предполагаемая дата возврата. Читатель должен поставить роспись за каждое издание, которое выдано ему на руки. При возврате книг, библиотекарь отмечает срок сдачи литературы.
Для автоматизации процесса ведения читательского формуляра в структуру базы данных системы были введены таблицы “Сведения о читателе” и “Читательский формуляр”. Между таблицами существует связь один ко многим (представление данных в третьей нормальной форме).
Концептуальные требования основаны на следующих отношениях:
1) Все элементы библиографического описания издания однозначно определяет “идентификатор издания” ;
2) Индивидуальные характеристики каждого экземпляра книги однозначно определяет “инвентарный номер”;
3) Сведения о читателях однозначно определяет “номер читательского формуляра”
4) На одно библиографическое описание издания может приходиться множество инвентарных номеров книг;
5) Один читатель может взять “на руки” множество экземпляров книг.
Сформированная концептуальная модель была отображена на сетевую модель данных.На выбор способа размещения записей оказало влияние: в работе библиотекаря наиболее часто доступ к данным читательского формуляра осуществляется по номеру читательского формуляра. Основной информацией вносимой в читательский формуляр является инвентарный номер взятой читателем книги, который однозначно определяет ее характеристики (название, автора и др.).
Структура базы данных с отображением всех взаимосвязей представлена на плакате “Схема данных автоматизированной информационной библиотечной системы”.
Все поля базы данных имеют постоянное значение. В приложении 1 приведены структуры сформированных таблиц базы данных: “Шифры”(табл. П.1.1), “Автор”(табл. П.1.2), “Другие авторы”(табл. П.1.3), “Коллективный автор”(табл. П.1.4), “Название”(табл. П.1.5), “Аннотация”(табл. П.1.6), “Выходые данные”(табл. П.1.7), “Сведения об издании”(табл. П.1.8), “Серия”(табл. П.1.9), “Том”(табл. П.1.10), “Количественные характеристики”(табл. П.1.11), “Издательства”(табл. П.1.12), “Инвентарная книга”(табл. П.1.13), “Справочник ББК”(табл. П.1.14), “Сведения о читателях”(табл. П.1.15), “Читательский формуляр”(табл. П.1.16).
3.4 Программное обеспечение системы
Программное обеспечение АБИС АКВТ подразделяется на базовое и прикладное. Базовое программное обеспечение включает в себя операционные системы (MS DOS Windows”95), под управлением которого работают программы, а также сетевое программное обеспечение Windows NT Server.
Программное обеспечение реализовано на языке Visual Basic for Application (VBA).
3.4.1 Обоснование выбора базового программного обеспечения системы
В качестве сетевой операционной системы используется операционная система Windows NT, являющаяся наиболее распространенной 32-разрядной операционной системой. Программный продукт Windows NT Server предназначен для управления сетевыми ресурсами. Для организации файлового сервера средствами Windows NT Server не требуется дополнительных операций, кроме того Windows NT Server может применяться как мощный сервер приложений.
Для хранения и пересылки и пересылки информации необходимо применение Web-сервера. На Web-сервере должны поддерживаться наиболее распространенные кодировки кириллической информации (СР-1251, СР-866, CP-KOI-8R, CP-ISO-8859-5).
3.4.2 Разработка прикладного программного обеспечения
Программное обеспечение подсистемы АБИС АКВТ позволяет осуществлять процессы обработки и комплектования и процессы работы с читателями. Автоматизированная информационная библиотечная система разработана системе управления базами данных Microsoft Access, предоставляющей возможности решения универсальных задач управления базами данных. Для решения специальных библиотечных задач разработано программное обеспечение на языке Visual Basic for Application (VBA). Возможности программирования Access позволили создать дружественный пользовательский интерфейс и реализовать важные функции поиска, контроля ввода данных.
Разработка включала создание выходных форм и программ для обеспечения функционирования системы.
Была разработана форма “Библиографическое описание издание”, предназначенная для реализации функции регистрации новой литературы, присвоения инвентарных номеров, распечатку карточек для алфавитного и систематического каталогов, книжных формуляров, инвентарных книг, книг суммарного учета, актов списания книг, регистрации. Важной особенностью разработанной формы является автоматизация присвоения инвентарных номеров книгам, что полностью освобождает оператора от этой чреватой ошибками процедуры. Для просмотра литературы в фонде разработаны формы “Издание”, “Краткие сведения о книгах”, “Алфавитный каталог”. Формы предоставляют пользователю возможность просмотра как полных, так и кратких сведений о книге, в режиме просмотра кратких сведений дают возможность уточнения сведений, распечатки требования.
Важным этапом разработки являлось создание формы “Фильтр”, предоставляющей возможность поиска книги во всем объеме фонда литературы. Поиск осуществляется по основным полям ввода библиографического описания: название, автор, другие авторы, ,ответственность, издание и др. Поиск осуществляется по сформированному шаблону. Результаты поиска отображаются в удобной для пользователя форме. Алгоритм программы поиска книги в автоматизированной информационной библиотечной системе представлен на чертеже
Для работы с читателем разработаны формы “Читательский формуляр”, “Сведения о читателе” и “Список читателей”. Данные формы предоставляют возможность просмотра списка читателей, редактирования сведений о читателе, возможность работы с читательским формуляром: фиксацию выданных книг, фиксацию возврата книг, просмотра и распечатки отчета задолжников, списание формуляров в архив.
3.5 Расчет вычислительных ресурсов, необходимых для функционирования автоматизированной информационной библиотечной системы
АРМ администратора, каталогизатора и библиотекаря объединены (разделение нецелесообразно, так как новые поступления литературы и периодики невелики). Для функционирования АБИС АКВТ потребуются:
1) ПЭВМ, в которой храниться база данных, необходимая математика и будут выполняться все библиотечные процессы по комплектованию фонда, осуществлению поиска и управлению системой. Наиболее целесообразно применение ПЭВМ, учитывая что не требуется производить большие математические вычисления и использовать специфические функции);
2) монитор;
3) клавиатура;
4) манипулятор типа “мышь”;
5) принтер (для печати списков);
6) сканер (для ввода статей, аннотаций, графиков, чертежей в базу данных системы);
7) модем, для связи с внутренней локальной сети и внешней сети.
Необходимая аппаратная конфигурация автоматизированной системы представлена на рис. 3.1.
Одной из главных компонент АБИС АКВТ является процессор, определяющий производительность и быстродействие системы. Учитывая тот факт, что ПЭВМ будет реализована как рабочая станция для входа в Internet и как шлюзовой сервер для внутренней локально сети колледжа, производительность процессора должна быть высокой, тактовая частота процессора не менее 200 МГц.
Системная плата должна иметь высокую надежность и предоставлять возможность наращивания основной и КЭШ-памяти, возможности обновления BIOS.
Рис. 3.1. Аппаратная конфигурация автоматизированной информационной библиотечной системы АКВТ
Объем оперативной памяти будет зависеть от объема операционной системы и программных продуктов, образующих программную конфигурацию. Объем памяти, необходимой для операционной системы Windows NT должен быть не менее 64 Мбайт.
В ходе проведения экспериментальных проверок было установлено, что для хранения информации о книге требуется 50 Кбайт, а для хранения информации о читателе – 8 Кбайт, а следовательно для создания базы данных всего библиотечного фонда, требуется примерно 2 Гбайта, а для базы данных картотеки читателей (1000 человек) потребуется 80 Мбайт памяти.
Минимальный объем жесткого диска должен составить 45 Гбайт. Жесткий диск должен обладать высоким быстродействием, среднее время доступа не должно превышать 12 н.с.
Видеоадаптер может обладать сравнительно невысокой разрешающей способностью 800*600 точек и объемом видеопамяти 2 Мбайт. Следовательно разрешающая способность видимой части экрана должна составить 14 дюймов, шаг точек 0,28 мм. Монитор должен иметь антибликовое и антистатическое покрытие экрана. Для данной системы требуется видеоадаптер совместимый с VGA или EGA стандартом.
Накопитель резервного копирования должен отвечать следующим требованиям:
1)иметь съемные диски;
2)иметь объем не менее 1000 Мбайт;
3)скорость вращения диска около 3000 оборотов/сек;
4)среднее время доступа не более 30 мсек.
Наиболее целесообразно применение ZIP-накопителя, имеющего невысокую стоимость.
Для чтения информации с оптических дисков потребуется CD-ROM.
Основным требованием к модему является его быстродействие. Скорость передачи информации должна составлять не менее 566 Кбит/сек., а время загрузки данных объемом 1Мбайт не более 3 минут.
Для печати достаточно поставить матричный принтер, позволяющий выполнить до 5 копий одновременно.
Для передачи различных материалов на терминалы внутренней ЛВС колледжа требуется сканер, имеющий интерполированной разрешение 300*600 точек на дюйм, максимальную площадь сканирования 260*297 мм. Для этих целей наиболее целесообразно использование планшетного сканера.
Для АБИС АКВТ достаточно применение магниторезистивной клавиатуры, имеющей высокую нагрузочную способность.
Для быстрого передвижения по экрану используется манипулятор типа “мышь”.
4. Инструкция пользователя информационной библиотечной системы АКВТ
Электронный каталог является доступным и понятным для пользователя отображением на экране содержимого базы библиографических данных. Для пользователя предоставляется возможность просмотра полного или краткого перечня описателей первоисточника, просмотра библиографического описания первоисточника в соответствии с библиографическим стандартом ГОСТ 7.1-81.
Запуск автоматизированной информационной библиотечной системы осуществляется двойным нажатием кнопкой мыши на значке файла “Фонд”. При запуске пользователь попадает в главную кнопочную форму “АБИС АКВТ”. Кнопочная форма предоставляет вход в режимы работы: “Каталоги”, “Фонд”, “Поиск книги в фонде”, “Работа с читателями”. Вход в режим каталогов осуществляется с запросом на вход в режим алфавитного каталога, тематического каталога и поиска книг в фонде по фильтру.
Режим “Фонд” предоставляет вход в режимы полного просмотра библиографических описаний и режим редактирования и добавления записей в .лектронный каталог.
Режим просмотра фонда предоставляет возможность из главной кнопочной формы войти в режим поиска данных в базе библиографических описаний по фильтру.
Просмотр полного описания дает возможность доступа к одному документу на странице экрана, доступ к следующему осуществляется последовательным листанием в (описаний первоисточников) вперед или назад. В режиме просмотра краткого перечня описателей отображаются наиболее важные поля описателей в списке. Пользователь имеет возможность просмотра более подробных сведений из данного режима по выбранному изданию. Для оперативного поиска документов в электронном каталоге по заданной тематике пользователь может обратиться к тематическому каталогу. Тематический каталог представляет собой справочник библиографических кодов (тематических разделителей) с полной расшифровкой тематического описания. Пользователю предоставляется возможность выхода в режим просмотра краткого описания первоисточника по выбранной тематике. В системе реализована функция алфавитного каталога, записи в каталоге, отсортированы в алфавитном порядке. Каталог реализован в виде списка описателей, и предоставляет возможность просмотра подробных сведений об издании по отобранному подмножеству изданий. Все вышеперечисленные функции доступны только для просмотра и дают возможность отбора изданий пользователем вручную. Для редактирования и добавления записей предоставляется отдельный режим. Кроме того отбор изданий может производиться автоматически по заполненному пользователем шаблону. Шаблон предоставляет пользователю возможность “свободного поиска” по контексту всех основных полей-описателей документа. Результатом операции поиска является подмножество всех документов, соответствующих заданному подмножеству условий.
Поиск по одному полю документа не позволяет с наибольшим удобством производить начальное накопление библиографической информации (когда условия поиска многочисленны). Вход в режим поиска по одному полю осуществляется нажатием кнопки “Поиск”. Более удобная функция - поиск по запросу, сформированному пользователем.
Последовательность формирования запроса следующая. Пользователь должен войти в режим фильтра, нажатием кнопки “Фильтр”, либо выбором в меню операции “Фильтр”, либо выходом в режим “Поиск по фильтру” из главной формы системы.
При входе в режим фильтра на экране отображается форма “Фильтр посика”. При нажатии <ENTER> происходит переход к подполям данного поля. После выбора подполя его название высвечивается в правой части экрана и выдается окно выбора условия поиска.
Выбор операторов условия (OR (ИЛИ), АND (И)) осуществляется двойным нажатием кнопкой мыши на полях выбора условия.
Условия поиска формируются в полях шаблона следующим образом:
{значение} - поиск на совпадение. Отбираются документы, у которых введенный ключ поиска совпадает с началом соответствующего подполя
(так называемого "усечения справа" нет);
*{значение} - поиск по контексту. Отбираются документы, у которых введенный ключ поиска (контекст) совпадает с аналогичным значением в любом месте соответствующего подполя;
Все условия объединяются по умолчанию операцией "И". Для включения операции "ИЛИ" необходимо установить значение переключателя в состояние “ИЛИ”.
По окончании формирования шаблона поиска для непосредственного запуска операции поиска необходимо нажать кнопку “Поиск”. Отказ от поиска осуществляется клавишей “Выход”. Результатом операции поиска является подмножество документов, удовлетворяющих заданному при поиске условию. Если поиск осуществлялся не из режима просмотра полных сведений о документе, на экране выдается сообщение о количестве найденных документов и высвечивается запрос о способе просмотра (краткие сведения или полные сведения) и происходит выход в режим просмотра данного подмножества. С подмножеством можно оперировать так же, как и со всей базой (войти в режим корректировки и удаления документов подмножества, печать выходных форм, поиск в подмножестве). Находясь в просмотре подмножества документов, можно снова войти в режим поиска. В этом случае поиск будет осуществляться только в пределах подмножества. Таким образом можно неограниченное число раз сужать подмножество поиска.
Для сброса подмножества поиска и перехода к работе с целой базой необходимо нажать кнопку “Все документы”.
Если в результате операции поиска не было найдено документов, удовлетворяющих условию поиска, на экране появится соответствующее сообщение и произойдет выход в режим фильтра.
Вход в режим работы с читателями осуществляется из главной кнопочной формы. Открывается форму “Список читателей”. Форма предоставляет возможность редактирования и добавления сведений о читателях и предоставляет доступ к формуляру конкретного читателя. В режиме просмотра читательского формуляра билиотекарь нажатием кнопки “Добавить” осуществляет добавление информации в читательский формуляр. Отметка о сдаче книги осуществляется библиотекарем двойным нажатием кнопкой мыши в поле состояния книги. Списание формуляра в архив осуществляется нажатием кнопки “Списание”.
Следует, однако, обратить внимание, что для полноценного использования системы необходимо привлечение в библиотеку (хотя бы периодическое ) специалиста, знакомого с ПЭВМ. На него необходимо возложить функции так называемого "Администратора системы".
Функции администратора следующие:
1) Помощь библиотечным работникам в освоение работы на персональной ЭВМ.
2) Помощь библиотечным работникам в случае затруднений при выполнении функций АБИС АКВТ, описанных в руководстве по эксплуатации.
4) Создание шаблонов выходных форм и помощь библиотечным.
5) Контроль деятельности библиотечных работников на предмет правильности эксплуатации комплекса.
6) Контроль целостности базы библиографических данных, выполнение их резервного копирования и архивирования.
Ретроконверсию каталога рекомендуется начинать с ввода описаний новых поступлений литературы. Чтобы не блокировать работу библиотеки на начальном этапе внедрения АИБС "МАРК", когда библиотечные работники еще не имеют опыта ее эксплуатации, следует вводить в АИБС АКВТ лишь малую часть новых поступлений, постепенно увеличивая их число, чтобы наконец полностью перейти на автоматизированный режим обработки новых поступлений. Эта обработка должна заключаться не только во вводе описаний из тематических планов, но и выполнении всех операций по контролю поступлений, поиску, сортировке, печати выходных форм и т.д.
При наличии свободного машинного времени следует, кроме новых поступлений, вводить в АБИС АКВТ ретроспективу изданий, уже имеющихся в библиотеке. Причем следует выбирать, в первую очередь, те издания, которые пользуются наибольшей популярностью у читателей. Малоиспользуемые книги будут лишним "лишним грузом" в базе библиографических данных.
5. Экспериментальная часть
5.1 Исходные тексты программ
Исходные тексты программ представлены на прилагаемой к пояснительной записке дискете и в приложении 2.
5.2 Описание проведенных экспериментальных исследований
В ходе выполнения дипломного проекта автоматизированная библиотечная информационная система проходила проверку на работоспособность программы. Проверка осуществлялась вводом в базу данных библиографических описаний книг, имеющихся в библиотеке, их редактирование. Проведены исследования на поиск требуемой информации в базе данных объемом более 1000 библиографических наименований книг. Осуществлялась проверка на работоспособность комплекса работ с читательскими формулярами: ввод данных о читателе, редактирование данных, добавление записей о взятых книгах, списание читательских формуляров. Работа системы в указанных режимах осуществлялась нормально.
7. Технико-экономическое проектирование
7.1 Маркетинговые исследования рынка
Учитывая ориентированность разработанной системы на узкоспециализированную библиотечную систему колледжа маркетинговые исследования провести невозможно, так как разработанная программа учитывает организацию библиотечных процессов только в данном учебном заведении. Возможность распространения программы появиться только после ее доработки. При расчете цены изделия в данном случае подходит метод “издержки+прибыль”.
7.2 Выбор и обоснование объекта для сравнения
В настоящее время отечественные информационные системы “АС-Библиотека” (ГИВЦ МК РФ), “ИРБИС” (ГПНТБ России и международная ассоциация ISIS), “Библиотека 4.0” (ООО “БКС”), “МАРК” (НПО “Информсистема”), АС “Наука” (БЕН РАН) ориентированные на операционные системы MS Windows 9x, Windows NT и UNIX предназначены для крупных библиотек, региональных межбиблиотечных онлайновых центров и библиотечно-информационных систем, в которых риск потери информации должен быть сведен к минимуму. В связи с этим программное обеспечение таких систем имеет довольно высокую стоимость, таким образом требуется его эффективное использование, что в узкоспециализированной библиотеке учебного заведения невозможно.
Система, разработанная студентами колледжа и установленная в библиотеке не используется. Система ориентирована на операционную систему MS DOS не отвечает необходимым требованиям к работе библиотечных систем: не реализованы средства “свободного” поиска по содержанию документов, многие вносимые поля не доступны для просмотра, не реализована функция редактирования внесенных библиографических записей и создания отчетной документации, конечная информация не соответствует требованиям библиотечных ГОСТов. Исходя из вышеперечисленного, все основные, наиболее трудоемкие библиотечные работы, должны производиться вручную.
7.3 Расчет себестоимости и цены АИБС АКВТ
Основная цель создания программного комплекса - исключение рутинного труда библиотекаря и создание возможности для студента осуществлять поиск библиографических описаний книжных изданий на требуемую тему в кратчайшие сроки. Комплекс ориентирован на специалиста, не имеющего высокой специальной подготовки в области информатики и вычислительной техники.
В данной части дипломной работы представлен расчет себестоимости программы АБИС АКВТ. Себестоимость представляет собой сумму затрат на разработку и расходов на содержание и эксплуатацию оборудования, используемого при внедрении программного продукта, а также приведены сводные технико-экономические показатели.
Расчет себестоимости разработки программы производится по формуле (7.1).
гдеС - себестоимость программы, руб.;
Зр - заработная плата разработчика, руб.;заработной платы и отчислений на социальное страхование, руб.;
Рэ - расходы на эксплуатацию оборудования, руб.;
Нр - накладные расходы (50% от основной заработной платы разработчика), руб.
Заработная плата разработчика складывается из основной заработной платы программиста за время разработки программы, дополнительной заработной платы, отчислений на социальное страхование и рассчитывается по формуле (7.2).
где Зо - основная заработная плата программиста за время разработки программы, руб.;
Здоп - дополнительная заработная плата, руб.;
Осоц - отчисления на социальное страхование, руб;
(39% от суммы Зо и Здоп).
Заработная плата программиста за период разработки программы вычисляется по формуле (7.3)
гдеСч - заработная плата за один час работы специалиста, руб.;
Тпр - время затраченное на создание программы, час.;
Тпр может быть технически обоснованным и определяться на основе нормативных документов или опытно - статистически.
Расчет стоимости 1 часа работы программиста производится по формуле (7.4).
гдеЗпм - заработная плата программиста за месяц, руб;
N - количество рабочих дней в месяце, дни;
8 - продолжительность рабочего дня, час.
Расходы на эксплуатацию оборудования вычисляются по формуле (7.5).
где Сэн - стоимость электроэнергии, руб.;
Ао - сумма амортизационных расходов, руб.; программы, руб.;
Срем - стоимость ремонта оборудования, руб.;
Зоп - заработная плата обслуживающего персонала, руб.разработки программы, руб.
Стоимость электроэнергии вычисляется по формуле (7.6).
где Мпр - электроэнергия, потребляемая вычислительной машиной, кВт/час.;квт/ч;
Тм - машинное время, затраченное на создание программы, час.;приблизительно 50% от Тпр, час;
Сквт/ч - стоимость одного квт/ч, руб.
Сумма амортизации за период разработки программы вычисляется на основании государственных нормативов по формуле (7.7).
гдеНа - годовая норма амортизации, %;
Соб - стоимость оборудования, руб.;
Фд - годовой фонд рабочего времени оборудования, час.
Стоимость ремонта оборудования за период создания программы определяется по следующей формуле (7.8).
гдеНр - величина отпускаемых средств на ремонт вычислительной техники
относительно стоимости этой техники, % (3%);
Соб - стоимость оборудования, руб.
Заработная плата обслуживающего персонала за время разработки программы рассчитывается по формуле (7.9).
где Зоп.о - основная заработная плата обслуживающего персонала за выполненную работу, руб.;
Зоп.доп - дополнительная заработная плата обслуживающего персонала, руб.;
Осоц - отчисления на социальное страхование, руб.
Дополнительная заработная плата обслуживающего персонала рассчитывается по формуле (7.10).
где Зоп.доп- дополнительная заработная плата обслуживающего персонала, руб.
Отчисления на социальное страхование рассчитываются по формуле (7.11).
где Осоц - отчисления на социальное страхование, руб.
Основная заработная плата обслуживающего персонала за время разработки программы определяется по формуле (7.12).
где n - количество обслуживаемых ПЭВМ, шт.;
Зоп.год -годовая заработная плата обслуживающего персонала по категориям работников, руб.
Трудоемкость программы может определяться либо по нормативам, либо по экспертным оценкам, то есть на основании опытно-статистических данных специалистов-программистов, дающих пессимистические, оптимистические оценки. Вычисляется ожидаемая длительность работ по формуле (7.13).
гдеТож - применяемая для расчета трудоемкость программы Тпр, дни;
Топт и Тпес - соответственно оптимистическая и пессимистическая оценка данной программы, дни.
Ожидаемые длительности работ на этапе рпоектирования сведены в табл. 7.1.
Таблица 7.1.
Ожидаемая длительность работ на этапе проектирования программы
Наименование работ | Длительность работ (дней) | ||
Минимум | Максимум | Ожидаемая | |
1. Разработка технического задания | 2 | 3 | 2,4 |
2. Анализ технического задания и сбор данных | 8 | 15 | 10,8 |
3. Разработка лингвистического, информационного и программного обеспечения системы | 12 | 14 | 15,6 |
4. Переложение алгоритма на VBA | 8 | 12 | 9,6 |
5. Набор программ на ПЭВМ * | 3 | 5 | 4,8 |
6. Отладка программы на ПЭВМ * | 10 | 15 | 12 |
7. Проведение экспериментов * | 7 | 13 | 9,4 |
8. Оформление пояснительной записки * | 9 | 12 | 10,2 |
Расчет ожидаемой длительности работ был произведен по формуле (7.13). В результате расчета на разработку программы было затрачено 74,8 дней, из них с использованием ЭВМ – 46 дней. Учитывая, что число часов работы в день равно 4, на разработку программы было затрачено 299,2 часа, из них 145,6 часа – время работы на ЭВМ. На отладку программы на ПЭВМ было потрачено 104,8 часа.
Исходные данные для расчета приведены в табл. 7.2.
Таблица 7.2.
Исходные данные для расчета себестоимости Исходные данные | Ед.изм. | Значения |
1 | 2 | 3 |
Трудоемкость создания программы | час | 299,2 |
Трудоемкость работ на ПЭВМ | час | 145,6 |
Месячная заработная плата техника-программиста | руб | 360 |
Потребляемая энергия | квт/ч | 0.4 |
1 | 2 | 3 |
Годовая норма амортизации | % | 25 |
Стоимость оборудования | руб | 10000 |
Годовой фонд рабочего времени оборудования за вычетом простоев в ремонте | час | 1860 |
Таблица 7.3.
Данные об обслуживающем персонале
Категории работающих (обслуживающий персонал) | Количество работающих, чел. | Заработная плата одного специалиста в месяц, руб. | Годовая зарплата, руб. |
Инженер по обслуживанию ПЭВМ | 1 | 400 | 4800 |
Итого: основная заработная плата обслуживающего персонала за год (Зпгод) | 4800 |
Основная заработная плата программиста за время разработки программы рассчитывается по формуле (7.3):
Дополнительная заработная плата составляет 10% от Зо:
Отчисления на социальное страхование составляют 39% от суммы Зо и Здоп:
Таким образом, заработная плата разработчика с учетом дополнительной заработной платы и отчислений на социальное страхование составляет:
Стоимость электроэнергии рассчитывается по формуле (7.6) и составляет:
Сумма амортизации, рассчитанная по формуле (7.7), составляет:
Стоимость ремонта оборудования рассчитывается по формуле (7.3.8) и составляет:
Основная заработная плата обслуживающего персонала за время разработки программы рассчитывается по формуле (7.12) и составляет:
Дополнительная заработная плата, рассчитанная по формуле (7.10), составляет:
Отчисления на социальное страхование составляют:
Таким образом, заработная плата обслуживающего персонала за время создания программы, рассчитывается по формуле (7.9) и составляет:
Расходы на эксплуатацию оборудования вычисляются по формуле (7.5) и составляют:
Накладные расходы составляют 50% от Зо:
По итогам проведенных расчетов себестоимость программы составляет:
Цена программы (Ц) рассчитывается по следующей формуле (7.14).
гдеЦ - цена программы, руб.;
q - процент рентабельности (принимают равным 0.1).
Поскольку программу рассчитана для применения в АКВТ , цена программы составляет:
После доработки программа может быть приобретена и другими библиотеками, тогда цена рассчитывается по формуле (7.15)
где К - количество организаций-покупателей.
7.4 Расчет суммарной экономии затрат
Суммарная экономия для разработанной системы может быть рассчитана по формуле (7.16)
где ЭС – суммарная экономия, руб.;
ЭЗП – экономия заработной платы, руб.;
ЭМР – экономия материалов, руб.
В табл. 7.4. приведены для сравнения продолжительности работ, решаемых вручную и на ЭВМ.
Экономия на заработной плате рассчитывается по формуле (7.17).
где DT – экономия времени, час.;
С1ч/и – стоимость 1 часа работы исполнителя, руб.
Экономия трудоемкости работ рассчитывается по формуле (7.18).
гдеTP – годовая трудоемкость решения задачи с использованием ручного труда, руб.;
TM – годовая трудоемкость решения решения задачи на ЭВМ, руб.;
N – объем работ за год, руб.
Таблица 7.4.
Нормы времени продолжительностей работ, решаемых на ПЭВМ и вручную
Наименование работ | Норма времени на единицу производимых вручную работ, час. | Норма времени на единицу работ, производимых на ЭВМ, час. |
1 | 2 | 3 |
Инвентаризация издания (оформление одного издания в инвентарной книге) | 0,0255 | - |
Просмотр фонда на предмет изъятия непрофильных, дублетных, устаревших по содержанию изданий | на просмотр одного издания – 0,0556 | на просмотр всего фонда - 0,001 |
Исключение изданий из учетных документов, составление акта на выбывающие издания | 0,2358 | 0,001 |
Обработка литературы (формирование одной библиографической записи (в двух экземплярах), систематизация изданий) | 0,0255 | 0,01 |
Организация алфавитного каталога | 0,0166 | - |
Организация систематического каталога | 0,0166 | - |
Перерегистрация читателей | 0,0216 | 0,005 |
Подбор литературы читателям | 0,0666 | 0,003 |
Тематическая подборка в соответствии с библиографическим списком аннотаций, рефератов, документов до 10 изданий | 2,41 | 0,01 |
Подготовка бюллетеня новых поступлений (просмотр до 95 изданий) | 3,9 | 0,005 |
Оповещения, не возвратившим книгу в срок читателям | 0,03 | 0,001 |
где t P – время на решение одной задачи ручным способом, руб.;
N – объем работ в течении года, руб.
Расчет трудоемкости решения задачи с применением ЭВМ рассчитывается по формуле (7.19).
где t P – время на решение одной задачи с применением ЭВМ, руб.;
N – объем работ в течении года, руб.
Ежегодно работники библиотеки проводят перерегистрацию читателей. Затраты времени на перерегистрацию 2500 читателей составляют:
Основное время работы библиотекаря тратиться на обслуживание читателя. Книговыдача в библиотеке составляет в среднем за год 55000 экземпляров. Затраты времени на обслуживание читателей работниками библиотеки за год составляют:
На ежемесячный анализ формуляров с целью выявления задолжников литературы затрачивается:
На выполнение тематических подборок для преподавателей из расчета 500 подборок за год затраты времени составят:
На анализ всего фонда (53000 экземпляров книг) на устаревшие издания для изъятия библиотекарь должен затратить
Обработка годовых поступлений в библиотеку (за 2000 год, составивших 350 экземпляров) заключается в занесении каждого издания в инвентарную книгу учета, составлении библиографического описания в двух экземплярах, затем библиографические карточки расставляются в систематический и алфавитный каталоги библиотеки. Таким образом на обработку одного издания затрачивается суммарное время, необходимое для осуществления этих процессов (см. формулу 4.20).
где ТР6 – суммарное время на ручную обработку поступления, час;
TИ – время на внесение издания в инвентарную книгу, , по нормативам составляет 0,0255 часа;
TОБ – время на заполнение библиографических карточек, , по нормативам составляет 0,2936 часа;
ТТК – время на расстановку библиографических карточек в систематический каталог, по нормативам составляет 0,0166 часа;
ТАК – время на расстановку библиографических карточек в алфавитный каталог, по нормативам составляет 0,0166 часа.
Время на обработку одного издания ручным трудом составляет:
Время на обработку 350 поступивших изданий составит:
Затраты времени на единичные работы, такие как подготовка актов списание, составление перечней новых поступлений при расчете учитывать не будем.
Таким образом затраты времени на вышеперечисленные работы в библиотеке составят:
Рассчитаем затраты времени на выполнение вышеперечисленных работ с применением ЭВМ.
На перерегистрацию читателей затраты времени составят:
На подбор книг читателям:
На ежемесячный анализ картотеки читателей с целью выявления задолжников затрачивается время поиска издания умноженное на число месяцев в году:
На подготовку тематических подборок:
На анализ фонда тратится время на составления поискового описания издания и время поиска литературы в электронном каталоге, это время может составить:
В электронном каталоге требуется лишь один раз зарегистрировать издание. Таким образом, время на обработку издания составит TM6=0.01 часа.
Суммарные затраты времени на обработку 350 поступлений за составляют:
Таким образом с применением ЭВМ затраты времени на вышеперечисленные работы составят:
Экономия рабочего времени при применении машинного труда составит:
Экономия на заработной плате (при месячной зарплате библиотекаря 700 руб) составит:
Экономия расходуемых материалов представляет экономию бумаги на каталожные карточки. При стоимости одной карточки 0,07 руб, экономия на бумагу для 350 поступивших за год изданий составит (при затратах - две карточки на наименование) 49 руб.
Суммарная экономия для разработанной системы составит:
Результаты проведенных расчетов сведены в таблицу 7.5.
Таблица 7.5.
Сводная таблица рассчитанных показателей в данном пункте
Наименование показателя | Ед. измерения | Значения |
Машинное время, используемое для решения потребителем задач с помощью разработанной программы | час. | 219 |
Экономия рабочего времени | час. | 6755,7 |
Суммарная экономия | руб | 23079,79 |
Поскольку ранее решение перечисленные задачи решались вручную, капитальные вложения систему можно рассчитать по формуле (7.21).
где К – капитальные вложения в систему, руб.;
КК – капитальные вложения в ЭВМ, для которой предназначена данная программа, руб.;
Tпол – полезный годовой фонд времени работы этой ЭВМ, за вычетом простоев в ремонте, час/год;
ТМВ – машинное время, используемое потребителем для тех задач, которые он
решает с помощью системы, машино-час/год;
ZП – цена используемой системы, руб/потребителя программы.
Значение ТМЭ рассчитано в п. 7.4 и составляет 219 часов, цена разработанной системы ZП рассчитана в п. 7.3 и составляет 4319,69 руб. Капитальные вложения в ЭВМ, для котовой предназначена разработанная система составят 20000 руб. Полезный годовой фонд рабочего времени этой ЭВМ составляет за вычетом простоев в ремонте 18601 ч/год. Капитальные вложения потребителя составят:
Расчет эксплуатационных расходов, связанных с функционированием программы производиться по формуле, приведенной в п. 7.3 (см. формулу (7.5)). В табл. 7.6 приведены данные для расчета эксплуатационных расходов.
Основная заработная плата обслуживающего персонала рассчитывается по формуле (7.22)
где С1чи – стоимость одного часа работы на ЭВМ, руб.;
И составляет:
Дополнительная заработная плата, рассчитанная по формуле (7.10), приведенной в п. 7.3, составляет:
Таблица 7.6
Данные для расчета расходов, связанных с эксплуатацией программы
Наименование | Единицы измерения | Значение |
Стоимость одного часа работ на ПЭВМ, С1чи | руб | 10,53 |
Коэффициент, учитывающий дополнительной зарплаты, WД | % | 10 |
Коэффициент начислений на заработную плату, WН | % | 39 |
Мощность, потребляемая ЭВМ, Мпр | кВт/ч | 0,4 |
Стоимость электрической энергиии, С1кВт/ч | руб./кв.ч | 0,42 |
Среднее число часов работы системы в году с учетом простоев в ремонте, Фд | час | 1860 |
Трудоемкость работ на ЭВМ (см. расчет в п. 7.4), ТМВ | час | 219 |
Таким образом, заработная плата обслуживающего персонала за время создания программы, рассчитывается по формуле (7.9) и составляет:
Стоимость ремонта оборудования рассчитывается по формуле (7.8) и составляет:
Стоимость электроэнергии рассчитывается по формуле (7.3.6) и составляет:
Сумма амортизации в вычислительной техники, рассчитанная по формуле (7.7), составляет:
Амортизационные отчисления с программы рассчитываются по формуле (7.23)
гдеАП – амортизационные отчисления с программы, руб;
TC – срок службы данной программы, TC = 4 года.
Амортизационные отчисления с программы рассчитываются по формуле (7.23)
Эксплуатационные расходы составляют
Производиться автоматизирование рабочего места, поэтому дополнительных расходов на содержание зданий и помещений не требуется. Общие расходы с учетом прочих расходов (2% от суммы всех эксплуатационных расходов) составят:
7.6 Расчет показателей экономической эффективности и ожидаемого годового экономического эффекта от внедрения разработки
Рассчитаем экономическую эффективность использования программы. Расчет осуществляется по формуле (7.24).где ЭФ - фактическая экономия, руб.
Экономия фактическая составит:
Срок окупаемости определяется по формуле (7.25).
гдеTок – срок окупаемости изделия, год.
Коэффициент экономической эффективности рассчитывается по формуле (7.26)
Срок окупаемости составляет:
Нормативный срок окупаемости для программы составляет ТН=2 года. Так как рассчитанный срок окупаемости меньше нормативного, то значит спроектированная система экономически эффективна.
Коэффициент экономической эффективности Е обратно пропорционален сроку окупаемости ТОК и составляет:
Нормативный коэффициент экономической эффективности ЕН » 0,25 меньше рассчитанного.
Критерием эффективности создания и внедрения прикладных программных продуктов является ожидаемый годовой экономический эффект, получаемый потребителем программы. Годовой экономический эффекта рассчитывается по формуле (7.27).
ЭГ=ЭФ-ЕНКД(7.27)
где ЭГ –годовая экономия, руб./сист.
Таким образом ожидаемый годовой экономический эффект равен:
ЭГ=17670,45-0,25*6574,53= 16026,81 руб.
Все рассчитанные показатели системы приведены в табл. 7.7.
Таблица 7.7
Сводные технико-экономические показатели разработки
Показатель | Ед. измерения | АБИС АКВТ |
1. Технические показатели | ||
Среднее время работы системы | час. | 219 |
2. Экономические показатели | ||
Себестоимость системы | руб. | 23079,79 |
Цена системы | руб. | 4219,69 |
Капитальные вложения | руб. | 6574,53 |
Годовые эксплуатационные расходы | руб./год | 5409,34 |
Ожидаемый годовой экономический эффект | руб./год | 16026,81 |
Коэффициент экономической эффективности | - | 2,5 |
Срок окупаемости | год | 0,4 |
8. Безопасность жизнедеятельности
8.1 Анализ условий труда, тяжести и напряженности трудового процесса
Анализ условий труда, тяжести и напряженности трудового процесса предусматривает санитарные требования к производственным помещениям. Эти требования устанавливаются СН245-71, СниП, ГОСТ и ОСТ (согласно Руководства Госсанэпинадзора Р 2.2013-94) с учетом вредных веществ, выделяющихся при технологических процессах, а также метеорологических условий.
Помещение библиотеки по степени воздействия на организм вредных веществ относиться к категории малоопасных помещений, соответственно предельно допустимые концентрации вредных веществ в воздухе рабочей зоны составляют более 10 мг/м3. Стены помещений позволяют быстро и эффективно производить их очистку. По мере загрязнения стен, но не реже 1 раза в год производится побелка с внутренней стороны. Окраска стен, колонн, дверей производится в соответствии с требованиями современной эстетики и электронно-вакуумной гигиены. Помещение библиотеки, где оборудовано системой отопления и кондиционирования воздуха.
Таблица 8.1.
Результаты анализа тяжести и напряженности трудового процесса работника библиотеки
Фактор | Фактич. знач. | Нормат. знач. | Класс усл. труда |
Температура воздуха, °С | 20 – 23 | 19 – 25 | Легкий |
Относительная влажность, % | 60 – 40 | Не более 75 | Легкий |
Скорость движения воздуха, м/с | 0,2 | 0,2 | Легкий |
Затраты энергии, кДж/ч | 612 | 628 | Легкий |
ПДК вредных веществ в воздухе рабочей зоны, мг/м3 | 12 — 14 | Более 10 | Малоопасный |
Общая оценка условий труда | Легкий, малоопасный |
Для помещения, где будет установлено оборудование для АБИС АКВТ, необходимо предусмотреть выполнение всех требований к помещениям с вычислительной техникой.
Расчет освещенности в помещении библиотеки, где будет установлено оборудование на соответствие требованиям к освещенности помещения с ЭВМ
В соответствии с требованиями к освещенности помещения, в котором установлена вычислительная техника, норма освещенности при общем освещении должна составлять 400 лк. Для общего освещения помещения ВЦ следует использовать главным образом люминесцентные лампы, что обуславливается их высокой световой отдачей (до 75 лм/Вт и более); продолжительным сроком службы (до 10000 ч); малой яркостью светящейся поверхности; спектральным составом излучаемого света.
В помещении библиотеки установлены люминесцентные лампы с косинусоидальной КСС (Д) типа ПВЛМ. Светильники размещаются рядами (в 3 ряда по 4 светильника) параллельно стене с окнами, что позволяет производить их последовательное отключение (включение), в зависимости от величины естественной освещенности. Свес светильников составляет hC =0,2 м. Световая отделка потолков, стен, перегородок, полов выполнена в светлых тонах.
Выполним расчет на достаточность освещения помещения. Размеры рассматриваемого помещения составляют: (длина) А = 6 м., (ширина) В = 5,6 м., (высота) H=3 м.
1) Определяем относительное расстояние между светильниками по формуле (8.1).
LAB=lHP,(8.1)
где LAB - относительное расстояние между светильниками, м.;
l - для данного типа светильника l=1,6;
HP - высота подвеса светильников над рабочей поверхностью.
Высота подвеса светильников рассчитывается по формуле (8.2).
HP = Н - hP - hC ,(8.2)
где Н – высота помещения, м.;
hP – высота рабочей поверхности, м.;
hC –свес светильников, м.
Рассчитываем высоту подвеса светильников, учитывая что для помещения с вычислительной техникой уровень рабочей поверхности над полом должен составлять 0,8 м.
HP =3-0,8-0,2=2 (м)
Тогда относительное расстояние между светильниками:
LAB=1,6*2=3,2 (м)
Принимаем расстояние между светильниками в ряду А (LA), которое по значению близко, но не больше LAB:
LA £ LAB = 2 м.
Тогда расстояние между светильниками в ряду В (LВ) рассчитывается, как:
LВ = LA/1,5= 1,2 м.
Задаемся расстоянием от стен до ближайшего ряда светильников:
lAB = (0,3 ¸ 0,5) LAB =0,96¸1,6 м.
Принимаем расстояние от стены до ряда А равным lA=1м, принимаем расстояние от стены до ряда В равным lB=1м.
Определяем число светильников в ряду по формуле (8.3).
где N – число светильников в ряду А.
Число светильников в ряду А:
Число светильников в ряду В:
Определяем общее количество ламп для помещения (n):
2) Расчет осветительной установки методом коэффициента использования светового потока.
По справочным данным коэффициент запаса, учитывающий запыление светильников и износ источников света в процессе эксплуатации, для помещений, оборудованных ЭВМ, составляет при условии чистки светильников не реже двух раз в год КЗ=1,4¸1,5. Коэффициенты отражения светового потока от потолка, стен и рабочей поверхности соответственно равны: rп=70%, rс=50%, rр=50%.
Определяем индекс помещения по формуле (8.4).
где i – индекс помещения.
Индекс помещения равен:
Для расчета коэффициента использования излучаемого светильником светового потока по справочным данным определяем значения коэффициента полезного действия помещения hп=0,58 и коэффициента полезного действия светильника hсв=0,85.
Коэффициента использования излучаемого светильником светового потока рассчитывается по формуле (8.5).
h=hп*hсв,(8.5)
где h - коэффициент использования излучаемого светильником светового потока;
hп – коэффициент полезного действия помещения;
hсв - коэффициента полезного действия светильника.
Коэффициент использования светового потока равен:
h=0,58*0,85=0,493
Определяем расчетный световой поток лампы по формуле (8.6)
гдеФР – световой поток лампы, лм.
Световой поток лампы равен:
Для достаточного освещения освещения помещения библиотеки можно выбрать лампу ЛДС40-4. Световой поток лампы 2100 лм. При выборе лампы для освещения должно быть соблюдено условие:
Условие при выборе типа лампы для освещения помещения было соблюдено:
8.2 Разработка мероприятий по улучшению условий труда
Для персонала библиотеки в целях улучшения условий труда необходимо пересмотреть режимы труда и отдыха, в связи с вводом в библиотечную работу труда оператора ЭВМ. Должно предусматриваться устройство регламентированных перерывов в периоды снижения работоспособности, чередование операций при монотонном режиме работ, проведение трансляции функциональной музыки, осуществление специальных профилактических мероприятий (сезонного приема витаминов, психологической разгрузки, офтальмотренажа и гимнастики для глаз), лечебно-профилактическое обслуживание. При поступлении на работу и периодические медицинские осмотры работающих, лечебно-профилактическое питание и проведение лечебно-профилактических мероприятий по предупреждению заболеваний работающих.
Работающие с ПЭВМ подвергаются воздействию вредных и опасных факторов производственной среды: электромагнитных полей (радиочастот), статическому электричеству, шуму, недостаточно удовлетворительным метеорологическим условиям, недостаточной освещенности и психоэмоциональному напряжению.
Особенности характера и режима труда, значительное умственное напряжение и другие нагрузки приводят к изменению у данной категории сотрудников функционального состояния центральной нервной системы, нервно - мышечного аппарата рук (при работе с клавиатурой). Нерациональные конструкция и расположение элементов рабочего места вызывают необходимость поддержания вынужденной рабочей позы. Длительный дискомфорт в условиях гипокинезии вызывает повышенное напряжение мышц и обусловливает развитие общего утомления и снижение работоспособности.
При длительной работе за экраном дисплея у операторов отмечается выраженное напряжение зрительного аппарата с появлением жалоб на неудовлетворенность работой, головные боли, раздражительность, нарушение сна, усталость и болезненные ощущения в глазах, в пояснице, в области шеи, руках и др.
При длительной работе за экраном дисплея у операторов отмечается выраженное напряжение зрительного аппарата с появлением жалоб на неудовлетворенность работой, головные боли, раздражительность, нарушение сна, усталость и болезненные ощущения в глазах, в пояснице, в области шеи, руках и др.
Таким образом, тяжесть труда вышеуказанных работников не должна превышать оптимальных, а напряженность допустимых величин.
8.2.1 Санитарно-гигиенические требования к помещению
8.2.1.1 Требования к микроклимату
Оптимальными параметрами температуры при почти неподвижном воздухе являются 19-21 градусов Цельсия, допустимыми 18-22 градусов Цельсия, соответственно относительная влажность воздуха 62-55% и 39-31%. Воздух, поступающий в помещение, должен быть очищен от загрязнений, в том числе от пыли и микроорганизмов. Запыленность воздуха должна быть в пределах нормы. Скорость движения воздуха должна быть не более 0,1м/с для всех климатических зон. Для повышения влажности воздуха следует использовать увлажнители.
8.2.1.2 Требования к освещению
Помещения, где работают сотрудники рассматриваемой категории должны иметь естественное и искусственное освещение. Основной поток естественного света должен быть слева. Солнечные лучи и блики не должны попадать в поле зрения работников и на экраны видеомониторов.
В качестве источников искусственного света рекомендуется использовать люминесцентные мощность 40 Вт или энерго-экономичные мощностью 36 Вт типа ЛБ, ЛТБ как наиболее эффективные и приемлемые с точки зрения спектрального состава.
Следует окрашивать стены помещений холодными тонами красок. Поверхности рабочих столов должны быть цвета натуральной древесины. На окнах монтируются занавеси, по цвету гармонирующие с цветом стен. Занавеси не должны пропускать естественный свет и полностью закрывать оконные проемы.
8.2.1.3 Требования к защите от электромагнитных излучений
ПЭВМ и видеотерминалы на электронно-лучевых трубках являются источниками широкополосных электромагнитных излучений: мягкого рентгеновского, ультрафиолетового, видимого, ближнего инфракрасного, радиочастотного диапазона и др. В связи с этим видеомониторы должны быть оборудованы защитными экранами, в помещениях рекомендуется проводить мероприятия по повышению влажности воздуха, а также каждый день освобождать от пыли экран и поверхность монитора.
8.2.1.4 Требования к защите от шума и вибраций
Шум является одним из наиболее неблагоприятных факторов, воздействующих на организм человека.
Уровень шума на рабочих местах во время работы на ПЭВМ не должен превышать 50 дБА.
Помещения, где работают сотрудники рассматриваемой категории, не должны граничить с помещениями, имеющими повышенный уровень шума и вибраций. Вибрации на рабочих местах не должны превышать допустимых значений.
8.2.1.5 Организация рабочих мест
Вычислительные машины устанавливаются и размещаются в соответствии с требованиями технических условий заводов - изготовителей и санитарных норм.
Объем производственного помещения на одного человека следует предусматривать не менее 19,5 куб.м и площадью не менее 6 кв.м.
Рабочее место для выполнения работ в положении сидя должно соответствовать требованиям ГОСТов:
1) рабочий стол должен регулироваться по высоте в пределах 680-760мм, при отсутствии такой возможности его высота должна составлять 720мм.;
2) рабочий стул должен быть снабжен подъемно-поворотным устройством, обеспечивающим регуляцию высоты сидения и спинки. Высота поверхности сидения должна регулироваться в пределах 400-500мм. Ширина сидения должна составлять не менее 400мм,глубина -не менее 380мм;
3) на рабочем месте необходимо предусматривать подставку для ног
8.2.3 Инструкция по технике безопасности для оператора ПЭВМ
В качестве оператора ЭВМ могут работать лица не моложе 18 лет, сдавшие соответствующий экзамен по Правилам технической эксплуатации электроустановок потребителей и Правилам техники безопасности при эксплуатации электроустановок потребителей, прошедшие инструктаж на рабочем месте, соответствующий медицинский осмотр, и усвоившие безопасные методы выполнения работ по специальности.
Работа на ЭВМ, а также на периферийных устройствах, входящих в состав ЭВМ, связана с возможностью возникновения опасных и вредных факторов:
5) перенапряжением зрения при работе с экранными устройствами, в особенности при нерациональной освещенности рабочих поверхностей в зоне видеотерминалов и нерациональном расположении экрана по отношению к органам зрения человека.
При работе оператора ЭВМ НЕОБХОДИМО:
1) быть внимательным, не отвлекаться на посторонние дела и не отвлекать других;
2) о всех замеченных неисправностях немедленно сообщать вышестоящему работнику, а в аварийных ситуациях немедленно прекращать работу;
3) соблюдать правила личной гигиены; 4) поддерживать на рабочем месте чистоту и порядок;
5) не размещать на рабочем месте предметы, не имеющие прямого отношения к выполняемой работе;
6) принимать пищу только в специально оборудованных для этой цели местах;
7) хранить одежду в отведенных местах;
8) не покидать рабочее место без разрешения вышестоящего работника.
Для обеспечения личной безопасности перед началом работы оператор ЭВМ ОБЯЗАН:
1) надеть исправную рабочую одежду, подготовить средства индивидуальной защиты (СИЗ), необходимые для выполнения конкретной работы. Внешним осмотром убедиться в их исправности (ГОСТ 12.4.131 - 83). Во избежание работы на неисправном оборудовании необходимо проверить:
- исправность разъемов в сети электропитания блоков устройств, вентиляторов и кондиционеров;
- наличие, исправность и соответствие по току предохранителей;
- исправность защиты силовой и осветительной электропроводок от механических повреждений; - отсутствие изломов и повреждений изоляции питающих проводов;
- отсутствие открытых токоведущих частей в ПЭВМ и их устройствах;
- наличие и исправность диэлектрического коврика или диэлектрической подставки и пульта управления.
2) проверить визуально порядок на своем рабочем месте и убедиться в отсутствии нарушений Правил техники безопасности;
3) для длительной работы (более 30 минут) подготовить рабочее место на устройствах типа "дисплей";
4) отрегулировать сидение на оптимально удобную высоту;
5) расположить элементы рабочего места так, чтобы угол зрения на экран дисплея составлял ± 15 градусов, а расстояние
до экрана - 400-500 мм;
6) принять меры, чтобы при нормальной освещенности прямой свет не падал на экран. Во время работы НЕОБХОДИМО:
- постоянно следить за сигнализацией перегрузок;
- поддерживать на рабочем месте чистоту и порядок;
- не отвлекаться посторонними делами и разговорами и не отвлекать других. Не разрешается держать на рабочем месте предметы, не имеющие прямого отношения к выполняемой работе.
ЗАПРЕЩАЕТСЯ:
- курить,
- принимать пищу на рабочем месте и в не отведенных для этого местах;
- покидать рабочее место без разрешения начальника отдела;
- выполнять работу, которая не входит в обязанности оператора.
Работу на устройствах ПЭВМ можно производить, пользуясь исправными инструментами и только по их прямому назначению.
Обо всех замеченных неисправностях оборудования, которые не могут быть устранены самостоятельно, необходимо доложить непосредственно руководителю работ, а в аварийных случаях следует немедленно прекратить работу до устранения аварийной обстановки.
В случае заболевания или получения даже незначительной травмы необходимо лично или через товарища по работе сообщить об этом руководителю работ и обратиться в лечебное учреждение (здравпункт). После окончания работы СЛЕДУЕТ:
1) поставить все тумблеры устройств в положение "Выключено".
2) навести порядок на рабочем месте; соблюсти правила личной гигиены: снять и аккуратно сложить рабочую одежду в специально отведенное для этого место, вымыть руки.
В случае возникновения аварийных ситуаций оператор ЭВМ ДОЛЖЕН:
1) поставить в известность вышестоящего работника и вызвать соответствующую службу (скорую помощь, пожарную охрану и т.д.);
2) принять меры оказания первой медицинской помощи пострадавшему от электрического тока:
а) отключить электропитание помещения;
б) уложить пострадавшего на спину на твердую поверхность;
в) проверить у пострадавшего наличие дыхания (определяется по подъему грудной клетки или иным способом);
г) проверить у пострадавшего наличие пульса на лучевой артерии у запястья или на сонной артерии на передней боковой поверхности шеи;
д) выяснить состояние зрачка (широкий зрачок указывает на резкое ухудшение кровоснабжения мозга).
е) до прибытия врача скорой помощи, если пострадавший находится в сознании, но до этого был в обмороке, его следует уложить в удобное положение, тепло укрыть, и, до прибытия врача, обеспечить полный покой, непрерывно наблюдая за дыханием и пульсом пострадавшего. Если отсутствует сознание, но сохраняется устойчивое дыхание и пульс, нужно пострадавшего удобно и ровно уложить, расстегнуть одежду, обеспечить приток свежего воздуха, давать нюхать нашатырный спирт. В том случае, когда отсутствует дыхание, следует сделать искусственное дыхание и непрямой массаж сердца до положительного результата или до прибытия врача. Когда пострадавший начнет дышать самостоятельно, продолжать искусственное дыхание вредно, но если дыхание начнет ослабевать, немедленно следует его возобновить. Искусственное дыхание делается по способу “изо рта в рот” или “изо рта в нос”. При этом оказывающий помощь производит выдох воздуха из своих легких в легкие пострадавшего через рот или нос пострадавшего. Для искусственного дыхания пострадавшего укладывают на спину на жесткую поверхность, расстегивают пояс, одежду, стесняющие грудную клетку и живот. Далее, встав на колени, оказывающий помощь запрокидывает голову пострадавшего назад, очищает рот от слизи и возможных посторонних предметов. Сделав глубокий вздох, оказывающий помощь плотно прикладывает через платок рот ко рту пострадавшего. Повторяет эту процедуру 10 – 12 раз в минуту до полного восстановления дыхания пострадавшего или до прибытия врача.
Одновременно с искусственным дыханием для поддержания кровообращения производится непрямой массаж сердца пострадавшего. Для этого второй человек, оказывающий помощь, становится на колени с левой стороны от пострадавшего, накладывает одну руку на другую и ритмично, толчками 50 – 60 раз в минуту надавливает ими нижнюю кисть левой части груди, прижимая ее на 3 – 4 см ближе к позвоночнику. Вдувание воздуха и наружный массаж сердца должны производиться поочередно, т. е. один человек вдувает воздух, а другой, в паузах, когда у пострадавшего происходит пассивный выдох, надавливает на грудную клетку, производя массаж сердца. 3) в случае возникновения пожара, для прекращения процесса горения использовать огнетушители, сухой песок, асбестовые одеяла, кошмы. Нарушение перечисленных выше требований может привести к тяжелым последствиям, поэтому к нарушителям применяются меры административного воздействия.
8.3 Пожарная безопасность
В электронной вычислительной машине (ЭВМ) пожарную опасность создают элементы электронной схемы и соединительные провода. Действующие радиотехнические детали разогреваются электрическим током, нагреваются окружающий их воздух и соседние детали, поэтому необходимо принудительное охлаждение (путем циркуляции воздуха).
Пожароопасны изоляционные материалы: лаки, краски и эмали. Изоляционные материалы нетеплостойки; при нарушениях температурного режима возможно разложение этих материалов и выделение различных горючих веществ. Предпочтительно применение несгораемых материалов (например, политетрафторэтилена, обладающего значительной тепло- и огнестойкостью и высокими изоляционными качествами).
В ЭВМ следует предотвращать нагрев и излучение тепла деталями из легковоспламеняющихся материалов, а также их воспламенение; возгорание трансформаторов, сопротивлений и дросселей вследствие недопустимого возрастания тока; нарушение изоляции соединительных проводов, пробой конденсаторов, короткое замыкание и возникновение электрической дуги; местные перегревы и искрения.
Причиной пожаров на предприятиях часто бывает электрический ток, а именно: короткие замыкания; перегрузки электродвигателей, осветительных и силовых сетей; большие переходные сопротивления в местах соединений, ответвлений, в контактах электромашин и аппаратов, приводящие к локальному перегреву; работа неисправных или оставленных без присмотра электронагревательных приборов; нагрев строительных конструкций при выносе на них потенциалов; искрение и электрические дуги.
Короткие замыкания возникают при неправильном устройстве или эксплуатации электроустановок, старении или повреждении изоляции Ток короткого замыкания зависит от мощности источника тока, расстояния от источника тока до места замыкания и вида замыкания. В осветительных сетях напряжением 220 В токи короткого замыкания между фазой и нулевым проводом достигают 3,8 кА, в силовых сетях — нескольких десятков кило ампер. Такие токи вызывают искрение и разогревание токоведущих частей до высокой температуры, что влечет за собой воспламенение изоляции проводов и находящихся рядом сгораемых конструкций и материалов. Токовые перегрузки возникают при подключении к сети дополнительных потребителей тока или при понижении напряжения в сети. Длительные перегрузки ведут к нагреву проводов, что может вызвать их возгорание. Увеличение переходных сопротивлений в местах соединений возникает при окислении или недостаточно плотном соединении контактов электрических машин. Возникающее при этом искрение может вызвать пожар.
В помещении библиотеки применяются светильники различного типа. Наиболее пожароопасными являются дампы накаливания, т.к. температура на поверхности колб может достигать 500°С. В пожароопасных помещениях (книгохранилища) допускается применение светильников только в закрытом исполнении; стеклянные колпаки переносных светильников должны быть закрыты металлической сеткой. Состояние электросетей и светильников должно систематически проверяться. Светильники должны периодически очищаться от пыли и загрязнений; перегоревшие лампы - заменяться.
В проектах осветительных и силовых электросетей должны быть предусмотрены общие рубильники для отключения потребителей от источника электроснабжения после окончания работы и при возникновении пожара.
На случай возникновения пожара в библиотеке колледжа должно предусматся существование плана эвакуации людей из помещения. Для тушения пожаров на начальной стадии возникновения в помещении библиотеки предусматривается наличие огнетушителей. Это могут быть применены углекислотные огнетушители типа ОУ-5. Углекислотные огнетушители обеспечивают высокую эффективность тушения пожара, сохранность электронного оборудования, диэлектрические свойства углекислого газа позволяют использование огнетушителя, даже если не удалось обесточить установку сразу.
8.4 Защита окружающей природной среды
Работа библиотекаря, связанная с компьютером, сопряжена с дополнительными вредными воздействиями целой группы факторов, что существенно снижает производительность их труда. Воздействие ионизирующего излучения от мониторов оказывает на человека сложные химические, биологические и химические процессы. Ионизация воздуха влияет не только непосредственно на работающего, но и на окружающих. Причиной возникновения ионизации воздуха является некачественное экранирование источников излучения. Для обеспечения минимального воздействия ионизирующего излучения мониторы должны предусматривать экранирующее покрытие. Уровни ионизации при работе на ЭВМ приведены в табл. 8.2.
Таблица 8.2.
Уровни ионизации воздуха при работе на видеотерминалов и ПЭВМ.
(Параметры для соблюдения обязательны).
Уровни | Число ионов в 1 см. куб. воздуха | |
n+ | n- | |
Минимально необходимые | 400 | 600 |
Оптимальные | 1500 - 3000 | 300 - 5000 |
Максимально допустимые | 50000 | 50000 |
ЗАКЛЮЧЕНИЕ
Перспективным направлением развития является постепенный переход к электронным библиотекам. Электронная библиотека – электронный аналог традиционной библиотеки с электронным каталогом и фондами машиночитаемых документов, хранящихся в адекватной объему и типу данных высоконадежной аппаратно-программной среде с доступом пользователей через глобальные телекоммуникационные сети.
Представляется, что концепция электронной библиотеки должна включать два уровня: метауровень и уровень конкретных производителей электронных документов. При этом на метауровне должны решаться задачи навигации между информационными ресурсами (базами данных), а на другом уровне – поиск и доступ к конкретным документам.
С точки зрения типа электронная библиотека является, прежде всего, организационно-технологической системой, т.е. системой со значительным участием человека во всех управленческих и производственных процессах при полной автоматизации последних. В ней не должны создаваться электронные документы, а они должны поставляться из многочисленных электронных издательств.
ПРИЛОЖЕНИЕ 1
Таблица 1.1.
Структура таблицы “ШИФРЫ“
№ | Имя поля | Тип | Размер | Назначение |
1 | Идентификатор издания | Счетчик | Длинное целое | Ключевое индексированное поле, совпадения не допускаются |
2 | ББК | | 10 | |
3 | Авторский знак | Текстовый | 100 | |
4 | Тип записи | Логический | ||
5 | Тип издания | Текстовый, подстановка | 50 | cписок значений: "Монография";"Периодическое издание";"Сборник";"Статья" |
Структура таблицы “Автор”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Автор | Текстовый | 25 | Автор издания |
Структура таблицы “Другие авторы”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Другие авторы | Текстовый | 50 | Другие авторы |
Структура таблиц “Коллективные авторы”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Название министерства/ведомства | Текстовый | 50 | ||
3 | Название организации/кафедры | Текстовый | 50 | ||
4 | Номер съезда/конференции/семинара | Текстовый | 15 | ||
5 | Дата проведения | Текстовый | 15 | ||
6 | Место проведения | Текстовый | 15 | ||
7 | Прочая информация | Текстовый | 50 |
Структура таблицы “Название”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Название книги | Текстовый | 100 | ||
3 | Продолжение название | Текстовый | 150 | ||
4 | Ответственность | Текстовый | 100 |
Структура таблицы “Аннотация”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Аннотация | Поле МЕМО |
Структура таблицы “Выходные данные”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Идентификатор издательства | Числовой | Длинное целое | 0 | |
3 | Год издания | Числовой | Целое |
Структура таблицы “Сведения об издании”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Сведения об издании | Текстовый | 50 |
Структура таблицы “Серия”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Название серии | Текстовый | 100 | ||
3 | Номер выпуска | Текстовый | 15 |
Структура таблицы “Том”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Номер тома/книги | Текстовый | 15 | ||
3 | Название тома/книги | Текстовый | 100 | ||
4 | Продолжение названия тома | Текстовый | 100 | ||
5 | Ответственность за том | Текстовый | 100 |
Структура таблицы “Количественные характеристики”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издания | Числовой | Длинное целое | 0 | |
2 | Количественные характеристики | Текстовый | 20 | ||
3 | Сопроводительный материал | Текстовый подстановка | 15 | cписок значений: "Чертежи";"CD";"Дискета";"Альбом"; “Приложение” |
Структура таблицы “Издательства”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Идентификатор издательства | Счетчик | Длинное целое | 0 | Индексированное ключевое поле, совпадения не допускаются |
2 | Место издания | Текстовый | 20 | ||
3 | Издательство | Текстовый | 50 | ||
4 | Телефон | Текстовый | 15 | Шаблон ввода: !\(999") "000\-0000;0;_ |
Таблица 1.13.
Структура таблицы “Инвентарная книга”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Инвентарный номер | Числовой | С плавающей точкой (8 байт) | 0 | Индексированное ключевое поле, совпадения не допускаются |
2 | Цена издания | Денежный | Денежный | 2 | |
3 | Идентификатор издания | Числовой | Длинное целое | 0 | |
4 | Состояние | Текстовый, подстановка | 10 | Поле со списком: "в фонде"; "на руках" |
Структура таблицы “Справочник ББК”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Код ББК | Текстовый | 10 | Индексированное ключевое поле, совпадения не допускаются | |
2 | Описание ББК | Текстовый | 100 |
Структура таблицы “Сведения о читателях”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Номер читательского формуляра | Счетчик | Длинное целое | 0 | Индексированное поле, совпадения не допускаются |
2 | Фамилия | Текстовый | 20 | ||
3 | Имя_Отчество | Текстовый | 40 | ||
4 | Год рождения | Дата/Время | Краткий формат даты | Шаблон ввода: 99/99/00;0;_ | |
5 | Группа | Текстовый: подстановка | 10 | Поле со списком: таблица “Группы” | |
6 | Домашний адрес временный | Текстовый | 60 | ||
7 | Домашний адрес постоянный | Текстовый | 60 | ||
8 | Телефон | Текстовый | 15 | Шаблон ввода: !\(999") "000\-0000;0;_ | |
9 | Дата заведения формуляра | Дата/Время | Краткий формат даты | Шаблон: 99/99/00;0;_ | |
10 | Дата списания | Дата/Время | Краткий формат даты | Шаблон: 99/99/00;0;_ | |
11 | Дата перегистрации | Дата/Время | Краткий формат даты | Шаблон: 99/99/00;0;_ | |
12 | Фамилия отца | Текстовый | 20 | ||
13 | Имя_отчество отца | Текстовый | 50 | ||
14 | Место работы отца | Текстовый | 60 | ||
15 | Фамилия матери | Текстовый | 20 | ||
16 | Имя_отчество матери | Текстовый | 50 | ||
17 | Место работы матери | Текстовый | 60 |
Структура таблицы “Читательский формуляр”
№ | Имя поля | Тип | Размер | Дес | Назначение |
1 | Номер читательского формуляра | Числовой | Длинное целое | 0 | |
2 | Инвентарный номер книги | С плавающей точкой (8 байт) | 20 | ||
3 | Дата выдачи | Дата/Время | Краткий формат даты | Шаблон: 99/99/00;0;_ | |
4 | Дата возврата | Дата/Время | Краткий формат даты | Шаблон: 99/99/00;0;_ | |
5 | Возврат | Дата/Время | Краткий формат даты | Шаблон: 99/99/00;0;_ |
ПРИЛОЖЕНИЕ 2
Листинг программы главной кнопочной формы
Option Compare Database
Option Explicit
Private Sub Form_LostFocus()
DoCmd.Maximize
End Sub
Private Sub Form_Open(Cancel As Integer)
' Свертывание окна базы данных,
' инициализация формы.
' Переход на страницу кнопочной формы, отмеченную для использования по умолчанию.
Me.Filter = "[ItemNumber] = 0 AND [Argument] = 'по умолчанию' "
Me.FilterOn = True
End Sub
Private Sub Form_Current()
' Обновление заголовка и заполнение
' списка команд.
Me.Caption = Nz(Me![ItemText], "")
FillOptions
End Sub
Private Sub FillOptions()
' Заполнение команд для страницы
' кнопочной формы.
' Число кнопок в форме.
Const conNumButtons = 8
Dim dbs As Database
Dim rst As Recordset
Dim strSQL As String
Dim intOption As Integer
' Установка фокуса на первую кнопку формы,
' скрытие всех кнопок формы, кроме первой.
' Поле с фокусом скрыть нельзя.
Me![Option1].SetFocus
For intOption = 2 To conNumButtons
Me("Option" & intOption).Visible = False
Me("OptionLabel" & intOption).Visible = False
Next intOption
' Открытие таблицы элементов кнопочной формы,
' поиск первого элемента текущей страницы формы.
Set dbs = CurrentDb()
strSQL = "SELECT * FROM [Элементы кнопочной формы]"
strSQL = strSQL & " WHERE [ItemNumber] > 0 AND [SwitchboardID]=" & Me![SwitchboardID]
strSQL = strSQL & " ORDER BY [ItemNumber];"
Set rst = dbs.OpenRecordset(strSQL)
' Вывод сообщения при отсутствии элементов
' на странице кнопочной формы. В остальных
' случаях - заполнение страницы элементами.
If (rst.EOF) Then
Me![OptionLabel1].Caption = "Элементы кнопочной формы отсутствуют"
Else
While (Not (rst.EOF))
Me("Option" & rst![ItemNumber]).Visible = True
Me("OptionLabel" & rst![ItemNumber]).Visible = True
Me("OptionLabel" & rst![ItemNumber]).Caption = rst![ItemText]
rst.MoveNext
Wend
End If
' Закрытие набора записей и базы данных.
rst.Close
dbs.Close
End Sub
Private Function HandleButtonClick(intBtn As Integer)
' Эта функция вызывается при нажатии кнопки.
' Аргумент intBtn указывает, какая кнопка была нажата.
' Константы для выполняемых команд.
Const conCmdGotoSwitchboard = 1
Const conCmdOpenFormAdd = 2
Const conCmdOpenFormBrowse = 3
Const conCmdOpenReport = 4
Const conCmdCustomizeSwitchboard = 5
Const conCmdExitApplication = 6
Const conCmdRunMacro = 7
Const conCmdRunCode = 8
' Особая ошибка.
Const conErrDoCmdCancelled = 2501
Dim dbs As Database
Dim rst As Recordset
On Error GoTo HandleButtonClick_Err
' Поиск записи, соответствующей нажатой кнопке,
' в таблице элементов кнопочной формы.
Set dbs = CurrentDb()
Set rst = dbs.OpenRecordset("Элементы кнопочной формы", dbOpenDynaset)
rst.FindFirst "[SwitchboardID]=" & Me![SwitchboardID] & " AND [ItemNumber]=" & intBtn
' Если нужная запись не найдена, вывод
' сообщения об ошибке и выход из функции.
If (rst.NoMatch) Then
MsgBox "Ошибка при чтении таблицы элементов кнопочной формы."
rst.Close
dbs.Close
Exit Function
End If
Select Case rst![Command]
' Переход к другой кнопочной форме.
Case conCmdGotoSwitchboard
Me.Filter = "[ItemNumber] = 0 AND [SwitchboardID]=" & rst![Argument]
' Открытие формы в режиме добавления записей.
Case conCmdOpenFormAdd
DoCmd.OpenForm rst![Argument], , , , acAdd
Открытие формы.
Case conCmdOpenFormBrowse
DoCmd.OpenForm rst![Argument]
' Открытие отчета.
Case conCmdOpenReport
DoCmd.OpenReport rst![Argument], acPreview
' Настройка кнопочной формы.
Case conCmdCustomizeSwitchboard
' Обработка ситуации, когда диспетчер
' кнопочных форм не установлен
' (например, при сокращенной установке).
On Error Resume Next
Application.Run "WZMAIN80.sbm_Entry"
If (Err <> 0) Then MsgBox "Команда недоступна."
On Error GoTo 0
' Обновление формы.
Me.Filter = "[ItemNumber] = 0 AND [Argument] = 'по умолчанию' "
Me.Caption = Nz(Me![ItemText], "")
FillOptions
' Выход из приложения.
Case conCmdExitApplication
CloseCurrentDatabase
' Запуск макроса.
Case conCmdRunMacro
DoCmd.RunMacro rst![Argument]
' Выполнение программы.
Case conCmdRunCode
Application.Run rst![Argument]
' Другие команды не поддерживаются.
Case Else
MsgBox "Неизвестная команда."
End Select
' Закрытие набора записей и базы данных.
rst.Close
dbs.Close
HandleButtonClick_Exit:
Exit Function
HandleButtonClick_Err:
' Если выполнение прервано пользователем,
' сообщение об ошибке не выводится. Вместо этого
' выполнение продолжается со следующей строки.
If (Err = conErrDoCmdCancelled) Then
Resume Next
Else
MsgBox "Ошибка при выполнении команды.", vbCritical
Resume HandleButtonClick_Exit
End If
End Function
Листинг программы для формы “Издание”
Option Compare Database
Dim FlCorr As Boolean
Option Explicit
'Открытие окна диалога Поиска.
Private Sub Find_Record_Click()
On Error GoTo Err_Find_Record_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Find_Record_Click:
Exit Sub
Err_Find_Record_Click:
MsgBox Err.Description
Resume Exit_Find_Record_Click
End Sub
Private Sub Form_Load()
'Загрузка формы
DoCmd.Maximize
FlCorr = True
продолжение приложения 2
End Sub
Private Sub Кнопка86_Click()
On Error GoTo Err_Кнопка86_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Аннотация"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Кнопка86_Click:
Exit Sub
Err_Кнопка86_Click:
MsgBox Err.Description
Resume Exit_Кнопка86_Click
End Sub
Private Sub Цена_Click()
On Error GoTo Err_Цена_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Цена"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Цена_Click:
Exit Sub
Err_Цена_Click:
MsgBox Err.Description
Resume Exit_Цена_Click
End Sub
'Просмотр библиографического описания по ГОСТ
Private Sub ГОСТ_Click()
On Error GoTo Err_ГОСТ_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Описание по ГОСТ"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_ГОСТ_Click:
Exit Sub
Err_ГОСТ_Click:
MsgBox Err.Description
Resume Exit_ГОСТ_Click
End Sub
'Вызов формы поиска по фильтру
Private Sub Фильтр_Click()
On Error GoTo Err_Фильтр_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Фильтр"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Фильтр_Click:
Exit Sub
Err_Фильтр_Click:
MsgBox Err.Description
Resume Exit_Фильтр_Click
End Sub
Private Sub Тематическая_справка_Click()
On Error GoTo Err_Тематическая_справка_Click
'Просмотр отчета для отобранных значений в форме "Издение"
Dim stDocName As String
Dim strFilter As String
stDocName = "Тематическая справка"
strFilter = Me.Filter
DoCmd.OpenReport stDocName, acPreview, , strFilter
Exit_Тематическая_справка_Click:
Exit Sub
Err_Тематическая_справка_Click:
MsgBox Err.Description
Resume Exit_Тематическая_справка_Click
End Sub
Private Sub Кнопка187_Click()
On Error GoTo Err_Кнопка187_Click
'Печать каталожной карточки
Dim strFilter As String
Dim stDocName As String
stDocName = "Каталожная карточка"
strFilter = Me.Filter
DoCmd.OpenReport stDocName, acViewNormal, strFilter
Exit_Кнопка187_Click:
Exit Sub
Err_Кнопка187_Click:
MsgBox Err.Description
Resume Exit_Кнопка187_Click
End Sub
Листинг программы для формы “Библиографическое описание издание”
Option Compare Database
Dim FlCorr As Boolean
Option Explicit
Private Sub Find_Record_Click()
'Открыть форму диалога Поиска.
On Error GoTo Err_Find_Record_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Find_Record_Click:
Exit Sub
Err_Find_Record_Click:
MsgBox Err.Description
Resume Exit_Find_Record_Click
End Sub
Private Sub Form_Load()
FlCorr = True
DoCmd.Maximize
End Sub
Private Sub Form_Error(DataErr As Integer, Response As Integer)
'Перехват дубликата значения
Dim strMsg As String
Const conDupKey = 3022
If DataErr = conDupKey Then
strMsg = "Вы ввели дубликат идентификатора книги"
strMsg = strMsg & "Пожалуйста введите новое значение"
MsgBox strMsg
[Идентификатор издания].SetFocus
Response = acDataErrContinue
End If
End Sub
Private Sub Form_AfterUpdate()
' Обновляет поле со списком "Языковой материал" после изменения записи.
Me!ТипИздания.Requery
End Sub
Private Sub INVNum_Click()
On Error GoTo Err_INVNum_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Добавление инвентарных записей"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_INVNum_Click:
Exit Sub
Err_INVNum_Click:
MsgBox Err.Description
Resume Exit_INVNum_Click
End Sub
Private Sub ТипИздания_NotInList(NewData As String, Response As Integer)
'Добавление пользователем нового элемента в список
Dim ctl As Control
'Определяет поле со списком в качестве объекта элемента управления
Set ctl = Me!ТипИздания
'Подтверждение на ввод нового значения
If MsgBox("Собираетесь добавить новое значение в список?", vbOKCancel) _
Then
'Установить аргумент Response для отображения добавляемого значения
Response = acDataErrAdded
'Добавляет строку в список значений в источник строки
Debug.Print ctl.RowSource
ctl.RowSource = ctl.RowSource & ";" & NewData
Debug.Print ctl.RowSource
Else
'Если нажата кнопка отмена - выдается сообщение об ошибке
Response = acDataErrContinue
ctl.Undo
End If
End Sub
'Private Sub Form_AfterUpdate()
' Обновляет поле со списком "Языковой материал" после изменения записи.
' Me!ТипИздания.Requery
'End Sub
Private Sub Кнопка84_Click()
On Error GoTo Err_Кнопка84_Click
DoCmd.GoToRecord , , acNewRec
FlCorr = False
Exit_Кнопка84_Click:
Exit Sub
Err_Кнопка84_Click:
MsgBox Err.Description
Resume Exit_Кнопка84_Click
End Sub
Private Sub Кнопка86_Click()
On Error GoTo Err_Кнопка86_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Аннотация"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Кнопка86_Click:
Exit Sub
Err_Кнопка86_Click:
MsgBox Err.Description
Resume Exit_Кнопка86_Click
End Sub
Private Sub Цена_Click()
продолжение приложения 2
On Error GoTo Err_Цена_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Цена"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Цена_Click:
Exit Sub
Err_Цена_Click:
MsgBox Err.Description
Resume Exit_Цена_Click
End Sub
Private Sub ГОСТ_Click()
On Error GoTo Err_ГОСТ_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Описание по ГОСТ"
stLinkCriteria = "[Идентификатор издания]=" & Me![Идентификатор издания]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_ГОСТ_Click:
Exit Sub
Err_ГОСТ_Click:
MsgBox Err.Description
Resume Exit_ГОСТ_Click
End Sub
продолжение приложения 2
Private Sub Удаление_Click()
On Error GoTo Err_Удаление_Click
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Удаление_Click:
Exit Sub
Err_Удаление_Click:
MsgBox Err.Description
Resume Exit_Удаление_Click
End Sub
Листинг программы формы “Просмотр книг”
Option Compare Database
Option Explicit
Private Sub cmdSome_Click()
Dim strWhere As String, varItem As Variant
Dim gstrWhereBook As String
If Me!lstBName.ItemsSelected.Count = 0 Then
'ExitSub
End If
For Each varItem In Me!lstBName.ItemsSelected
strWhere = strWhere & _
Me!lstBName.Column(0, varItem) & ","
Next varItem
' Удаление лишней запятой в строке IN
strWhere = Left$(strWhere, Len(strWhere) - 1)
' Открытие формы для просмотра всех данных о книге с отбором
продолжение приложения 2
'выделенных книг
gstrWhereBook = "[Идентификатор издания] IN (" & _
strWhere & ")"
DoCmd.OpenForm "Издание", WhereCondition:=gstrWhereBook
End Sub
Private Sub Form_Load()
DoCmd.Maximize
End Sub
Private Sub lstBName_DblClick(Cancel As Integer)
Dim strWhere As String, varItem As Variant
Dim gstrWhereBook As String
If Me!lstBName.ItemsSelected.Count = 0 Then
'ExitSub
End If
For Each varItem In Me!lstBName.ItemsSelected
strWhere = strWhere & _
Me!lstBName.Column(0, varItem) & ","
Next varItem
' Удаление лишней запятой в строке IN
strWhere = Left$(strWhere, Len(strWhere) - 1)
' Открытие формы для просмотра всех данных о книге с отбором
'выделенных книг
gstrWhereBook = "[Идентификатор издания] IN (" & _
strWhere & ")"
DoCmd.OpenForm "Издание", WhereCondition:=gstrWhereBook
End Sub
Листинг программы для формы “Краткие сведения о книгах”
Option Compare Database
Option Explicit
‘Реакция на нажатие кнопки “Подробнее”
Private Sub Detalis_Click()
Dim gstrWhereBook As String
' Открывает форму для книги, выбранной в списке
gstrWhereBook = "[Идентификатор издания] = " & _
Me![Идентификатор издания]
DoCmd.OpenForm FormName:="Описание по ГОСТ", _
WhereCondition:=gstrWhereBook
DoCmd.Close acForm, Me.Name
Forms![Описание по ГОСТ].SetFocus
End Sub
Листинг формы “Сведения в архив”
(форма вызывается для отправки в архив сведений о списанной литературе, вызывается двойным щелчком мыши на любой записи формы “Библиографическое описание”)
Option Compare Database
Option Explicit
Private Sub Post()
'Предлагает архивировать выбранные записи
Dim wsp As Workspace, dbsCurrent As Database
Dim rstPost As Recordset
Dim intCount As Integer, blnInTrans As Boolean
Dim varReturn As Variant, strMsg As String
Dim strSQLArchive As String, strSQLDelete As String
Dim dtmCutOff As Double, intChoice As Integer
Dim dat As Date, dtmCutPr As String
Dim A As String
On Error GoTo Err_Post
dat = Date
blnInTrans = False
Set wsp = DBEngine.Workspaces(0)
Set dbsCurrent = CurrentDb()
' Подпрограмма архивации
ArchiveTrans:
intChoice = MsgBox("Будете добавлять в архив новые записи?", _
vbYesNo + vbQuestion, "Архивация?")
If intChoice = 7 Then
GoTo Exit_Post
Else
'Отключение предупреждения Access
DoCmd.SetWarnings False
dtmCutOff = Me![Инвентарный номер]
If Not Me![Состояние] = "на руках" Then
strSQLArchive = "INSERT INTO [Списанная литература] ([Инвентарный номер], [Идентификатор издания], [Цена издания], [Дата списания], [Причина списания], [Название книги]) " & _
"VALUES (Forms![Сведения в архив]![Инвентарный номер], Forms![Сведения в архив]![Идентификатор издания], Forms![Сведения в архив]![Цена издания], Forms![Сведения в архив]![Дата списания], Forms![Сведения в архив]![Причина списания], Forms![Сведения в архив]![Название книги]);"
DoCmd.RunSQL (strSQLArchive)
strSQLDelete = "DELETE [Инвентарная книга].* FROM [Инвентарная книга] " & _
"WHERE ([Инвентарная книга]![Инвентарный номер])= " & dtmCutOff & ";"
DoCmd.RunSQL (strSQLDelete)
'Сброс предупреждения.
DoCmd.SetWarnings True
'выход из формы
DoCmd.Close
Else
MsgBox ("Книга находиться на руках и не подлежит архивации")
продолжение приложения 2
DoCmd.Close
End If
End If
Exit_Post:
Exit Sub
Err_Post:
MsgBox Err.Description
Resume Exit_Post
End Sub
Private Sub Архив_Click()
Post
End Sub
Листинг программы для формы “Фильтр”
Option Compare Database
Dim iD As Integer
Option Explicit
Private Sub Form_Load()
DoCmd.Maximize
Me!Связь2 = "AND"
Me!Связь3 = "AND"
Me!Связь4 = "AND"
Me!Связь5 = "AND"
Me!Связь6 = "AND"
Me!Связь7 = "AND"
Me!Связь8 = "AND"
Me!Связь9 = "AND"
Me!Связь10 = "AND"
End Sub
Private Sub Связь2_Click()
If Me!Связь3 = "AND" Then
Me!Связь3 = "OR"
Else: Me!Связь3 = "AND"
End If
End Sub
Private Sub Связь3_Click()
If Me!Связь3 = "AND" Then
Me!Связь3 = "OR"
Else: Me!Связь3 = "AND"
End If
End Sub
Private Sub Связь4_Click()
If Me!Связь4 = "AND" Then
Me!Связь4 = "OR"
Else: Me!Связь4 = "AND"
End If
End Sub
Private Sub Связь5_Click()
If Me!Связь5 = "AND" Then
Me!Связь5 = "OR"
Else: Me!Связь5 = "AND"
End If
End Sub
Private Sub Связь6_Click()
If Me!Связь6 = "AND" Then
Me!Связь6 = "OR"
Else: Me!Связь6 = "AND"
End If
End Sub
Private Sub Связь7_Click()
If Me!Связь7 = "AND" Then
Me!Связь7 = "OR"
Else: Me!Связь7 = "AND"
End If
End Sub
Private Sub Связь8_Click()
If Me!Связь8 = "AND" Then
продолжение приложения 2
Me!Связь8 = "OR"
Else: Me!Связь8 = "AND"
End If
End Sub
Private Sub Связь9_Click()
If Me!Связь9 = "AND" Then
Me!Связь9 = "OR"
Else: Me!Связь9 = "AND"
End If
End Sub
Private Sub Связь10_Click()
If Me!Связь10 = "AND" Then
Me!Связь10 = "OR"
Else: Me!Связь10 = "AND"
End If
End Sub
Private Sub Поиск_Click()
Dim db As Database, rst As Recordset
Dim lngCount As Long, intRtn As Integer
Dim S As String, gstrWhereBook As String
'Очистка главной строки фильтра
gstrWhereBook = ""
DoCmd.Hourglass False
gstrWhereBook = ""
'Проверка поля ББК и создание условия
If Not IsNull(Me!ББК) Then
gstrWhereBook = "[ББК] Like " & Chr$(34) & Me!ББК
gstrWhereBook = gstrWhereBook & Chr$(34)
End If
'Проверка поля Название и создание условия
If Not IsNull(Me!Название) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Название книги] LIKE " & Chr$(34) & Me!Название
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь3] & " [Название книги] LIKE " & Chr$(34) & Me!Название
End If
If Right$(Me!Название, 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Автор и создание условия
If Not IsNull(Me!Автор) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Автор] LIKE " & Chr$(34) & Me!Автор
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь4] & " [Автор] LIKE " & Chr$(34) & Me!Автор
End If
If Right$(Me!Автор, 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Другие авторы и создание условия
If Not IsNull(Me![Другие авторы]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Другие авторы] LIKE " & Chr$(34) & Me![Другие авторы]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь5] & " [Другие авторы] LIKE " & _
Chr$(34) & Me![Другие авторы]
End If
If Right$(Me![Другие авторы], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Ответственность и создание условия
If Not IsNull(Me![Ответственность]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Ответственность] LIKE " & Chr$(34) & Me![Ответственность]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь6] & " [Ответственность] LIKE " & _
Chr$(34) & Me![Ответственность]
End If
If Right$(Me![Ответственность], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
Построение строки IN для кода типа книги
If Not IsNull(Me![Материал]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [ТипИздания] LIKE " & Chr$(34) & Me![Материал]
Else: gstrWhereBook = gstrWhereBook & " " & " AND [ТипИздания] LIKE " & _
Chr$(34) & Me![Материал]
End If
If Right$(Me![Материал], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Номер тома и создание условия
If Not IsNull(Me![Номер тома]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Номер тома/книги] LIKE " & Chr$(34) & Me![Номер тома]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь7] & " [Номер тома/книги] LIKE " & _
Chr$(34) & Me![Номер тома]
End If
If Right$(Me![Номер тома], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Название тома и создание условия
If Not IsNull(Me![Название тома]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Название тома/книги] LIKE " & Chr$(34) & Me![Название тома]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь8] & " [Название тома/книги] LIKE " & _
Chr$(34) & Me![Название тома]
End If
If Right$(Me![Название тома], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
If gstrWhereBook = "" Then
MsgBox "Условий не задано.", vbExclamation, "Фильтр"
'ExitSub
End If
'Проверка поля Ответственность за том и создание условия
If Not IsNull(Me![Ответственность за том]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Ответственность за том] LIKE " & Chr$(34) & Me![Ответственность за том]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь9] & " [Ответственность за том] LIKE " & _
Chr$(34) & Me![Ответственность за том]
End If
If Right$(Me![Ответственность за том], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
If gstrWhereBook = "" Then
MsgBox "Условий не задано.", vbExclamation, "Фильтр"
End If
'Проверка поля "Серия" и создание условия
If Not IsNull(Me![Название серии]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Название серии] LIKE " & Chr$(34) & Me![Название серии]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь10] & " [Название серии] LIKE " & _
Chr$(34) & Me![Название серии]
End If
If Right$(Me![Название серии], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Поиск на основе построенного запроса
Me.Visible = False
DoCmd.Hourglass True
If IsLoaded("Издание") Then
продолжение приложения 2
Forms![Издание].SetFocus
DoCmd.ApplyFilter , gstrWhereBook
If Forms![Издание].RecordsetClone.RecordCount = 0 Then
DoCmd.Hourglass False
MsgBox "Нет книг, удовлетворяющих вашим условиям", vbExclamation, "Фильтр"
DoCmd.ShowAllRecords
'Forms![Форма ввода библиографического описания издания].Visiable = False
Me.Visible = True
Exit Sub
End If
DoCmd.Hourglass False
Else
Set db = CurrentDb
Set rst = db.OpenRecordset( _
"SELECT DISTINCTROW " & _
"ШИФРЫ.[Идентификатор издания] " & _
"FROM [Издание] " & _
"WHERE " & gstrWhereBook & ";")
If rst.RecordCount = 0 Then
DoCmd.Hourglass False
MsgBox "Нет книг, удовлетворяющих вашим условиям", vbExclamation, "Фильтр"
gstrWhereBook = ""
Me.Visible = True
rst.Close
Exit Sub
End If
'Переход к последней строке для получения числа записей
rst.MoveLast
lngCount = rst.RecordCount
DoCmd.Hourglass False
Если найдено более 10 записей - запрос на просмотр только кратких сведений о книгах
If lngCount > 10 Then
intRtn = MsgBox("Найдено более 10 книг. " & _
"Нажмите Да для просмотра кратких сведений о " & lngCount & _
"найденных книгах," & _
" или Нет - для просмотра полных сведений об этих книгах." & _
" Нажав Отмена Вы предпримете новую попытку поиска", _
vbInformation + vbYesNoCancel, "Фильтр")
Select Case intRtn
Case vbCancel
Me.Visible = True
Exit Sub
Case vbYes
DoCmd.OpenForm _
FormName:="Краткие сведения о книгах", _
WhereCondition:=gstrWhereBook
DoCmd.Close acForm, Me.Name
Forms![Краткие сведения о книгах].SetFocus
Exit Sub
End Select
End If
'Если нажата кнопка Нет или найдено менее 10 книг,
' Отображаем полные данные
DoCmd.OpenForm _
FormName:="Издание", _
WhereCondition:=gstrWhereBook
'If Not IsNull(Автор) Then
' Forms![Издание]![Вкладка100] = 1
' End If
продолжение приложения 2
End If
' Закрываем форму
DoCmd.Close acForm, Me.Name
End Sub
Листинг программы формы “Читательский формуляр”
Option Compare Database
Option Explicit
Private Sub Кнопка6_Click()
On Error GoTo Err_Кнопка6_Click
'Просмотр сведений о читателях
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Сведения о читателях"
stLinkCriteria = "[Номер читательского формуляра]=" & Me![Номер читательского формуляра]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Кнопка6_Click:
Exit Sub
Err_Кнопка6_Click:
MsgBox Err.Description
Resume Exit_Кнопка6_Click
End Sub
Private Sub Поиск_Click()
On Error GoTo Err_Поиск_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
продолжение приложения 2
Exit_Поиск_Click:
Exit Sub
Err_Поиск_Click:
MsgBox Err.Description
Resume Exit_Поиск_Click
End Sub
Private Sub Формуляр_DblClick(Cancel As Integer)
'Фильтр по введенному номеру читательского формуляра
Dim strFilter As String
strFilter = Me![Формуляр]
Me.Filter = "[Номер читательского формуляра]= " & strFilter
Me.FilterOn = True
End Sub
Private Sub Добавление_Click()
On Error GoTo Err_Добавление_Click
Dim frm As Form
'Открытие формы как скрытой
DoCmd.OpenForm "Ввод записи в формуляр читателя", acNormal, , , , acHidden
'Присвоение переменной ссылки на форму
Set frm = Forms![Ввод записи в формуляр читателя]
'Копирование данных в форму
frm![Номер читательского формуляра] = Me![Номер читательского формуляра]
frm![Инвентарный номер книги].SetFocus
'вывод скрытой формы
frm.Visible = True
Exit_Добавление_Click:
Exit Sub
Err_Добавление_Click:
MsgBox Err.Description
Resume Exit_Добавление_Click
End Sub
Листинг программы формы “Список литературы”
Option Compare Database
Option Explicit
Private Sub Номер_формуляра_AfterUpdate()
Dim Cancel As Integer
Dim strFilter As String
strFilter = Me![Номер формуляра]
Me.Filter = "[Номер читательского формуляра]>= " & strFilter
Me.FilterOn = True
End Sub
Private Sub Формуляр_Click()
On Error GoTo Err_Формуляр_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Сведения о читателях"
stLinkCriteria = "[Номер читательского формуляра]=" & Me![Номер читательского формуляра]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Формуляр_Click:
продолжение приложения 2
Exit Sub
Err_Формуляр_Click:
MsgBox Err.Description
Resume Exit_Формуляр_Click
End Sub
Private Sub Добавление_Click()
On Error GoTo Err_Добавление_Click
Dim stDocName As String
stDocName = "Сведения о читателях"
'Открываем форму "Сведения о читателях" для добавления новой записи
DoCmd.OpenForm stDocName
DoCmd.GoToRecord , , acNewRec
Exit_Добавление_Click:
Exit Sub
Err_Добавление_Click:
MsgBox Err.Description
Resume Exit_Добавление_Click
End Sub
Private Sub Кнопка15_Click()
On Error GoTo Err_Кнопка15_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Кнопка15_Click:
Exit Sub
Err_Кнопка15_Click:
MsgBox Err.Description
Resume Exit_Кнопка15_Click
End Sub
Private Sub Поиск_Click()
On Error GoTo Err_Поиск_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Поиск_Click:
Exit Sub
Err_Поиск_Click:
MsgBox Err.Description
Resume Exit_Поиск_Click
End Sub
Private Sub Formular_Click()
On Error GoTo Err_Formular_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Читательский формуляр"
stLinkCriteria = "[Номер читательского формуляра]=" & Me![Номер читательского формуляра]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Formular_Click:
Exit Sub
Err_Formular_Click:
MsgBox Err.Description
Resume Exit_Formular_Click
End Sub
Список литературы
1. “С компьютером на ты”: Методическое пособие для библиотек по информационным технологиям и Интернет. Вып. 3./ Ред.-сост. Л.А. Казаченкова. – М.: Либерея, 2000. –112 с.
2. Цветкова И.Б. Лингвистическое обеспечение библиотечных информационных ресурсов// Доклад, Всероссийское совещание директоров федеральных и региональных библиотек России. М., 1999.
3. Российский коммуникативный формат представления библиографических записей в машиночитаемой форме(Рос. вариант UNIMARC)/ И. Б. Цветкова и др.; М-во культуры PФ, Рос. библ. ассоц. – СПб.: Изд-во РНБ, 1998.
4. Вейскас Д. Эффективная работа с Microsoft Access 97. – СПб.: Издательство “Питер”, 2000. – 976 с.: ил.
5. Учебно-методическое пособие по курсу “Учебно-методическое пособие по курсу технико-экономическое проектирование”. Сост. Ю.В. Брусницын, А.Н. Гармаш. – Таганрог, ТРТУ, 1998 г. - 35 с.
6. Охрана труда в вычислительных центрах: Учебное пособие для учащихся средних специальных учебных заведений по специальности “Программирование для быстродействующих математических машин”/ Ю. Г. Сибаров, Н.Н. Нагинаев. – М.: Машиностроение, 1985. – 176 с., ил.
7. Белах Н.В., Петраков Н.Я., Русаков В. П. Доходы, предложения и цены — проблема сбалансированности//Изв. АН СССР. Сер. экон. 1982. № 2. С. 71-77.
8. Охрана труда в радио- и электронной промышленности: Учебник для техникумов. – 2-е изд., перераб. и доп. / С.П. Павлов, Л.С. Виноградов, Н.Ф. Крылова и др.; Под ред. С.П. Павлова. – М.: Радио и связь, 1985. – 200 с., ил.
Me!Связь10 = "AND"
End Sub
Private Sub Связь2_Click()
If Me!Связь3 = "AND" Then
Me!Связь3 = "OR"
Else: Me!Связь3 = "AND"
End If
End Sub
Private Sub Связь3_Click()
If Me!Связь3 = "AND" Then
Me!Связь3 = "OR"
Else: Me!Связь3 = "AND"
End If
End Sub
Private Sub Связь4_Click()
If Me!Связь4 = "AND" Then
Me!Связь4 = "OR"
Else: Me!Связь4 = "AND"
End If
End Sub
Private Sub Связь5_Click()
If Me!Связь5 = "AND" Then
Me!Связь5 = "OR"
Else: Me!Связь5 = "AND"
End If
End Sub
Private Sub Связь6_Click()
If Me!Связь6 = "AND" Then
Me!Связь6 = "OR"
Else: Me!Связь6 = "AND"
End If
End Sub
Private Sub Связь7_Click()
If Me!Связь7 = "AND" Then
Me!Связь7 = "OR"
Else: Me!Связь7 = "AND"
End If
End Sub
Private Sub Связь8_Click()
If Me!Связь8 = "AND" Then
продолжение приложения 2
Me!Связь8 = "OR"
Else: Me!Связь8 = "AND"
End If
End Sub
Private Sub Связь9_Click()
If Me!Связь9 = "AND" Then
Me!Связь9 = "OR"
Else: Me!Связь9 = "AND"
End If
End Sub
Private Sub Связь10_Click()
If Me!Связь10 = "AND" Then
Me!Связь10 = "OR"
Else: Me!Связь10 = "AND"
End If
End Sub
Private Sub Поиск_Click()
Dim db As Database, rst As Recordset
Dim lngCount As Long, intRtn As Integer
Dim S As String, gstrWhereBook As String
'Очистка главной строки фильтра
gstrWhereBook = ""
DoCmd.Hourglass False
gstrWhereBook = ""
'Проверка поля ББК и создание условия
If Not IsNull(Me!ББК) Then
gstrWhereBook = "[ББК] Like " & Chr$(34) & Me!ББК
gstrWhereBook = gstrWhereBook & Chr$(34)
End If
'Проверка поля Название и создание условия
If Not IsNull(Me!Название) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Название книги] LIKE " & Chr$(34) & Me!Название
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь3] & " [Название книги] LIKE " & Chr$(34) & Me!Название
End If
If Right$(Me!Название, 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Автор и создание условия
If Not IsNull(Me!Автор) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Автор] LIKE " & Chr$(34) & Me!Автор
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь4] & " [Автор] LIKE " & Chr$(34) & Me!Автор
End If
If Right$(Me!Автор, 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Другие авторы и создание условия
If Not IsNull(Me![Другие авторы]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Другие авторы] LIKE " & Chr$(34) & Me![Другие авторы]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь5] & " [Другие авторы] LIKE " & _
Chr$(34) & Me![Другие авторы]
End If
If Right$(Me![Другие авторы], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Ответственность и создание условия
If Not IsNull(Me![Ответственность]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Ответственность] LIKE " & Chr$(34) & Me![Ответственность]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь6] & " [Ответственность] LIKE " & _
Chr$(34) & Me![Ответственность]
End If
If Right$(Me![Ответственность], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
Построение строки IN для кода типа книги
If Not IsNull(Me![Материал]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [ТипИздания] LIKE " & Chr$(34) & Me![Материал]
Else: gstrWhereBook = gstrWhereBook & " " & " AND [ТипИздания] LIKE " & _
Chr$(34) & Me![Материал]
End If
If Right$(Me![Материал], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Номер тома и создание условия
If Not IsNull(Me![Номер тома]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Номер тома/книги] LIKE " & Chr$(34) & Me![Номер тома]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь7] & " [Номер тома/книги] LIKE " & _
Chr$(34) & Me![Номер тома]
End If
If Right$(Me![Номер тома], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Проверка поля Название тома и создание условия
If Not IsNull(Me![Название тома]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Название тома/книги] LIKE " & Chr$(34) & Me![Название тома]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь8] & " [Название тома/книги] LIKE " & _
Chr$(34) & Me![Название тома]
End If
If Right$(Me![Название тома], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
If gstrWhereBook = "" Then
MsgBox "Условий не задано.", vbExclamation, "Фильтр"
'ExitSub
End If
'Проверка поля Ответственность за том и создание условия
If Not IsNull(Me![Ответственность за том]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Ответственность за том] LIKE " & Chr$(34) & Me![Ответственность за том]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь9] & " [Ответственность за том] LIKE " & _
Chr$(34) & Me![Ответственность за том]
End If
If Right$(Me![Ответственность за том], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
If gstrWhereBook = "" Then
MsgBox "Условий не задано.", vbExclamation, "Фильтр"
End If
'Проверка поля "Серия" и создание условия
If Not IsNull(Me![Название серии]) Then
If gstrWhereBook = "" Then
gstrWhereBook = " [Название серии] LIKE " & Chr$(34) & Me![Название серии]
Else: gstrWhereBook = gstrWhereBook & " " & Me![Связь10] & " [Название серии] LIKE " & _
Chr$(34) & Me![Название серии]
End If
If Right$(Me![Название серии], 1) = "*" Then
gstrWhereBook = gstrWhereBook & Chr$(34)
Else: gstrWhereBook = gstrWhereBook & "*" & Chr$(34)
End If
End If
'Поиск на основе построенного запроса
Me.Visible = False
DoCmd.Hourglass True
If IsLoaded("Издание") Then
продолжение приложения 2
Forms![Издание].SetFocus
DoCmd.ApplyFilter , gstrWhereBook
If Forms![Издание].RecordsetClone.RecordCount = 0 Then
DoCmd.Hourglass False
MsgBox "Нет книг, удовлетворяющих вашим условиям", vbExclamation, "Фильтр"
DoCmd.ShowAllRecords
'Forms![Форма ввода библиографического описания издания].Visiable = False
Me.Visible = True
Exit Sub
End If
DoCmd.Hourglass False
Else
Set db = CurrentDb
Set rst = db.OpenRecordset( _
"SELECT DISTINCTROW " & _
"ШИФРЫ.[Идентификатор издания] " & _
"FROM [Издание] " & _
"WHERE " & gstrWhereBook & ";")
If rst.RecordCount = 0 Then
DoCmd.Hourglass False
MsgBox "Нет книг, удовлетворяющих вашим условиям", vbExclamation, "Фильтр"
gstrWhereBook = ""
Me.Visible = True
rst.Close
Exit Sub
End If
'Переход к последней строке для получения числа записей
rst.MoveLast
lngCount = rst.RecordCount
DoCmd.Hourglass False
Если найдено более 10 записей - запрос на просмотр только кратких сведений о книгах
If lngCount > 10 Then
intRtn = MsgBox("Найдено более 10 книг. " & _
"Нажмите Да для просмотра кратких сведений о " & lngCount & _
"найденных книгах," & _
" или Нет - для просмотра полных сведений об этих книгах." & _
" Нажав Отмена Вы предпримете новую попытку поиска", _
vbInformation + vbYesNoCancel, "Фильтр")
Select Case intRtn
Case vbCancel
Me.Visible = True
Exit Sub
Case vbYes
DoCmd.OpenForm _
FormName:="Краткие сведения о книгах", _
WhereCondition:=gstrWhereBook
DoCmd.Close acForm, Me.Name
Forms![Краткие сведения о книгах].SetFocus
Exit Sub
End Select
End If
'Если нажата кнопка Нет или найдено менее 10 книг,
' Отображаем полные данные
DoCmd.OpenForm _
FormName:="Издание", _
WhereCondition:=gstrWhereBook
'If Not IsNull(Автор) Then
' Forms![Издание]![Вкладка100] = 1
' End If
продолжение приложения 2
End If
' Закрываем форму
DoCmd.Close acForm, Me.Name
End Sub
Листинг программы формы “Читательский формуляр”
Option Compare Database
Option Explicit
Private Sub Кнопка6_Click()
On Error GoTo Err_Кнопка6_Click
'Просмотр сведений о читателях
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Сведения о читателях"
stLinkCriteria = "[Номер читательского формуляра]=" & Me![Номер читательского формуляра]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Кнопка6_Click:
Exit Sub
Err_Кнопка6_Click:
MsgBox Err.Description
Resume Exit_Кнопка6_Click
End Sub
Private Sub Поиск_Click()
On Error GoTo Err_Поиск_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
продолжение приложения 2
Exit_Поиск_Click:
Exit Sub
Err_Поиск_Click:
MsgBox Err.Description
Resume Exit_Поиск_Click
End Sub
Private Sub Формуляр_DblClick(Cancel As Integer)
'Фильтр по введенному номеру читательского формуляра
Dim strFilter As String
strFilter = Me![Формуляр]
Me.Filter = "[Номер читательского формуляра]= " & strFilter
Me.FilterOn = True
End Sub
Private Sub Добавление_Click()
On Error GoTo Err_Добавление_Click
Dim frm As Form
'Открытие формы как скрытой
DoCmd.OpenForm "Ввод записи в формуляр читателя", acNormal, , , , acHidden
'Присвоение переменной ссылки на форму
Set frm = Forms![Ввод записи в формуляр читателя]
'Копирование данных в форму
frm![Номер читательского формуляра] = Me![Номер читательского формуляра]
frm![Инвентарный номер книги].SetFocus
'вывод скрытой формы
frm.Visible = True
Exit_Добавление_Click:
Exit Sub
Err_Добавление_Click:
MsgBox Err.Description
Resume Exit_Добавление_Click
End Sub
Листинг программы формы “Список литературы”
Option Compare Database
Option Explicit
Private Sub Номер_формуляра_AfterUpdate()
Dim Cancel As Integer
Dim strFilter As String
strFilter = Me![Номер формуляра]
Me.Filter = "[Номер читательского формуляра]>= " & strFilter
Me.FilterOn = True
End Sub
Private Sub Формуляр_Click()
On Error GoTo Err_Формуляр_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Сведения о читателях"
stLinkCriteria = "[Номер читательского формуляра]=" & Me![Номер читательского формуляра]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Формуляр_Click:
продолжение приложения 2
Exit Sub
Err_Формуляр_Click:
MsgBox Err.Description
Resume Exit_Формуляр_Click
End Sub
Private Sub Добавление_Click()
On Error GoTo Err_Добавление_Click
Dim stDocName As String
stDocName = "Сведения о читателях"
'Открываем форму "Сведения о читателях" для добавления новой записи
DoCmd.OpenForm stDocName
DoCmd.GoToRecord , , acNewRec
Exit_Добавление_Click:
Exit Sub
Err_Добавление_Click:
MsgBox Err.Description
Resume Exit_Добавление_Click
End Sub
Private Sub Кнопка15_Click()
On Error GoTo Err_Кнопка15_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Кнопка15_Click:
Exit Sub
Err_Кнопка15_Click:
MsgBox Err.Description
Resume Exit_Кнопка15_Click
End Sub
Private Sub Поиск_Click()
On Error GoTo Err_Поиск_Click
Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70
Exit_Поиск_Click:
Exit Sub
Err_Поиск_Click:
MsgBox Err.Description
Resume Exit_Поиск_Click
End Sub
Private Sub Formular_Click()
On Error GoTo Err_Formular_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Читательский формуляр"
stLinkCriteria = "[Номер читательского формуляра]=" & Me![Номер читательского формуляра]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Formular_Click:
Exit Sub
Err_Formular_Click:
MsgBox Err.Description
Resume Exit_Formular_Click
End Sub
Список литературы
1. “С компьютером на ты”: Методическое пособие для библиотек по информационным технологиям и Интернет. Вып. 3./ Ред.-сост. Л.А. Казаченкова. – М.: Либерея, 2000. –112 с.
2. Цветкова И.Б. Лингвистическое обеспечение библиотечных информационных ресурсов// Доклад, Всероссийское совещание директоров федеральных и региональных библиотек России. М., 1999.
3. Российский коммуникативный формат представления библиографических записей в машиночитаемой форме(Рос. вариант UNIMARC)/ И. Б. Цветкова и др.; М-во культуры PФ, Рос. библ. ассоц. – СПб.: Изд-во РНБ, 1998.
4. Вейскас Д. Эффективная работа с Microsoft Access 97. – СПб.: Издательство “Питер”, 2000. – 976 с.: ил.
5. Учебно-методическое пособие по курсу “Учебно-методическое пособие по курсу технико-экономическое проектирование”. Сост. Ю.В. Брусницын, А.Н. Гармаш. – Таганрог, ТРТУ, 1998 г. - 35 с.
6. Охрана труда в вычислительных центрах: Учебное пособие для учащихся средних специальных учебных заведений по специальности “Программирование для быстродействующих математических машин”/ Ю. Г. Сибаров, Н.Н. Нагинаев. – М.: Машиностроение, 1985. – 176 с., ил.
7. Белах Н.В., Петраков Н.Я., Русаков В. П. Доходы, предложения и цены — проблема сбалансированности//Изв. АН СССР. Сер. экон. 1982. № 2. С. 71-77.
8. Охрана труда в радио- и электронной промышленности: Учебник для техникумов. – 2-е изд., перераб. и доп. / С.П. Павлов, Л.С. Виноградов, Н.Ф. Крылова и др.; Под ред. С.П. Павлова. – М.: Радио и связь, 1985. – 200 с., ил.