Выводит в окно сообщений набор данных (dataset) в табличном виде.
Sub PrintDataset(vDataset, vOptions)
Где:
vDataset — объект содержащий набор данных (dataset).
На данный момент может содержать объекты типа IZbDataset и ElementKeys
vOptions — содержит битовые флаги с настройками вывода:
биты от 1 до 4 (0xF) — содержат число знаков после запятой для числовых значений.
256 (0x100) — отображение рамок таблицы.
512 (0x200) — разделяет данные и заголовок таблицы пустой строкой.
1024 (0x400) — вывод каждого элемента таблицы, заключенным в двойные кавычки с запятой в качестве разделителя.
2048 (0x800) — вывод перед ключом объекта префикса "ID=" для позиционирования на объект на карте.
'Получаем запросом длины участков слоя тепловой сети и выводим их в табличном виде Sub PrintDataset 'Получаем объект для вывода в окно сообщений Set Out = Zulu.OpenOutputChannel("") 'Очищаем окно сообщений Out.Clear 'Создаем объект слоя Set L1 = CreateObject("ZuluLib.Layer") 'Открываем слой на сервере zs.zulugis L1.Open "zulu://zs.zulugis.ru:6473/Termo/Kvartal/teplosam.zl" 'Запрашиваем значения полей Sys и L для объектов с типом 6 Set res = L1.ExecSQL("Select SYS,L WHERE typeid = 6") if res.RetCode = 0 then 'выводим результаты запроса с точностью до второго знака после запятой в табличном виде с рамками таблицы Out.PrintDataset res.DataSet, 2 + &H100 End IF End Sub