Проектування та розробка баз і банків даних

Інформатика, програмування

ПОЯСНЮВАЛЬНА ЗАПИСКА

до курсового проекту

З ДИСЦИПЛІНИ "БАЗИ І БАНКИ ДАНИХ"

Тема: "Проектування та реалізація бази даних"

Виконав студент гр. Е-282:

Богданівський А. А.

Прийняв викладач:

Сухомлинов А. И.

________________________

Дата:

"" січня 1996

ЗМІСТ

I. Постановка завдання 3

II. Розробка бази даних "ПДС" 3

III. Реалізація бази даних "ПДС" 3

IV. Схема даних і програмні тексти 3

V. Опис автоматизованого робочого місця 4

VI. Результати роботи 6

СПИСОК ЛІТЕРАТУРИ 7

Додаток I. Звіт по літній практиці за темою "Інфологіческое моделювання" 8

Додаток II. Програмні тексти, запити та схема даних 13

Додаток III. Таблиці даних з інформацією 17

Додаток IV. Приклади звітів 19

1 Постановка завдання

Лабораторія інженерної океанології (Ліо) при далекосхідному науково -дослідному гідрометеорологічному інституті (ДВНІГМІ) виробляєрозрахунки гранично-допустимих скидів (ПДС) для підприємств різних видівдіяльності. Розрахунок проводиться за допомогою спеціальних програм розрахунку
ПДС за методикою/1 /.

Розробити і реалізувати базу даних (БД) "ПДС", що забезпечуєзберігання, накопичення та надання всієї інформації про підприємство -замовника, необхідної для програми розрахунку ПДС.

2 Розробка бази даних "ПДС"

Розробка бази даних "ПДС" проводилася в роботі по літній практиці.
У цій роботі була складена повна інфологіческая модель бази даних зтипами сутностей, типами зв'язків, їх атрибутами і графічним поданняммоделі.

Звіт за вищезазначеним річній практиці представлений в цiйпояснювальній записці в додатку I.

3 Реалізація бази даних "ПДС"

База даних "ПДС" була реалізована на СУБД Microsoft Access 2.0 всередовищі Microsoft Windows 3.1 *. При виборі СУБД використовувалися/3-5 /. Уякості керівництва по генерації таблиць, екранних форм, запитів, звітів,з програмування макрокоманд і програмних модулів використовувалася/2 /.

База даних разом з таблицями даних, екранними формами, запитами,звітними формами в Microsoft Access видається в одному файлі. Базаданих "ПДС" зберігається у файлі PDS.MDB.

Схема даних, тексти макрокоманд і програмне опис елементівуправління наведено в розділі IV. Опис реалізованого робочого місця
(АРМ) на основі бази "ПДС" наводиться в розділі V цієї записки.

4 Схема даних і програмні тексти

Так як представлення структури бази даних, екранних форм, запитів,звітних форм в Microsoft Access забезпечується внутрішньої реалізацією СУБД
(на відміну від поширених СУБД типу dBase, FoxPro, і т. д., в якихці характеристики описуються програмним шляхом), то подання повногопрограмного коду бази даних, написаної на Microsoft Access єнеможливим, у зв'язку з відсутністю такого.

Однак, при створенні екранних форм для присвоєння різних функційелементів керування - кнопок - використовувався внутрішню мову СУБД -
Access Basic. Деякі процедури, написані на цій мові, представлені вдодатку II.

У базі даних "ПДС" для створення двох звітів використовується двазапиту. Хоча ці запити генерировалась візуальними засобами, але єможливість представити їх у вигляді SQL-запиту. Ці два SQL-запитупредставлені також у додатку II.

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

5 Опис автоматизованого робочого місця

В результаті роботи було створено автоматизоване робоче місце
(АРМ) у вигляді набору пов'язаних екранних форм і звітів, що дозволяє вводити,редагувати, переглядати дані по підприємствах, за випускомпідприємств, забруднюючі речовини, концентрації речовин по випусках,контрольні створи для випусків, параметри забруднюючих речовин вконтрольних створах. Крім того, є можливість створення звітів поданими про випуски підприємства і про концентрації забруднених речовин поконкретного випуску.

