KeyGen

[rcmz]

I need some samples on using KeyGen with TIBCQuery built in runtime

Where can I get this Info.

TIA
rcmz

[Plash]

Please see the following example:

Code: Select all

  IBCQuery1.SQL.Text := 'select * from emp';
  IBCQuery1.KeyFields := 'empno';
  IBCQuery1.KeyGenerator := 'emp_id';
  IBCQuery1.Open;
 
  IBCQuery1.Insert;
  IBCQuery1.FieldByName('ENAME').AsString := 'AAA';
  IBCQuery1.Post;

[rcmz]

Thanx for your response

But if I use

ibcquery.sql.text := 'INSERT CLIENTS (NAME)'+
'VALUES ('AAA')';
ibcquery.execute;

the id gets a null value but the record gets inserted.

the problem is with the id

TIA
Ramiro[/code]

[Plash]

KeyGenerator property can be used only when you open a SELECT statement, and insert records to this dataset.

If you execute INSERT statement, you should use the generator in this statement:

Code: Select all

INSERT INTO CLIENTS (ID, NAME)
VALUES (NEXT VALUE FOR my_gen, 'AAA')