В базе FB205 3диалект из программы создаю структуру

    if not FIBDomainExist(MDB, 'IBR$DSMALLINT') then
    begin
TSQL.SQL.Text := 'CREATE DOMAIN IBR$DSMALLINT AS SMALLINT DEFAULT 0 NOT NULL';
      TSQL.ExecQuery;
    end;
...
    if not FIBDomainExist(MDB, 'IBR$NUM15_2') then
    begin
      TSQL.SQL.Text := 'CREATE DOMAIN IBR$NUM15_2 AS NUMERIC(15,2)';
      TSQL.ExecQuery;
    end;

Целая куча всего выполняется, а на последнем выдает
FIBInterBaseError with message 'The insert, update, delete, ddl or authorization statement cannot
be executed because the transact on is inquiry only.
Dynamic SQL Error.
SQL error code = -817.
Metadata update statement is not allowed by the current database SQL dialect 3.

В чем заноза и как разрулить
Рыболовлев Юрий
--

Ответить