Generator

[fernandobanhos]

When trying to change the value of a generator, I found that it was not changed.

I'm using Firebird 4 with Zeos 8 (trunk)

In the following script: set generator GEN_CODIGO to 99

I already tried using the TZQuery, TZSQLProcessor components and was unsuccessful
I also tried running directly through the connection, without success.

[marsupilami]

There seems to be some weird interaction between the set generator statement and Firebird transactions. The following works for me:

Code: Select all

  Conn.Connect;
  Conn.StartTransaction;
  Conn.ExecuteDirect('set generator TEST to 99');
  Conn.Commit;

[fernandobanhos]

problem solved. You have to use it

StartTransaction and Commit

Example:

Conn.StartTransaction;
Qry. Close;
Qry. SQL. Clear;
Qry. SQL. Add('set generator TEST to 99');
Qry. ExecSQL;
Conn.Commit;

or

Conn.Connect;
Conn.StartTransaction;
Conn.ExecuteDirect('set generator TEST to 99');
Conn.Commit;