Після завантаження головного (і єдиного) файлу бази "ПДС" PDS.MDB з
СУБД Microsoft Access на екрані автоматично з'являється наступний екран:

З головного екрану можна потрапити, куди та екрани:

. Кнопка "Підприємства" - екран для роботи з базою Підприємства (додавання, видалення, редагування Підприємств та їх випусків, а також концентрацій забруднюючих речовин по кожному випусків):

. Кнопка "Контрольні створи" - робота з базою контрольних створів разом з базою забруднюючих речовин по кожному створу:

. Кнопка "Речовини" - додавання нових контрольованих забруднюючих речовин:

Таким чином, програма "підтримки" бази даних "ПДС" містить триголовні екранні форми, за допомогою яких можна вести базу даних. Крімцих форм, існує ще кілька, які є допоміжними івикликаються з форм, описаних вище. Допоміжні форми в даній записціне наводяться через їх незначне.

6 Результати роботи

У результаті нетривалої роботи з базою даних "ПДС" за допомогоюрозроблених екранних форм були введені дані про декількох підприємствах зінформацією про випуски. Таблиці, що представляють ці дані представлені вдодатку III.

У додатку IV представлені два види звітів, які можегенерувати БД "ПДС".

1. Методика розрахунку гранично-допустимих скидів (ГПС) речовин у водні об'єкти зі стічними водами. - Харків, 1990, - 115 c.

2. Електронна вбудована гіпертекстова довідкова система Microsoft

Access, файл MSACC20.HLP, 4.7 Мбайта.

3. Журнал "PC Magazine Russian Edition" № 7 1994, стаття У. Плейна,

"Microsoft Access".

4. Журнал "PC Magazine Russian Edition" № 5 1994.

5. Журнал "Компьютерра" № 37-38 1994.

ПРОЦЕДУРИ опису ФУНКЦІЙ ЕЛЕМЕНТІВ УПРАВЛІННЯ Екранна форма

Форма "Випуски"

Sub ДобавленіеНовойЗапіс_Click ()
On Error GoTo Err_ДобавленіеНовойЗапіс_Click

DoCmd GoToRecord,, A_NEWREC

Exit_ДобавленіеНовойЗапіс_Click:

Exit Sub

Err_ДобавленіеНовойЗапіс_Click:

MsgBox Error $

Resume Exit_ДобавленіеНовойЗапіс_Click

End Sub

Sub ДубліроватьЗапісьВВи_Click ()
On Error GoTo Err_ДубліроватьЗапісьВВи_Click

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_SELECTRECORD_V2,,
A_MENU_VER20

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_COPY,, A_MENU_VER20

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, 6,, A_MENU_VER20'Paste Append

Exit_ДубліроватьЗапісьВВи_Click:

Exit Sub

Err_ДубліроватьЗапісьВВи_Click:

MsgBox Error $

Resume Exit_ДубліроватьЗапісьВВи_Click

End Sub

Sub УдаленіеЗапісіВВипус_Click ()
On Error GoTo Err_УдаленіеЗапісіВВипус_Click

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_SELECTRECORD_V2,,
A_MENU_VER20

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_DELETE_V2,, A_MENU_VER20

Exit_УдаленіеЗапісіВВипус_Click:

Exit Sub

Err_УдаленіеЗапісіВВипус_Click: MsgBox Error $

Resume Exit_УдаленіеЗапісіВВипус_Click

End Sub

Sub ВизовФорми_Концентра_Click ()
On Error GoTo Err_ВизовФорми_Концентра_Click

Dim DocName As String

DocName = "концентрація стоків"

DoCmd OpenForm DocName,,, "[Випуск] =
Forms! [Підприємство]! [Випуск]. Form! [Випуск] "

