Форум программистов [Powered by Invision Power Board]

Код


declare @Adr table (Id1 int, Adress varchar(50));
declare @Rel table (Adr1 int, Adr2 int);

    -- Заполнение тестовой табличной переменной (таблица в памяти)
    -- идентификаторами адресов и самими адресами
    insert into @Adr
        select 1, 'Улица 1, Дом 1'
        union all
        select 2, 'Улица 1, Дом 2'
        union all
        select 3, 'Улица 1, Дом 3'
        union all
        select 4, 'Улица 1, Дом 4'
        union all
        select 5, 'Улица 2, Дом 1'
        union all
        select 6, 'Улица 2, Дом 2'
        union all
        select 7, 'Улица 2, Дом 3'
        union all
        select 8, 'Улица 2, Дом 4'

    -- Заполнение таблицы связей.
    -- Предположим, что перекресток между 
    -- "Улица 1, Дом 2"(Id1 = 2), "Улица 1, Дом 3"(Id1 = 3) и "Улица 2, Дом 1"(Id1 = 5), "Улица 2, Дом 2"(Id1 = 6)
    insert into @Rel
        select 1, 2
        union all
        select 2, 3
        union all
        select 3, 4
        union all
        select 5, 6
        union all
        select 6, 7
        union all
        select 7, 8
        -- дальше заполнение связей на пересечении
        union all
        select 2, 5
        union all
        select 3, 5
        union all
        select 3, 6
        union all
        select 2, 6

        -- Переменная для указания идентификатора адреса, для которого будем производить поиск
declare    @AdrId    int;

        -- Присваиваем значение 2, т.е. идентификатор для 'Улица 1, Дом 2' (дом на перекрестке)
        select @AdrId = 2;

        select distinct a.Adress
        from @Rel r
            inner join @Adr a on a.Id1 = r.Adr1 or a.Id1 = r.Adr2
        where r.Adr1 = @AdrId OR r.Adr2 = @AdrId;
        
        -- Если количество обработанных строк больше 2, то дом стоит на перекрестке
        if @@ROWCOUNT > 2
            print 'Перекресток';
        else
            print 'Не перекресток';

Код


        -- Если количество обработанных строк больше 2, то дом стоит на перекрестке
        if @@ROWCOUNT > 2
            print 'Перекресток';
        else
            print 'Не перекресток';

Код


-- Предположим, что ранее созданы таблицы
-- Adr - адреса:
--              Id1 int - уникальный идентификатор адреса,
--              Adress varchar(50) - собственно адрес.
--Rel - связи между соседними домами (адресами)
--             Adr1 int - идентификатор первого адреса,
--             Adr2 int - идентификатор второго адреса

    -- Заполнение тестовой табличной переменной (таблица в памяти)
    -- идентификаторами адресов и самими адресами
    insert into Adr (Id1, Adress)
        select 1, 'Улица 1, Дом 1'
        union all
        select 2, 'Улица 1, Дом 2'
        union all
        select 3, 'Улица 1, Дом 3'
        union all
        select 4, 'Улица 1, Дом 4'
        union all
        select 5, 'Улица 2, Дом 1'
        union all
        select 6, 'Улица 2, Дом 2'
        union all
        select 7, 'Улица 2, Дом 3'
        union all
        select 8, 'Улица 2, Дом 4'

    -- Заполнение таблицы связей.
    -- Предположим, что перекресток между 
    -- "Улица 1, Дом 2"(Id1 = 2), "Улица 1, Дом 3"(Id1 = 3) и "Улица 2, Дом 1"(Id1 = 5), "Улица 2, Дом 2"(Id1 = 6)
    insert into Rel (Adr1, Adr2)
        select 1, 2
        union all
        select 2, 3
        union all
        select 3, 4
        union all
        select 5, 6
        union all
        select 6, 7
        union all
        select 7, 8
        -- дальше заполнение связей на пересечении
        union all
        select 2, 5
        union all
        select 3, 5
        union all
        select 3, 6
        union all
        select 2, 6

        select distinct a.Adress
        from Rel r
            inner join Adr a on a.Id1 = r.Adr1 or a.Id1 = r.Adr2
        where r.Adr1 = 2 OR r.Adr2 = 2 -- 2 - идентификатора адреса, для которого будем производить поиск