Как объединить базы данных?

Здравствуйте!
Здесь Вам на помощь может прийти операция - Карта/Группа/Записать.

Видеоуроки

В Zulu единицей хранения данных является слой. Т.О. Вам необходимо выделить "кусок тепловой сети с данными" в исходном слое и тем же самым образом (Видеоурок-Объединение слоев ) записать в слой, входящий в другую карту.

Если же эта карта не содержит слоя с тепловыми сетями, то можно скопировать выделенный "кусок тепловой сети с данными" в новый слой и добавить его в необходимую карту. Слой/скопировать, с опцией 'только выделенное'. описание процедуры

Что подразумевается под словами "такую же карту". Насколько она такая же? Те же объекты, только таблицы разные, или объекты другие, но расположены на той же территории? В зависимости от того, на сколько данные обоих источников соответствуют друг другу, возможны разные программные решения по переносу данных. Пришлите данные (или их фрагменты для примера) на [email protected] посмотрим.

В любом случае для переноса данных нужно получить соответствие между объектами двух слоев. Можно написать макрос. Например получить список пар ключей объектов двух слоев, когда объекты совпадают. Из списка сделать таблицу и дальше построить в какой-то субд запрос по переброске данных с использованием полученной таблицы связи.

Sub Intesect()

Set Doc = ActiveDocument

Set Map = Doc.NativeDoc

Set Lrs = Map.Layers


'eFullyEqual = 32

Set Keys = Lrs.Active.IntersectByLayer(Lrs.Item(2), 32, False, -1, -1, 0)

Set Out = OpenOutputChannel ("Сообщения")

Out.Clear

num = keys.count - 1

for i = 0 to num

Out.Put CStr(Keys.KeyFirst(i)) + "," + CStr(Keys.KeySecond(i)) + CHR(10)

next

end sub


Либо в самом макросе идти по списку пар ключей, читать данные по одному ключу и записывать данные по второму ключу