CREATE OR ALTER FUNCTION COUNTER_GET (
    PARAM INTEGER NOT NULL)
RETURNS INTEGER NOT NULL DETERMINISTIC
AS
DECLARE VARIABLE COUNTER INTEGER;
BEGIN
    COUNTER = COALESCE(CAST(RDB$GET_CONTEXT('USER_TRANSACTION', 'COUNTER') AS INTEGER), 0) + 1;
    RDB$SET_CONTEXT('USER_TRANSACTION', 'COUNTER', :COUNTER);

    RETURN :PARAM;
END

SELECT
    R.*
FROM
    RDB$RELATIONS R
WHERE
    R.RDB$RELATION_ID = COUNTER_GET(1)

SELECT RDB$GET_CONTEXT('USER_TRANSACTION', 'COUNTER') FROM RDB$DATABASE

SELECT
    RF.*
FROM
    RDB$RELATION_FIELDS RF
WHERE
    EXISTS(SELECT 1 FROM RDB$RELATIONS R WHERE R.RDB$RELATION_ID = COUNTER_GET(1) AND R.RDB$RELATION_NAME = RF.RDB$RELATION_NAME)

Указание инструкции DETERMINISTIC на самом деле нечто вроде «обещания», что код
функции будет возвращать одно и то же. В данный момент детерминистическая функция
считается инвариантом и работает по тем же принципам, что и другие инварианты. Т.е.
вычисляется и кэшируется на уровне текущего выполнения данного запроса.