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

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

Рубрика Программирование, компьютеры и кибернетика
Вид дипломная работа
Язык русский
Дата добавления 21.10.2009
Размер файла 162,7 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

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

Суммарная экономия для разработанной системы может быть рассчитана по формуле (7.16)

(7.16)

где ЭС - суммарная экономия, руб.;

ЭЗП - экономия заработной платы, руб.;

ЭМР - экономия материалов, руб.

В табл. 7.4. приведены для сравнения продолжительности работ, решаемых вручную и на ЭВМ.

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

(7.17)

где T - экономия времени, час.;

С1ч/и - стоимость 1 часа работы исполнителя, руб.

Экономия трудоемкости работ рассчитывается по формуле (7.18).

(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

Время на решение задачи с применением ручного труда рассчитывается по формуле (7.18)

(7.18)

где t P - время на решение одной задачи ручным способом, руб.;

N - объем работ в течении года, руб.

Расчет трудоемкости решения задачи с применением ЭВМ рассчитывается по формуле (7.19).

(7.19)

где t P - время на решение одной задачи с применением ЭВМ, руб.;

N - объем работ в течении года, руб.

Ежегодно работники библиотеки проводят перерегистрацию читателей. Затраты времени на перерегистрацию 2500 читателей составляют:

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

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

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

На анализ всего фонда (53000 экземпляров книг) на устаревшие издания для изъятия библиотекарь должен затратить

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

(7.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.5 Расчет капитальных вложений и эксплуатационных расходов

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

(7.21)

где К - капитальные вложения в систему, руб.;

КК - капитальные вложения в ЭВМ, для которой предназначена данная программа, руб.;

Tпол - полезный годовой фонд времени работы этой ЭВМ, за вычетом простоев в ремонте, час/год;

ТМВ - машинное время, используемое потребителем для тех задач, которые он

решает с помощью системы, машино-час/год;

ZП - цена используемой системы, руб/потребителя программы.

Значение ТМЭ рассчитано в п. 7.4 и составляет 219 часов, цена разработанной системы ZП рассчитана в п. 7.3 и составляет 4319,69 руб. Капитальные вложения в ЭВМ, для котовой предназначена разработанная система составят 20000 руб. Полезный годовой фонд рабочего времени этой ЭВМ составляет за вычетом простоев в ремонте 18601 ч/год. Капитальные вложения потребителя составят:

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

Основная заработная плата обслуживающего персонала рассчитывается по формуле (7.22)

(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.11) из п. 7.3 и составляют:

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

Стоимость ремонта оборудования рассчитывается по формуле (7.8) и составляет:

Стоимость электроэнергии рассчитывается по формуле (7.3.6) и составляет:

Сумма амортизации в вычислительной техники, рассчитанная по формуле (7.7), составляет:

Амортизационные отчисления с программы рассчитываются по формуле (7.23)

(7.23)

гдеАП - амортизационные отчисления с программы, руб;

TC - срок службы данной программы, TC = 4 года.

Амортизационные отчисления с программы рассчитываются по формуле (7.23)

Эксплуатационные расходы составляют

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

7.6 Расчет показателей экономической эффективности и ожидаемого годового экономического эффекта от внедрения разработки

Рассчитаем экономическую эффективность использования программы. Расчет осуществляется по формуле (7.24).

(7.24)

где ЭФ - фактическая экономия, руб.

Экономия фактическая составит:

Срок окупаемости определяется по формуле (7.25).

(7.25)

гдеTок - срок окупаемости изделия, год.

Коэффициент экономической эффективности рассчитывается по формуле (7.26)

(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

Малоопасный

Общая оценка условий труда

Легкий, малоопасный

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

Для помещения, где будет установлено оборудование для АБИС АКВТ, необходимо предусмотреть выполнение всех требований к помещениям с вычислительной техникой.

Расчет освещенности в помещении библиотеки, где будет установлено оборудование на соответствие требованиям к освещенности помещения с ЭВМ

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

В помещении библиотеки установлены люминесцентные лампы с косинусоидальной КСС (Д) типа ПВЛМ. Светильники размещаются рядами (в 3 ряда по 4 светильника) параллельно стене с окнами, что позволяет производить их последовательное отключение (включение), в зависимости от величины естественной освещенности. Свес светильников составляет hC =0,2 м. Световая отделка потолков, стен, перегородок, полов выполнена в светлых тонах.

Выполним расчет на достаточность освещения помещения. Размеры рассматриваемого помещения составляют: (длина) А = 6 м., (ширина) В = 5,6 м., (высота) H=3 м.

1) Определяем относительное расстояние между светильниками по формуле (8.1).

LAB=HP,(8.1)

где LAB - относительное расстояние между светильниками, м.;

- для данного типа светильника =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,961,6 м.

Принимаем расстояние от стены до ряда А равным lA=1м, принимаем расстояние от стены до ряда В равным lB=1м.

Определяем число светильников в ряду по формуле (8.3).

(8.3)

где N - число светильников в ряду А.

Число светильников в ряду А:

Число светильников в ряду В:

Определяем общее количество ламп для помещения (n):

2) Расчет осветительной установки методом коэффициента использования светового потока.

По справочным данным коэффициент запаса, учитывающий запыление светильников и износ источников света в процессе эксплуатации, для помещений, оборудованных ЭВМ, составляет при условии чистки светильников не реже двух раз в год КЗ=1,41,5. Коэффициенты отражения светового потока от потолка, стен и рабочей поверхности соответственно равны: п=70%, с=50%, р=50%.

Определяем индекс помещения по формуле (8.4).

(8.4)

где i - индекс помещения.

Индекс помещения равен:

Для расчета коэффициента использования излучаемого светильником светового потока по справочным данным определяем значения коэффициента полезного действия помещения п=0,58 и коэффициента полезного действия светильника св=0,85.

Коэффициента использования излучаемого светильником светового потока рассчитывается по формуле (8.5).

=п*св,(8.5)

где - коэффициент использования излучаемого светильником светового потока;

п - коэффициент полезного действия помещения;

св - коэффициента полезного действия светильника.

Коэффициент использования светового потока равен:

=0,58*0,85=0,493

Определяем расчетный световой поток лампы по формуле (8.6)

(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.2.

Структура таблицы “Автор”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Автор

Текстовый

25

Автор издания

Таблица 1.3.

Структура таблицы “Другие авторы”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Другие авторы

Текстовый

50

Другие авторы

Таблица 1.4.

Структура таблиц “Коллективные авторы”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Название министерства/ведомства

Текстовый

50

3

Название организации/кафедры

Текстовый

50

4

Номер съезда/конференции/семинара

Текстовый

15

5

Дата проведения

Текстовый

15

6

Место проведения

Текстовый

15

7

Прочая информация

Текстовый

50

Таблица 1.5.

Структура таблицы “Название”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Название книги

Текстовый

100

3

Продолжение название

Текстовый

150

4

Ответственность

Текстовый

100

Таблица 1.6.

Структура таблицы “Аннотация”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Аннотация

Поле МЕМО

Таблица 1.7.

Структура таблицы “Выходные данные”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Идентификатор издательства

Числовой

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

0

3

Год издания

Числовой

Целое

Таблица 1.8.

Структура таблицы “Сведения об издании”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Сведения об издании

Текстовый

50

Таблица 1.9.

Структура таблицы “Серия”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Название серии

Текстовый

100

3

Номер выпуска

Текстовый

15

Таблица 1.10.

Структура таблицы “Том”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Номер тома/книги

Текстовый

15

3

Название тома/книги

Текстовый

100

4

Продолжение названия тома

Текстовый

100

5

Ответственность за том

Текстовый

100

Таблица 1.11.

Структура таблицы “Количественные характеристики”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издания

Числовой

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

0

2

Количественные характеристики

Текстовый

20

3

Сопроводительный материал

Текстовый

подстановка

15

cписок значений: "Чертежи";"CD";"Дискета";"Альбом"; “Приложение”

Таблица 1.12.

Структура таблицы “Издательства”

Имя поля

Тип

Размер

Дес

Назначение

1

Идентификатор издательства

Счетчик

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

0

Индексированное ключевое поле, совпадения не допускаются

2

Место издания

Текстовый

20

3

Издательство

Текстовый

50

4

Телефон

Текстовый

15

Шаблон ввода:

!\(999") "000\-0000;0;_

Таблица 1.13.

Структура таблицы “Инвентарная книга”

Имя поля

Тип

Размер

Дес

Назначение

1

Инвентарный номер

Числовой

С плавающей точкой (8 байт)

0

Индексированное ключевое поле, совпадения не допускаются

2

Цена издания

Денежный

Денежный

2

3

Идентификатор издания

Числовой

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

0

4

Состояние

Текстовый,

подстановка

10

Поле со списком:

"в фонде"; "на руках"

Таблица 1.14.

Структура таблицы “Справочник ББК”

Имя поля

Тип

Размер

Дес

Назначение

1

Код ББК

Текстовый

10

Индексированное ключевое поле, совпадения не допускаются

2

Описание ББК

Текстовый

100

Таблица 1.15.

Структура таблицы “Сведения о читателях”

Имя поля

Тип

Размер

Дес

Назначение

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.16.

Структура таблицы “Читательский формуляр”

Имя поля

Тип

Размер

Дес

Назначение

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


Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.