Вопрос 2. Классификация страхования.

Средствами VBA в программном режиме можно создавать не только объекты Access: таблицы, формы, запросы, но и такие элементы управления, как Кнопки, Надпись и др., что позволяет существенно повысить уровень автоматизации работы приложения. Ниже даны примеры создания некоторых объектов и элементов управления, приведены программы. По тексту программ даны необходимые пояснения.

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

- в процедуре создать объектные переменные db, tb типа Database, TableDef и f1, f2, f3, f4 типа Field, предназначенные для хранения ссылок на соответствующие объекты базы данных;

- для создания нового объекта TableDef – таблицы с именем Elise нужно применить метод CreateTableDef к объектной переменной db. Для создания новых объектов Field – полей таблицы, нужно применить метод CreateField к объектным переменным f1, f2, f3, f4;

- для добавления этих полей в семейство Fields, входящих в объект TableDef нужно использовать метод Append;

- для добавления таблицы – объекта TableDef в семейство TableDefs нужно использовать метод Append;

Процедура решения этой задачи с использованием библиотеки DAO приведена ниже

Public Sub Создание_таблицы()

‘ Описание переменных

Dim db As Database

Dim tb As TableDef

Dim f1, f2, f3, f4, f5 As field

Set db = CurrentDb

‘Создание таблицы и ее полей

Set tb = db.CreateTableDef("Elise")

Set f1 = tb.CreateField("Код", dbInteger)

Set f2 = tb.CreateField("Фамилия вкладчика", dbText)

Set f3 = tb.CreateField("Домашний адрес", dbText)

Set f4 = tb.CreateField("Сумма вклада", dbCurrency)

Set f5 = tb.CreateField("Срок заключения договора, мес", dbInteger)

‘Добавление полей в таблицу

tb.Fields.Append f1

tb.Fields.Append f2

tb.Fields.Append f3

tb.Fields.Append f4

tb.Fields.Append f5

‘Добавление таблицы в БД

db.TableDefs.Append tb

End Sub

Создание формы.При создании форм за единицу измерениявMicrosoft Accessберут Твип (twip).Один твип равен 1/1440 дюйма. В одном сантиметре содержится 567 твипов.

Пусть требуетсясредствами VBA создать форму на основе таблицы КАФЕДРА только без фото. Процедура решения этой задачи с использованием библиотеки DAO приведена ниже

Public Sub Создание_формы()

Dim frm As Form 'Определение объектной переменной для формы

Set frm = CreateForm 'Создание новой формы и ссылки на переменную

frm.RecordSource = "КАФЕДРА" 'Источник данных в форме

'Определение объектных переменных для элементов управления

Dim c1, c2, c3, c4, t1, t2, t3, t4, n1 As Control

frm.Caption = "КАФЕДРАVBA" ' Имя файла

'Создание элементов управления типа надпись

Set t1 = CreateControl(frm.Name, acLabel, , , , 100, 1000, 1300, 200)

t1.Caption = "Код кафедры:"

Set t2 = CreateControl(frm.Name, acLabel, , , , 100, 1300, 1300, 200)

t2.Caption = "Название:"

Set t3 = CreateControl(frm.Name, acLabel, , , , 100, 1600, 1300, 200)

t3.Caption = "Телефон:"

Set t4 = CreateControl(frm.Name, acLabel, , , , 100, 1900, 1300, 200)

t4.Caption = "Зав кафедрой:"

'Создание элементов управления типа поле

Set c1 = CreateControl(frm.Name, acTextBox, , , , 1500, 1000, 1300, 200)

c1.ControlSource = "Код кафедры"

Set c2 = CreateControl(frm.Name, acTextBox, , , , 1500, 1300, 1300, 200)

c2.ControlSource = "Название"

Set c3 = CreateControl(frm.Name, acTextBox, , , , 1500, 1600, 1300, 200)

c3.ControlSource = "Телефон"

Set c4 = CreateControl(frm.Name, acTextBox, , , , 1500, 1900, 1300, 200)

c4.ControlSource = "Зав кафедрой"

Set n1 = CreateControl(frm.Name, acLabel, , , , 1400, 300, 700, 200)

n1.Caption = "КАФЕДРА" 'Имя формы

DoCmd.Restore

End Sub

Результат работы программы представлен на рис.2.7.

Рис.2.7. Форма, созданная средствами VBA

Создание запроса.Требуетсясредствами VBA создать запрос МАКС по таблице ТОВАРЫ для выборки записей в которых Стоимость товара больше определенной нижней границы. Граница вводится в окно диалога. Процедура решения этой задачи с использованием библиотеки DAO приведена ниже