Exit_ВизовФорми_Концентра_Click:

Exit Sub

Err_ВизовФорми_Концентра_Click:

MsgBox Error $

Resume Exit_ВизовФорми_Концентра_Click

End Sub

Sub Кнопка47_Click ()
On Error GoTo Err_Кнопка47_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "КонтрольнийСтвор"

LinkCriteria = "[Контрольний створ] =
Forms! [Підприємство]! [Випуск]. Form! [Поле46] "

DoCmd OpenForm DocName,,, LinkCriteria

DoCmd GoToControl" Внедренний_об'ект16 "

Forms ! [КонтрольнийСтвор]! [ПереходКПервойЗапісіВПредпріятіях]. Доступ = 0

Forms! [КонтрольнийСтвор]! [ПереходКПредидущейЗапісіВПредпріятіях]. Доступ
= 0

Forms! [КонтрольнийСтвор]! [ПереходКСледующейЗапісіВПредпріятіях]. Доступ
= 0

Forms! [КонтрольнийСтвор]! [ПереходКПоследнейЗапісіВПредпріятіях]. Доступ
= 0

Forms! [КонтрольнийСтвор]! [Кнопка20]. Доступ = 0

Forms! [КонтрольнийСтвор]! [Кнопка21]. Доступ = 0

Forms ! [КонтрольнийСтвор]! [Кнопка22]. Доступ = 0

Forms! [КонтрольнийСтвор]! [Назва]. Доступ = 0

Exit_Кнопка47_Click:

Exit Sub

Err_Кнопка47_Click:

MsgBox Error $

Resume Exit_Кнопка47_Click

End Sub

Форма "Головна"

Sub Кнопка2_Click ()
On Error GoTo Err_Кнопка2_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "Підприємство"

DoCmd OpenForm DocName,, , LinkCriteria

Exit_Кнопка2_Click:

Exit Sub

Err_Кнопка2_Click:

MsgBox Error $

Resume Exit_Кнопка2_Click

End Sub

Sub Кнопка3_Click ()
On Error GoTo Err_Кнопка3_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "КонтрольнийСтвор"

DoCmd OpenForm DocName,, , LinkCriteria

Exit_Кнопка3_Click:

Exit Sub

Err_Кнопка3_Click:

MsgBox Error $

Resume Exit_Кнопка3_Click

End Sub

Sub Кнопка9_Click ()
On Error GoTo Err_Кнопка9_Click

DoCmd Close

Exit_Кнопка9_Click:

Exit Sub

Err_Кнопка9_Click:

MsgBox Error $

Resume Exit_Кнопка9_Click

End Sub

Sub Кнопка6_Click ()
On Error GoTo Err_Кнопка6_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "Про програму"

DoCmd OpenForm DocName, ,, LinkCriteria

Exit_Кнопка6_Click:

Exit Sub

Err_Кнопка6_Click:

MsgBox Error $

Resume Exit_Кнопка6_Click

End Sub

Sub Кнопка5_Click ()
On Error GoTo Err_Кнопка5_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "Речовина"

DoCmd OpenForm DocName,, , LinkCriteria

Exit_Кнопка5_Click:

Exit Sub

Err_Кнопка5_Click:

MsgBox Error $

Resume Exit_Кнопка5_Click

End Sub

Форма "КонтрольнийСтвор"

Sub Form_Close ()

Forms! [КонтрольнийСтвор]! [ПереходКПервойЗапісіВПредпріятіях]. Доступ = 1

Forms! [КонтрольнийСтвор]! [ПереходКПредидущейЗапісіВПредпріятіях]. Доступ
= 1

Forms! [КонтрольнийСтвор]! [ПереходКСледующейЗапісіВПредпріятіях]. Доступ
= 1

Forms! [КонтрольнийСтвор]! [ПереходКПоследнейЗапісіВПредпріятіях]. Доступ
= 1

