VPF::Вывод дерева - Форум программистов

tishaishii

Дата 15.7.2010, 07:58 (ссылка)

(нет голосов)

Загрузка ...

Создатель

Профиль
Группа: Завсегдатай
Сообщений: 1262
Регистрация: 14.2.2006
Где: Москва

Репутация: нет
Всего: 8

Как вывести всё дерево: TREE(ID, ID_PARENT)?

Gluttton

Дата 15.7.2010, 08:20 (ссылка)

(нет голосов)

Загрузка ...

Начинающий

Профиль
Группа: Завсегдатай
Сообщений: 1170
Регистрация: 28.8.2008
Где: Феодосия

Репутация: 7
Всего: 54

Вот похожая тема, возможно поможет.

--------------------

Слава Україні!

Frees

Дата 15.7.2010, 10:51 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 1
Всего: 54

Код


CREATE PROCEDURE GET_TREE (
    PARENTID INTEGER)
RETURNS (
    TREE_ID INTEGER,
    PARENT_ID INTEGER
    NAME VARCHAR(50))
AS
BEGIN
  FOR SELECT T.TREE_ID, T.PARENT_ID, T.NAME
  FROM TABLE_TREE T
  WHERE ((T.PARENT_ID IS NULL) AND (:PARENTID IS NULL)) OR (T.PARENT_ID = :PARENTID)
  ORDER BY T.NAME
  INTO :TREE_ID, :PARENT_ID, :NAME
  DO BEGIN
     SUSPEND;
     /* Рекурсия для каждого листочка */
     FOR SELECT R.TREE_ID, R.PARENT_ID, R.NAME
     FROM GET_TREE( :TREE_ID ) R
     INTO :TREE_ID, :PARENT_ID, :NAME
     DO BEGIN
       SUSPEND;
     END
  END
END

получить все дерево запросом

Код


SELECT * 
FROM GET_TREE(NULL)

Это сообщение отредактировал(а) Frees - 15.7.2010, 10:59

--------------------

Кольцов Виктор Владимирович

tishaishii

Дата 24.7.2010, 17:04 (ссылка)

(нет голосов)

Загрузка ...

Создатель

Профиль
Группа: Завсегдатай
Сообщений: 1262
Регистрация: 14.2.2006
Где: Москва

Репутация: нет
Всего: 8

Спасибо.
Уточняю: вывести всё дерево, если имеется значение TREE.ID, которое не обязательно является корнем дерева.

Akella

Дата 25.7.2010, 15:20 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 20
Всего: 329

можно использовать спец. компоненты, например дерево из DevExpress или вот эти - FibExTree

tishaishii

Дата 29.7.2010, 15:29 (ссылка)

(голосов:1)

Загрузка ...

Создатель

Профиль
Группа: Завсегдатай
Сообщений: 1262
Регистрация: 14.2.2006
Где: Москва

Репутация: нет
Всего: 8

Меня GUI не интересует. На выходе будет RDF.
Интересует подход работы с деревом с учётом особенностей FB, конкретно: один вывод и тот же вывод вне зависимости, на входе корневой или дочерний узел.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Firebird, Interbase \| Следующая тема »