GdcLBRBTreeMetadata.GetLBRBTreeDependentNames

Модуль: gdcLBRBTreeMetadata.pas

Тип: function

Delphi:

 function GetLBRBTreeDependentNames(const ARelName: String; const ATr: TIBTRansaction;
 out Names: TLBRBTreeMetaNames): Integer;

Описание

Функция возвращает имена объектов метаданных интервального дерева для заданной таблицы и количество зависимых от нее процедур и тригеров.

Параметры

Names

Запись типа gdcLBRBTreeMetadata.TLBRBTreeMetaNames с именами объектов метаданных интервального дерева.

ARelName

Имя таблицы.

ATr

Открытая транзакция. Если не задана, функция вернет -1 и запись Names, заполненную пустыми строками.

Функция возвращает количество зависимых от указанной таблицы процедур и тригеров.

Пример использования

<syntaxhighligh lang="delphi"> ... procedure TgdcLBRBTreeTable.DropTable; var

 ...
 Names: TLBRBTreeMetaNames;

begin

 if GetLBRBTreeDependentNames(FieldByName('relationname').AsString, ReadTransaction, Names) > 3 then  // 3 SP
   raise EgdcIBError.Create('Нельзя удалить таблицу т.к. она используется в процедурах или представлениях');

... </syntaxhighlight>