1068

База данных Кадры

Курсовая

Информатика, кибернетика и программирование

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

Русский

2013-01-06

323 KB

589 чел.

Министерство образования и науки РФ

Федеральное агентство по образованию

Иркутский государственный технический университет

Кафедра информатики

 

КУРСОВАЯ РАБОТА

ПО ИНФОРМАТИКЕ

Выполнил: студент группы 

ЭЭб-11-2:  Борисов А. Н.

Проверила: доцент Соломина В. К.

Иркутск 2011


Содержание 

Введение 4

1.  База данных «Кадры» 4

1.1. Описание таблиц 4

1.2. Описание форм 6

1.3. Схема данных 6

1.4. Описание запросов 6

1.5. Описание отчетов 7

2. Задача на VBA 1

2.1. Блок схема алгоритма 1

2.2. Программа 2

2.3 Тесты (Результаты вычислений) 1

Заключение 1

Литература 3


Введение

1.  База данных «Кадры»

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

Основные таблицы: «Личные сведения», «Служебные сведения»

Вспомогательные таблицы: «Должности», «Отделы», «Специальности»

1.1. Описание таблиц

БД состоит из пяти таблиц: трех вспомогательных и двух основных.

Первая основная таблица «Личные сведения» состоит из полей: [Код сотр, Дата рожд,  Место рожд, Паспорт, Адрес, Адрес регистр, Семейн полож, Число детей]. Поле [Код сотр] является ключевым.

Описание полей приведено в следующей таблице:

Личные сведения

Код сотр

Дата рожд

Место рожд

Паспорт

Адрес

Адрес регистр

Семейн полож

Число детей

1

18.10.1968

г. Иркутск

2507 697643

г. Иркутск, ул. Ленина, д. 22, кв. 56

г. Иркутск ул. Ленина д. 22, кв. 56

Женат

2

2

30.06.1986

г. Улан-Удэ

2708 658908

г. Иркутск, ул. Степана Разина, д. 9, кв. 57

г. Ангарск ул. Чайковского, д. 10, кв. 7

Не женат

3

15.05.1978

с. Веренка

3698 864657

г. Иркутск, ул. Лермонтова, д. 100, кв. 36

Иркутская обл. Заларинский район, с. Веренка, ул. Трактовая, д. 5

Женат

4

4

18.09.1979

г.Зима

7569 989687

г. Иркутск, ул. Бажова, д. 25, кв. 78

г. Черемхово, ул. Вокзальная, д. 45, кв. 18

Замужем

1

5

23.09.1969

г. Иркутск

9890 876876

г. Иркутск, ул. Академическая, д. 22, кв. 56

г. Иркутск, ул. Академическая, д. 22, кв. 56

Замужем

3

6

23.10.1977

г. Шелехов

2455 454322

г. Шелехов, ул. Железнодорожная 5

г. Шелехов, ул. Железнодорожная 5

Женат

1

7

12.08.1986

г. Усолье-Сибирское

7886 476599

г. Иркутск, ул. Академическая д. 22, кв. 92

г. Иркутск, ул. Академическая д. 22, кв. 92

Не женат

8

24.03.1975

п. Залари

2345 653322

Мегет, ул. Нагорная, д. 41

Мегет, ул. Нагорная, д. 41

Женат

3

9

15.09.1981

г. Иркутск

4576 476743

г. Иркутск, ул. Маршала Конева, д. 40, кв. 43

г. Иркутск, ул. Маршала Конева, д. 40, кв. 43

Женат

Вторая основная таблица «Служебные сведения» состоит из полей: [Код сотр, Фамилия, Имя Отчество, Код отдела, Код должн, Образование, Код спец, Стаж, Телефоны]

Описание полей приведено в следующей таблице:

Служебные сведения

Код сотр

Фамилия

Имя Отчество

Код отдела

Код должн

Образование

Код спец

Стаж

Телефоны

1

Старков

Андрей Владимирович

1

1

Высшее

103

7 лет, 6 мес.

8 (395) 34-34-87

2

Иванов

Петр Михайлович

3

3

Средне специальное

104

18 лет, 3 мес.

8 (395) 67-98-02

3

Сидоров

Михаил Васильевич

2

2

Среднее

100

10 лет, 8 мес

8 (395) 28-95-46

4

Полякова

Анна Семеновна

1

5

Средне специальное

102

12 лет, 2 мес.