Forms! [КонтрольнийСтвор]! [Кнопка20]. Доступ = 1

Forms! [КонтрольнийСтвор]! [Кнопка21]. Доступ = 1

Forms ! [КонтрольнийСтвор]! [Кнопка22]. Доступ = 1

Forms! [КонтрольнийСтвор]! [Назва]. Доступ = 1
End Sub

Sub ВиходІзФормиКонтроль_Click ()
On Error GoTo Err_ВиходІзФормиКонтроль_Click

DoCmd Close

Exit_ВиходІзФормиКонтроль_Click:

Exit Sub

Err_ВиходІзФормиКонтроль_Click:

MsgBox Error $

Resume Exit_ВиходІзФормиКонтроль_Click

End Sub

Sub Кнопка20_Click ()
On Error GoTo Err_Кнопка20_Click

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, 10,, A_MENU_VER20

Exit_Кнопка20_Click:

Exit Sub

Err_Кнопка20_Click:

MsgBox Error $

Resume Exit_Кнопка20_Click

End Sub

Sub Кнопка21_Click ()
On Error GoTo Err_Кнопка21_Click

DoCmd GoToRecord,, A_NEWREC

Exit_Кнопка21_Click:

Exit Sub

Err_Кнопка21_Click:

MsgBox Error $

Resume Exit_Кнопка21_Click

End Sub

Sub Кнопка22_Click ()
On Error GoTo Err_Кнопка22_Click

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_SELECTRECORD_V2,,
A_MENU_VER20

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_DELETE_V2,, A_MENU_VER20

Exit_Кнопка22_Click:

Exit Sub

Err_Кнопка22_Click: MsgBox Error $

Resume Exit_Кнопка22_Click

End Sub

Sub ПереходКПервойЗапісі_Click ()
On Error GoTo Err_ПереходКПервойЗапісі_Click

DoCmd GoToRecord,, A_FIRST

Exit_ПереходКПервойЗапісі_Click:

Exit Sub

Err_ПереходКПервойЗапісі_Click:

MsgBox Error $

Resume Exit_ПереходКПервойЗапісі_Click

End Sub

Sub ПереходКПоследнейЗап_Click ()
On Error GoTo Err_ПереходКПоследнейЗап_Click

DoCmd GoToRecord,, A_LAST

Exit_ПереходКПоследнейЗап_Click:

Exit Sub

Err_ПереходКПоследнейЗап_Click:

MsgBox Error $

Resume Exit_ПереходКПоследнейЗап_Click

End Sub

Sub ПереходКПредидущейЗа_Click ()
On Error GoTo Err_ПереходКПредидущейЗа_Click

DoCmd GoToRecord,, A_PREVIOUS

Exit_ПереходКПредидущейЗа_Click:

Exit Sub

Err_ПереходКПредидущейЗа_Click:

If Err 2105 Then MsgBox Error $

Resume Exit_ПереходКПредидущейЗа_Click

End Sub

Sub ПереходКСледующейЗап_Click ()
On Error GoTo Err_ПереходКСледующейЗап_Click

DoCmd GoToRecord,, A_NEXT

Exit_ПереходКСледующейЗап_Click:

Exit Sub

Err_ПереходКСледующейЗап_Click:

If Err 2105 Then MsgBox Error $

Resume Exit_ПереходКСледующейЗап_Click

End Sub

Форма "концентрація стоків"

Sub ЗакритіеФорми_Концен_Click ()
On Error GoTo Err_ЗакритіеФорми_Концен_Click

DoCmd Close

Exit_ЗакритіеФорми_Концен_Click:

Exit Sub

Err_ЗакритіеФорми_Концен_Click:

MsgBox Error $

Resume Exit_ЗакритіеФорми_Концен_Click

End Sub

Sub ОтчетПоКонцентраціям_Click ()
On Error GoTo Err_ОтчетПоКонцентраціям_Click

Dim DocName As String

DocName = "ОтчетПоКонцентраціям"