Public Sub Создание_запроса_VBA()

Dim db As Database

Dim q As QueryDef

Set db = CurrentDb

' Создается запрос с именем Макс

Set q = db.CreateQueryDef("Макс", "Select *" _

& "from Товары where [Стоимость товара] >” & _

“ [Введите нижнюю границу стоимости товара];")

End Sub

3. СПИСОК ЛИТЕРАТУРЫ

1. Джон Вейскас. Эффективная работа с Microsoft Access 7.0 для Windows .- С-Пб.:Питер, 1997.

2. М.Хэлворсян, М.Янг. Эффективная работа с Microsoft Office 97.- С-Пб.:Питер, 1997.

3. МакФедризг Пол и др. Microsoft Office 97. Энциклопедия пользователя: пер. с англ.-К.: Издательство "ДиаСофт", 1998.

4. К. Гетц, М. Джилберт. Программирование в Microsoft Office. Полное руководство по VBA: пер. с англ.-К.: Издательская группа BHV, 1999.

5. Киммел, Пол. Освой самостоятельно программирование для Microsoft Access 2000 за 24 часа.: пер. с англ.-М.:"Вильямс". 2000.

6. Король В.И. Visual Basic 6.0, Visual Basic for Application 6.0. Язык программирования. Справочник с примерами.-М.: КУДРИЦ-ОБРАЗ, 2000.

7. Каммингс С. VBA для “чайников”: Пер. с англ.: М.:”Вильямс”, 2000.

8. Кен Гетц, Майк Джилберт. Программирование в Microsoft Office: пер. с англ.-К:”Ирина”. BHV, 2000.

9. С.Браун. Visial Basic: учебный курс. – СПб.: Питер, 2001.

10. Ю. Бекаревич, Н. Пушкина. Microsoft Access 2002. –СПб.: БХВ-Петербург, 2003.

4. СОДЕРЖАНИЕ

1. ОСНОВЫ ТЕХНОЛОГИИ MICROSOFT ACCESS………………………………………2

1.1.Введение………………………………………………………………………………. 2

1.2. Что такое базы даннях?................................................................................................2

1.3. Архитектура Microsoft Access……………………………………………………….2

1.4. Создание базы даннях.Создание таблиц. Связывание таблиц.................................3

1.5. Изменение проекта базы даннях.................................................................................9

1.6. Сздание запросов.......................................................................................................11

1.7. Создание и редактирование форм............................................................................ 17

1.8. Создание и редактирование отчетов.........................................................................21

1.9. Создание и применение макросов.............................................................................25

2. РАЗРАБОТКА ПРИЛОЖЕНИЯ ПОЛЬЗОВАТЕЛЯ С ИСПОЛЬЗОВАНИЕМ VBA ...28

2.1. Введение.....................................................................................................................28

2.2. Модули Access……………………………………………………………………...28

2.3. Классы и семейства...................................................................................................29

2.4. Объектные модули Microsoft Office………………………………………………..29

2.5. Модели объектов Microsoft………………………………………………………...29

2.6. Модели объектов доступа к данням DAO и ADO………………………………..29

2.7. Ссылки на объекты.....................................................................................................30

2.8. Свойства и методы объектов……………………………………………………….30

2.9. Применение метода DoCmd в программах VBA ....................................................31

2.10.Работа с объектами доступа к данным.....................................................................33

2.11. Создание объектов баз данных средствами VBA ..................................................37

3. СПИСОК ЛИТЕРАТУРЫ..................................................................................................39

Приложение

ТАБЛИЦЫ БАЗЫ ДАННЫХ УЧЕБНЫЙ ПРОЦЕСС

Таблица 1. Данные таблицы СТУДЕНТ

Ключевыми полями таблицы СТУДЕНТ являются поля: Номер группы, Номер студента.

Таблица 2. Данные таблицы ГРУППА

Ключевыми полями таблицы ГРУППА является поле: Номер группы.

Таблица 3. Данные таблицы КАФЕДРА

Ключевыми полями таблицы КАФЕДРА является поле: Код кафедры.

Таблица 4. Данные таблицы ПРЕПОДАВАТЕЛЬ

Ключевыми полями таблицы ПРЕПОДАВАТЕЛЬ является поле: Таб номер.

Таблица 5. Данные таблицы ПРЕДМЕТ

Ключевыми полями таблицы ПРЕДМЕТ является поле: Код предмета.

Таблица 6. Данные таблицы ИЗУЧЕНИЕ

Ключевыми полями таблицы ИЗУЧЕНИЕ являются поля: Номер группы, Код предмета ,Таб номер, Вид занятия.

Таблица 7. Данные таблицы УСПЕВАЕМОСТЬ

Ключевыми полями таблицы УСПЕВАЕМОСТЬ являются поля: Номер группы, Номер студента, Код предмета, Таб номер, Вид занятий

Таблица 8. Данные таблицы ТОВАРЫ

Таблица 9. Данные таблицы ПОСТАВЩИКИ

Вопрос 2. Классификация страхования.

Многообразие объектов страхования, огромное количество рисков, от которых проводится страхование, различные формы организации страховых отношений приводит к необходимости их систематизации (классификация, которая представляет собой способ упорядочения элементов системы по какому-либо критерию). Отправной классификацией является деление страхования на отрасли. В основе этой классификации лежат различия в объектах страхования. В соответствие с законом «Об организации страхового дела в РФ» объектом страхования может быть любой не противоречащий законодательству имущественный интерес. Надо учитывать, что страхование не может вернуть утраченное здоровье в связи с несчастным случаем или украденную машину, а может только в той или иной степени компенсировать убытки или дополнительные расходы. Объектом страхования является не предмет (имущество, жизнь, здоровье), а связанный с ним имущественный интерес, т.е. стоимостная оценка предмета страхования. Таким образом имущественный интерес (и как стоимостная оценка, и как заинтересованность в компенсации возможных потерь) возникает у страхователя в связи с наличием каково-то предмета страхования. Причем некоторые предметы страхования имеют стоимостную оценку, а некоторые нет. С этой точке зрения в страховой практике выделяют две отрасли: личное и имущественное страхование. Но такая классификация является достаточно поверхностной. Более полной будет классификация, которая также учитывает качественные характеристики объектов страхования, способы страхования и сроки страховой защиты. В этой классификации будет 4 отрасли:

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

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

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

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

Отрасль «Личное страхование»

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

1. Страхование жизни.

2. Страхование иное, чем страхование жизни.

3. Смешанное страхование.

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

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

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

Виды внутри данных подгрупп:

1.Виды страхования жизни:

– Страхование детей до 18 лет.

– Страхование пенсии.

– Страхование на дожитие и т.д.

2. Виды личного страхования иного, чем страхование жизни:

– Страхование от несчастных случаев работников работодателем.

– Страхование пассажиров.

– Медицинское страхование и т.д.

3. При смешанном страхование виды страхования зависят от финансовых возможностей и желания страхователей.

Отрасль «Имущественное страхование»

1. По форме собственности выделяют подотрасли:

– Страхование государственного имущества.

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

– Страхование имущества ИП.

– Страхование арендованного имущества.

– Страхование имущества граждан.

2. По роду опасности выделяют подотрасли:

– Страхование различного имущества от огня и других стихийных бедствий.

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

– Страхование животных от падежа и вынужденного забоя.

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

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

Отрасль «Страхование ответственности»

1.Страхование общегражданской ответственности.

2. Страхование профессиональной ответственности.

В страховании гражданской ответственности выделяют следующие виды:

По виду страхуемой ответственности выделяют:

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

2. Страхование источников повышенной опасности.

3. Страхование за загрязнение окружающей среды.

4. Страхование заемщика за непогашенные кредиты.

5. Страхование владельцев недвижимости.

В страховании профессиональной ответственности выделяют следующие виды

1. Страхование ответственности перевозчиков пассажиров и грузов.

2. Страхование ответственности врачей, аудиторов, нотариусов и т.д.

3. Страхование ответственности производителей и продавцов за качество и безопасность их товара, работ и услуг.

Отрасль «Страхование финансовых рисков»

По характеру происхождения финансовых потерь выделяют следующие подотрасли:

1. Страхование прямых финансовых потерь.

2. Страхование финансовых рисков по долговым обязательствам.

Внутри первой подотрасли выделяют следующие виды:

– Страхование прибыли или дохода предприятия.

– Страхование от банкротства.

– Страхование финансовых рисков по реальным инвестициям и т.д.

Внутри второй подотрасли выделяют следующие виды:

– Страхование непогашения банковских кредитов.

– Страхование риска неплатежа контрагентами.

– Страхование биржевых операций и т.д.

Классификация страхования по методам расчета страховых тарифов

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

1. Риски маловероятные.

2. Риски неизбежные, но случайные по времени наступления.

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

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