8 (395) 12-83-07

5

Воробьева

Ольга Андреевна

1

5

Средне специальное

102

23 года, 11 мес

8 (395) 45-87-20

6

Петров

Антон Сергеевич

2

2

Среднее

100

18 лет, 2 мес.

8 (395) 54-77-23

7

Абрамов

Сергей Абрамович

4

4

Среднее (неполное)

100

7 лет, 3 мес.

8 (395) 47-97-64

8

Егоров

Артем Валерьевич

4

4

Среднее (неполное)

100

4 года

8 (395) 26-05-59

9

Королев

Александр Александрович

5

6

Средне специальное

101

5лет, 5 мес.

8 (395) 58-85-38

Вспомогательная таблица «Должности» состоит из полей [Код должн, Должность]. Поле [Код должн] является ключевым.

Описание полей приведено в следующей таблице:

Должности

Код должн

Должность

1

Директор

2

Охранник

3

Шофер

4

Грузчик

5

Продавец

6

Электрик

Вспомогательная таблица «Отделы» состоит из следующих полей: [Код отд, Отдел, Начальник, Телефоны]. Поле Код отд является ключевым.

Отделы

Код отд

Отдел

Начальник

Телефоны

1

Продажа

Полякова Анна Семеновна

12-68-12

2

Охрана

Петров Антон Сергеевич

45-45-89

3

Транспортный

Иванов Петр Михайлович

89083457896

4

Грузчики

Сидоров Михаил Васильевич

5

Техническое обслуживание

Королев Александр Александрович

87-95-37

1.2. Описание форм

БД содержит 1 форму «Служебные сведения». Форма служит для просмотра и добавления записей в таблицу «Служебные сведения». Содержит поля [Код сотр, Фамилия, Имя Отчество, Код отдела, Код должн, Образование, Код спец, Стаж, Телефоны].

1.3. Схема данных

Рис.1.4. Описание запросов

База данных содержит 2 запроса с параметром – «Сведения об отделах» и «Фамилия сотрудника».

Запросы содержат поля таблиц «Служебные сведения», «Отделы», «Должности», «Специальности», «Личные сведения».

При открытии запроса «Сведения об отделах», программа запрашивает название отдела.

Структура запроса:

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

1.5. Отчеты

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

Отчет «Служебные сведения»  предоставляет необходимую информацию о запрошенном сотруднике.

Отчет «Сведения об отделах» предоставляет информацию о запрошенном отделе.

2. Задача на VBA

Составить программу для вычисления функций f, z, k, при

,


2.1. Блок схема алгоритма


2.2.
Программа

Private Sub CommandButton1_Click()

Dim x As Single

Dim y As Single

 x = TBx.Value

 y = TBy.Value

If y > 11 Or y < -3 Then

 MsgBox ("y - за границами диапазона")

 Exit Sub

End If

If x = 0 Then

 MsgBox ("x не равно нулю !")

 Exit Sub

 End If

 TBf.Value = 4 ^ (x - 2) * Sin(y)

 TBf.Text = Format(Val(TBf.Value), "0.000")

If x > 0 Then

 TBz.Value = Sqr(y / x - 3 / x ^ 2)

Else

 TBz.Value = (x + y) * 3 ^ (y - x)

End If

 TBz.Text = Format(Val(TBz.Value), "0.000")

If x < y Then

 TBk.Value = (4 * x - 2) / (y + 4)

ElseIf x > y Then

 TBk.Value = x - y

 Else

 TBk.Value = 3 * x - e ^ x + 1

End If

 TBk.Text = Format(Val(TBk.Value), "0.000")

End Sub


2.3 Тесты (Результаты вычислений)


Заключение

В данной курсовой работе была представлена база данных «Кадры», приведены необходимые поля базы данных, их структура и тип; объединение их в определенные объекты и построение связи между объектами базы данных.

База данных представлена в Microsoft Access 2010.

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

В действительности же база данных «Кадры» намного сложнее – в ней больше таблиц и в таблицах больше полей.

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

Задача решена в приложении Microsoft Excel 2010 с помощью редактора Visual Basic Application.

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


Литература

1. Дейт К. Дж. Введение в системы баз данных = IntroductiontoDatabaseSystems — 8-е изд. — М.: Вильямс, 2005.

2. Кузнецов С. Д. Основы баз данных — 2-е изд. — М.: Интернет-Университет Информационных Технологий; БИНОМ. Лаборатория знаний, 2007.