DoCmd OpenReport DocName, A_PREVIEW

Exit_ОтчетПоКонцентраціям_Click:

Exit Sub

Err_ОтчетПоКонцентраціям_Click:

MsgBox Error $

Resume Exit_ОтчетПоКонцентраціям_Click

End Sub

Форма "Підприємство"

Sub Закрить_Форму_Предпр_Click ()
On Error GoTo Err_Закрить_Форму_Предпр_Click

DoCmd Close

Exit_Закрить_Форму_Предпр_Click:

Exit Sub

Err_Закрить_Форму_Предпр_Click:

MsgBox Error $

Resume Exit_Закрить_Форму_Предпр_Click

End Sub

Sub Запустіть_Форму_Випу_Click ()
On Error GoTo Err_Запустіть_Форму_Випу_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "Випуск"

DoCmd OpenForm DocName,, , LinkCriteria

Exit_Запустіть_Форму_Випу_Click:

Exit Sub

Err_Запустіть_Форму_Випу_Click:

MsgBox Error $

Resume Exit_Запустіть_Форму_Випу_Click

End Sub

Sub НоваяЗапісьВПредпрія_Click ()
On Error GoTo Err_НоваяЗапісьВПредпрія_Click

DoCmd GoToRecord,, A_NEWREC

Exit_НоваяЗапісьВПредпрія_Click:

Exit Sub

Err_НоваяЗапісьВПредпрія_Click:

MsgBox Error $

Resume Exit_НоваяЗапісьВПредпрія_Click

End Sub

Sub ОтчетПоВипускам_Click ()
On Error GoTo Err_ОтчетПоВипускам_Click

Dim DocName As String

DocName = "ОтчетПоВипускамПредпріятія"

DoCmd OpenReport DocName, A_PREVIEW

Exit_ОтчетПоВипускам_Click:

Exit Sub

Err_ОтчетПоВипускам_Click:

MsgBox Error $

Resume Exit_ОтчетПоВипускам_Click

End Sub

Sub ПереходКПервойЗапісі_Click ()
On Error GoTo Err_ПереходКПервойЗапісі_Click

DoCmd GoToRecord,, A_FIRST

Exit_ПереходКПервойЗапісі_Click:

Exit Sub

Err_ПереходКПервойЗапісі_Click:

MsgBox Error $

Resume Exit_ПереходКПервойЗапісі_Click

End Sub

Sub ПереходКПоследнейЗап_Click ()
On Error GoTo Err_ПереходКПоследнейЗап_Click

DoCmd GoToRecord,, A_LAST

Exit_ПереходКПоследнейЗап_Click:

Exit Sub

Err_ПереходКПоследнейЗап_Click:

MsgBox Error $

Resume Exit_ПереходКПоследнейЗап_Click

End Sub

Sub ПереходКПредидущейЗа_Click ()
On Error GoTo Err_ПереходКПредидущейЗа_Click

DoCmd GoToRecord,, A_PREVIOUS

Exit_ПереходКПредидущейЗа_Click:

Exit Sub

Err_ПереходКПредидущейЗа_Click:

If Err 2105 Then MsgBox Error $

Resume Exit_ПереходКПредидущейЗа_Click

End Sub

Sub ПереходКСледующейЗап_Click ()
On Error GoTo Err_ПереходКСледующейЗап_Click

DoCmd GoToRecord,, A_NEXT

Exit_ПереходКСледующейЗап_Click:

Exit Sub

Err_ПереходКСледующейЗап_Click:

If Err 2105 Then MsgBox Error $

Resume Exit_ПереходКСледующейЗап_Click

End Sub

Sub ПоіскЗапісіВПредпрія_Click ()
On Error GoTo Err_ПоіскЗапісіВПредпрія_Click

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, 10,, A_MENU_VER20

Exit_ПоіскЗапісіВПредпрія_Click:

Exit Sub

Err_ПоіскЗапісіВПредпрія_Click:

