Дата актуальности: 20.06.2009

FlexiObjDB
Объектно-ориентированное на предметную область 
долговременное хранилище информации.

 Хранимая процедура: GET_ID_THISDB_FULL

Назначение: 
  Возвращает полный уникальный идентификатор Базы Данных в контексте "дерева" узлов.
Используется для  идентификации сущностей.   

Текст процедуры :

ALTER PROCEDURE GET_ID_THISDB_FULL RETURNS (ID_DB VARCHAR(7) CHARACTER SET WIN1251) AS DECLARE VARIABLE IDNODE VARCHAR(4); DECLARE VARIABLE IDDB VARCHAR(2); DECLARE VARIABLE DELIMITER_IDNODE VARCHAR(1); BEGIN /* Полный ID базы данных (в контексте дерева узлов) */ EXECUTE PROCEDURE GET_DELIMITER_IDNODE RETURNING_VALUES :DELIMITER_IDNODE; EXECUTE PROCEDURE GET_ID_THISNODE RETURNING_VALUES :IDNODE; EXECUTE PROCEDURE GET_ID_THISDB RETURNING_VALUES :IDDB; ID_DB = :IDNODE || :DELIMITER_IDNODE || :IDDB; SUSPEND; END

______________________________________
(c) Sergey Popov,  респ.Коми,  г.Усинск,(2009)

http://flexiobjdb.narod.ru