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

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

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

Назначение: 
  Вычисляет ID для строк таблиц баз данных (с учетом полного  id базы данных). 
 На вход функции поступает ID типа integer (то, что возвращает генератор).
 Возвращаемое значение - уникальный (в контексте дерева узлов) ID строки таблицы.
Используется для  идентификации сущностей.

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

ALTER PROCEDURE GET_IDTHIS_WITH_NODE_DB (ID INTEGER) RETURNS (ID_THIS VARCHAR(40) CHARACTER SET WIN1251) AS DECLARE VARIABLE IDNODE VARCHAR(4); DECLARE VARIABLE IDDB VARCHAR(2); DECLARE VARIABLE DELIMITER_IDNODE VARCHAR(1); DECLARE VARIABLE DELIMITER_IDDB VARCHAR(1); BEGIN /* Вычислить значение ID_THIS с учетом ID узла и id-DB */ EXECUTE PROCEDURE GET_DELIMITER_IDNODE RETURNING_VALUES :DELIMITER_IDNODE; EXECUTE PROCEDURE GET_DELIMITER_IDDB RETURNING_VALUES :DELIMITER_IDDB; EXECUTE PROCEDURE GET_ID_THISNODE RETURNING_VALUES :IDNODE; EXECUTE PROCEDURE GET_ID_THISDB RETURNING_VALUES :IDDB; ID_THIS = :IDNODE || :DELIMITER_IDNODE || :IDDB || :DELIMITER_IDDB || :ID; SUSPEND; END

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

http://flexiobjdb.narod.ru