MsgBox Error $

Resume Exit_ПоіскЗапісіВПредпрія_Click

End Sub

Sub Редактірованіе_Випус_Click ()
On Error GoTo Err_Редактірованіе_Випус_Click

Dim DocName As String

Dim LinkCriteria As String

DocName = "Випуск"

LinkCriteria = "[Підприємство ] = [Підприємство]! [Підприємство] "

DoCmd OpenForm DocName,,, LinkCriteria

Exit_Редактірованіе_Випус_Click:

Exit Sub

Err_Редактірованіе_Випус_Click :

MsgBox Error $

Resume Exit_Редактірованіе_Випус_Click

End Sub

Sub СпісокПредпріятійДля_AfterUpdate ()
DoCmd ApplyFilter, "НазваніеПредпріятіе = Me! [СпісокПредпріятійДляПоіска] "
End Sub

Sub УдаленіеЗапісіВПредп_Click ()
On Error GoTo Err_УдаленіеЗапісіВПредп_Click

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_SELECTRECORD_V2,,
A_MENU_VER20

DoCmd DoMenuItem A_FORMBAR, A_EDITMENU, A_DELETE_V2,, A_MENU_VER20

Exit_УдаленіеЗапісіВПредп_Click:

Exit Sub

Err_УдаленіеЗапісіВПредп_Click: MsgBox Error $

Resume Exit_УдаленіеЗапісіВПредп_Click

End Sub

ЗАПИТИ ДЛЯ СТВОРЕННЯ ЗВІТІВ (В ФОРМІ SQL)

Запит ЗапросДляОтчетаПоВипускам "

SELECT DISTINCTROW Предпріятіе.НазваніеПредпріятія, Випуск.НазваніеВипуска,
Випуск.Расход, Випуск.Діаметр, Випуск.РасстояніеДоБерега, Випуск.Глубіна,
Випуск.СкоростьТеченія
FROM Підприємство INNER JOIN Випуск ON Предпріятіе.Предпріятіе =
Випуск.Предпріятіе
WHERE
((Предпріятіе.НазваніеПредпріятія = [Forms]! [Підприємство]! [НазваніеПредпріятія
]));

Запит ЗапросДляОтчетаПоКонцентраціям "

SELECT DISTINCTROW Випуск.НазваніеВипуска, Вещество.Названіе,
СвязьКонцентраціяСтока.Коцентрація, Випуск.Випуск
FROM Випуск INNER JOIN (Речовина INNER JOIN СвязьКонцентраціяСтока ON
Вещество.Вещество = СвязьКонцентраціяСтока.Вещество) ON Випуск.Випуск =
СвязьКонцентраціяСтока.Випуск
WHERE ((Випуск.Випуск = [forms]! [Концентрація стоків]! [Випуск ]));

СХЕМА ДАНИХ

Таблиця "Речовина" | Віщо | Назва |
| ство | |
| 22 | Зважені |
| | Речовини |
| 23 | Розчинений |
| | Кисень |
| 24 | БПК повне |
| 25 | БПК 5 |
| 26 | ХПК |
| 27 | Амоній |
| | Сольовий |
| 28 | Азот |
| | Амонійний |
| 29 | Сухий залишок |
| 30 | Нітрити |
| 31 | Нітрати |
| 32 | Нафтопродукти |
| 33 | Феноли |
| 34 | Амміносульфати |
| | (Гр. СПАР) |
| 35 | Амміносульфона |
| | Ти (гр. СПАР) |
| 36 | Мінералізація |
| 37 | Хлориди (для |
| | Прісно.) |
| 38 | Хлориди |
| 39 | Сульфати |