3. Когаловский М.Р. Энциклопедия технологий баз данных — М.: Финансы и статистика, 2002.

     Начало

  X,Y

x>0

вывод f

вывод Z

X<Y

x>y

вывод K

     Конец

да

нет

да

нет

да

нет


 

А также другие работы, которые могут Вас заинтересовать

77973. Типизированные файлы с идентичными структурами 30.5 KB
  Типизированный файл – это файл в котором записаны идентичные структуры. Например любой файл может считать файлом байтов – т.е можно читать байт за байтом, можно перейти сразу к любому байту по его номеру, можно сразу узнать сколько байт в файле, можно заменить любой байт на другой не перезаписывая файл.
77974. Условный оператор 28 KB
  Встречаются следующие формы условного оператора: Условный оператор с одной ветвью if условие then команды end При выполнении такого оператора вычисляется условие и если оно истинно то выполняются команды до ключевого слова end в противном случае выполнение программы продолжается со следующей за условным оператором команды. Условный оператор с двумя ветвями if условие then команды else команды end Здесь при истинности условия выполняются команды при ложности команды.
77976. Компоненты ввода-вывода информации 125 KB
  Свойство IsMasked: Boolean доступно только для чтения и содержит True, если строка шаблона задана. Свойство EditText: string содержит текст до наложения на него маски шаблона (т. е. то, что ввел пользователь), а свойство Text: String может (в зависимости от шаблона см. ниже) содержать либо исходный текст, либо результат наложения на него маски шаблона.
77977. Палитра компонентов 271 KB
  Для этого используется специальный редактор окно которого появляется на экране после щелчка правой кнопкой мыши на любой пиктограмме в палитре компонентов и выбора опции properties Свойства. Окно редактора палитры компонентов Данное окно позволяет добавлять или удалять компоненты с палитры компонентов или переименовывать названия вкладок: кнопка dd позволяет добавить новую вкладку палитры компонентов; кнопка Delete предназначена для удаления вкладки палитры компонентов. На нем изображены шесть наиболее важных окон Delphi: главное...
77978. Возможности Delphi для ввода и отображения дат и времен. Таймер 193.5 KB
  Таймер Компонент Delphi Timer очень простой компонент который не виден на экране но тем не менее Delphi Timer выполняет очень важные функции в программе. Delphi Timer позволяет вводить необходимые задержки между выполнением тех или иных действий. Компонент Timer имеет всего четыре свойства и одно событие и работать с компонентом Delphi Timer очень просто. Свойство Назначение Enbled Включение-выключение таймера Intervl Интервал срабатывания в миллисекундах Nme Имя компонента в программе Tg Произвольный числовой параметр Помещаем...
77979. Графические файлы в Delphi 63 KB
  У ряда объектов из библиотеки библиотеки визуальных компонент есть свойство Cnvs канва которое предоставляет простой путь для рисования на них. Cnvs является в свою очередь объектом объединяющим в себе поле для рисования карандаш Pen кисть Brush и шрифт Font. Cnvs обладает также рядом графических методов: Drw TextOut rc Rectngle и др. Используя Cnvs вы можете воспроизводить на форме любые графические объекты картинки многоугольники текст и т.
77980. Итерационные циклы 47 KB
  Для организации итерационных циклов используются операторы цикла с предусловием цикл ПОКА и цикла с постусловием цикл ДО. Эти операторы не задают закон изменения параметра цикла поэтому необходимо перед циклом задавать начальное значение параметра с помощью оператора присваивания а внутри цикла изменять текущее значение этого параметра. Циклы с предусловием используются тогда когда выполнение цикла связано с некоторым логическим условием. Оператор цикла с предусловием имеет две части: условие выполнения цикла и тело цикла.
77981. Кнопки. Диалоговые окна 67.5 KB
  Виды кнопок Кнопки TButton широко используются для управления программами представляет сабой командную кнопку на странице Stndrd. Определяет цвет стиль размер шрифта прилож Cncel: Boolen; Если имеет значение True событие OnClick кнопки возникает при нажатии клавиши Esc Defult: Boolen; Если имеет значение True событие OnClick кнопки возникает при нажатии клавиши Enter События OnClick Возникает при нажатии на кнопке В отличие от большинства других видимых компонентов кнопка TButton является компонентом самой Windows и...