4 Запросы к геобазе
Запрос №1: Вывести номера и адреса школ, у которых есть электронная почта, но нет сайта. Результат запроса представлен на рис. 4.1.
select number, adress
from schools
where web=0 and Email=1
into Q1
Рисунок 4.1 – Школы, имеющие электронную почту и не имеющие сайта
Запрос №2: Вывести номера школ и номера телефонов для тех школ, у которых нет номера телефона. Результат запроса представлен на рис. 4.2.
select number, adress
from schools
where tel="-" or tel=""
into Q2
Рисунок 4.2 – Школы, не имеющие номера телефона
Запрос №3: Вывести номер, тип и адрес школ, не относящиеся к просто средним. Результат запроса представлен на рис. 4.3.
select number, adress, type
from schools
where type<>"Средняя школа"
into Q3
Рисунок 4.3 – Школы, не относящиеся к средним
Запрос №4: Вывести номер, тип и телефон всех средних школ, у которых нет сайта. Результат запроса представлен на рис. 4.4.
select number, type, tel
from schools
where type="Средняя школа" and web=0
into Q4
Рисунок 4.4 – Общеобразовательные школы, не имеющие сайта
Запрос №5: Вывести номер, адрес и номер телефона тех школ, у которых номер телефона заканчивается на восьмерку. Результат запроса представлен на рис. 4.5.
select number, adress, tel
from schools
where tel like "%8"
into Q5
Рисунок 4.5 – Школы с номером телефона, заканчивающихся на 8
Запрос №6: Вывести номер, адрес и телефон тех школ, в адресах которых содержится цифра 2. Результат запроса представлен на рис. 4.6.
select number, adress, tel
from schools
where adress like "%2%"
into Q6
Рисунок 4.6 – Школы с цифрой 2 в адресе
Запрос №7: Вывести номер, тип, адрес и телефон тех средних школ, телефон и адрес которых содержит 7. Результат запроса представлен на рис. 4.7.
select number,type, adress, tel
from schools
where type="Средняя школа" and tel like "%7%" and adress like "%7%"
into Q7
Рисунок 4.7 – Средние школы с телефонами и адресами, содержажими 7
Запрос №8: Вывести географические координаты всех школ. 4.8.
Set CoordSys Earth
Dim x, y As Float
select number,adress,CentroidX(schools.obj)"X",
CentroidY(schools.obj)"Y"
from schools
into Q8
Рисунок 4.8 – Географические координаты всех школ
Запрос №9: Вывести расстояние между 8 и 122 школами. Результат запроса представлен на рис. 4.9.
Set CoordSys Earth
Projection 9,7,"m",-96.0,23.0,20.0, 60.0, 0.0, 0.0
Dim dist, start_x, start_y, end_x, end_y As Float
select *
from schools
into ten
where number =122
start_x = CentroidX(schools.obj)
start_y = CentroidY(schools.obj)
select *
from schools
into ten
where number =8
end_x = CentroidX(schools.obj)
end_y = CentroidY(schools.obj)
dist = CartesianDistance(start_x,start_y,end_x,end_y,"km")
Note "Расстояние между между 8 и 122 школами = " +dist+" киллометра"
Рисунок 4.9 – Расстояние между 8 и 122 школами
Запрос №10: Найти расстояние от 122 школы до остальных школ. Результат запроса представлен на рис. 4.10.
Dim x,y as float
select *
from schools
into Temp
where number =122
x = CentroidX(Temp.obj)
y = CentroidY(Temp.obj)
select number, adress, Distance(CentroidX(schools.obj),CentroidY(schools.obj),x,y,"km")"Distance"
from schools
into temp1
where Distance(CentroidX(schools.obj),CentroidY(schools.obj),x,y,"km")
Group By number
browse * from temp1
Рисунок 4.10 – Расстояние от 122 школы до остальных школ
ЗАКЛЮЧЕНИЕ
Данная курсовая робота посвящена созданию геоинформационной базы школ города Одессы. База вмещает в себя все необходимую информацию про школы. В данной геоинформационной базе учитываются номера школ, их адреса, телефоны, а также два логических поля, которые указывают на наличие либо отсутствие сайта и электронной почты у школ. Также были разработаны 10 запросов к этой базе (7 обычных и 3 пространственных). Запросы писались с использованием программной среды MapBasic 11.0.
В процессе выполнения курсовой работы были освоены навыки создания геоинформационных баз в среде MapInfo. Созданную геоинформационную базу можно дополнить до необходимых размеров.