Таблиця "Випуск"
| Вип | Пр | Контроль | Назва | Рас | Діа | расст | Глу | Щільно | скорос | напрямку |
| УСК | од | ний | є | хід | мет | яніе | бін | сть | ть | ня |
| | Пр | створ | Випуску | | р | Добер | а | Сток | Перебіг | Перебіг |
| | Ія | | | | | га | | | я | я |
| | Ти | | | | | | | | | |
| | Є | | | | | | | | | |
| 24 | 5 | 1 | Випуск | 0.0 | 0.2 | 1 | 1.2 | 1.03 | 120 | 0 |
| | | | N1 | 2 | | | | | | |
| 25 | 5 | 1 | Випуск | 0.0 | 0.2 | 0 | 1.2 | 1.03 | 120 | 0 |
| | | | N2 | 5 | | | | | | |
| 26 | 6 | 2 | Випуск | 0.0 | 0.2 | 205 | 4.3 | 1.003 | 15 | 1 |
| | | | N1 | 014 | 5 | | 5 | | | |
| | | | | 3 | | | | | | |
| 27 | 7 | 4 | Випуск | 0.0 | 0.2 | 15 | 2.3 | 1.02 | 20 | 0 |
| | | | N1 | 045 | | | | | | |
| 29 | 7 | 4 | Випуск | 0.0 | 0.2 | 0 | 1.2 | 1.02 | 20 | 0 |
| | | | N4 | 032 | 5 | | | | | |
| 30 | 7 | 4 | Випуск | 0.0 | 0.2 | 0 | 1.2 | 1.02 | 20 | 0 |
| | | | N5 | 8 | 5 | | | | | |
| 32 | 8 | 3 | Випуск | 0.0 | 0.2 | 0.2 | 2.2 | 1.033 | 0.1 | 0 |
| | | | У | 043 | | | | | | |
| | | | Кутову | 2 | | | | | | |
| | | | Частина | | | | | | | |
| | | | Бухти | | | | | | | |

Таблиця "контрольних створах"
| Контрольно | Назва |
| ий створ | |
| 1 | р. |
| | Світле |
| 2 | б. |
| | Андрєєва |
| 3 | б. Малий |
| | Гайдамаки |
| 4 | з. |
| | Східна |
| | Й |

Таблиця "СвязьВеществаКонтрольногоСтвора"
| Речовини | Віщо | Контрольно | ПД | Фо | КН |
| Контролінг | ство | ий створ | К | н | К |
| Створу | | | | | |
| 1 | 22 | 1 | 2. | 2. | 0 |
| | | | 75 | 5 | |
| 2 | 25 | 1 | 1. | 3. | 0. |
| | | | 8 | 5 | 03 |
| 3 | 28 | 1 | 0. | 0. | 0. |
| | | | 05 | 03 | 1 |
| 4 | 31 | 1 | 0. | 0. | 0. |
| | | | 00 | 00 | 3 |
| | | | 5 | 06 | |
| 5 | 26 | 1 | 1. | 0 | 0 |
| | | | 5 | | |
| 6 | 29 | 1 | 10 | 0 | 0 |
| | | | .3 | | |
| 7 | 36 | 1 | 1. | 0 | 0 |
| | | | 2 | | |
| 8 | 37 | 1 | 30 | 10 | 0 |
| | | | 0 | | |
| 9 | 22 | 2 | 2. | 2. | 0 |
| | | | 75 | 5 | |
| 10 | 23 | 2 | 1. | 2. | 0. |
| | | | 3 | 5 | 4 |
| 11 | 24 | 2 | 3. | 5. | 0. |
| | | | 4 | 6 | 00 |
| | | | | | 5 |
| 12 | 25 | 2 | 1. | 0. | 0 |
| | | | 8 | 04 | |
| 13 | 26 | 2 | 1. | 0. | 0. |
| | | | 5 | 05 | 05 |
| 14 | 27 | 2 | 2. | 1. | 0 |
| | | | 3 | 2 | |
| 15 | 22 | 4 | 2. | 2. | 0. |
| | | | 75 | 5 | 01 |
| 16 | 24 | 4 | 3. | 2. | 0 |
| | | | 4 | 3 | |
| 17 | 23 | 4 | 1. | 1. | 0 |
| | | | 3 | 1 | |
| 18 | 25 | 4 | 1. | 0. | 0 |
| | | | 8 | 1 | |
| 19 | 27 | 4 | 2. | 0. | 0. |
| | | | 3 | 00 | 06 |
| | | | | 01 | |

Таблиця "СвязьКонцентраціяСтока"
| Концентрація | Віщо | Вип | Коцен |
| В стічній | ство | УСК | трація |
| Воді | | | я |
| 5 | 22 | 30 | 2 |
| 7 | 23 | 30 | 0.2 |
| 8 | 28 | 30 | 0.32 |
| 9 | 29 | 30 | 0.000 |
| | | | 4 |
| 10 | 26 | 30 | 0 |
| 11 | 25 | 30 | 1.4 |
| 12 | 36 | 30 | 0 |
| 13 | 37 | 30 | 0 |
| 14 | 25 | 30 | 0 |
| 15 | 24 | 24 | 2.4 |
| 16 | 28 | 24 | 0.01 |
| 17 | 31 | 24 | 0.001 |
| 18 | 36 | 24 | 0 |
| 19 | 32 | 24 | 0.005 |
| 20 | 37 | 24 | 10 |
| 21 | 34 | 24 | 1.2 |
| 22 | 30 | 24 | 0.000 |
| | | | 3 |
| 23 | 39 | 24 | 0 |
| 24 | 23 | 26 | 1.2 |
| 25 | 29 | 26 | 1 |
| 26 | 24 | 26 | 2.8 |
| 27 | 26 | 26 | 0.02 |
| 28 | 27 | 26 | 0.003 |
| 29 | 23 | 25 | 0.1 |
| 30 | 24 | 25 | 2.4 |
| 31 | 27 | 25 | 1.2 |
| 32 | 29 | 25 | 1.3 |
| 33 | 36 | 25 | 0 |
| 34 | 26 | 25 | 0 |
| 35 | 35 | 25 | 0.002 |
| 36 | 22 | 27 | 4.8 |
| 37 | 23 | 27 | 10.12 |
| 38 | 25 | 27 | 12.89 |
| 39 | 22 | 29 | 13.4 |
| 40 | 23 | 29 | 12.8 |
| 41 | 24 | 29 | 4.6 |
| 42 | 25 | 29 | 1.2 |
| 43 | 22 | 32 | 0.02 |
| 44 | 23 | 32 | 0.06 |
| 45 | 29 | 32 | 1.2 |
| 46 | 36 | 32 | 5.6 |

ЗВІТ По випуску ПРЕДПІЯТІЯ

Інформація про випуски підприємства

Назва підприємства: рибзавод "Світле" Назва випуску: Випуск N1

Витрата: 0.02 куб. м/с

Діаметр: 0.2 м

Відстань до берега: 1 м

Глибина: 1.2 м

120 м/с

Швидкість течії:

Назва підприємства: рибзавод "Світле"

Назва випуску: Випуск N2

Витрата: 0.05 куб. м/с

Діаметр: 0.2 м

Відстань до берега: 0 м

Глибина: 1.2 м

120 м/с

Швидкість течії:

ЗВІТ ПО Забруднюючі речовини ВИПУСКУ

Концентрації речовин з випуску

Випуск N1

Підприємство: рибзавод "Світле"

Речовина Концентрація

(мг/л)
БПК повне 2.4
Азот амонійний 0.01
Нітрати 0.001
Мінералізація 0
Нафтопродукти 0.005
Хлориди (для прісних.) 10
Амміносульфати (гр. СПАР) 1.2
Нітрити 0.0003
Сульфати 0

* Бази даних Microsoft Access належать до типу реляційних баз даних. Утаких базах даних відомості, що відносяться до різних питань, зберігаютьсяв окремих таблицях. Можливість виведення інформації з бази данихзабезпечується зазначенням співвідношень між об'єктами. (вирізка з/2 /).