At 03:30 PM 11/09/2006, you wrote:

>I have an integer variable "VAR_PVERSION_ID" that I want to pass to an
>insert query so that the column "PVERSION_ID" can receive it at the
>same time as all the other columns are inserted. But I can't figure
>out the syntax. Nothing I try works. Here is the basic insert query:
>
>INSERT INTO LOC(
> /*ID, PK*/
> PVERSION_ID,
> NAME,
> FLOORAREA,
> LOCKD,
> CREATED,
> DESLOCREF,
> LOCQTY)
>VALUES (
> /*:ID,*/
> :PVERSION_ID,
> :NAME,
> :FLOORAREA,
> :LOCKD,
> :CREATED,
> :DESLOCREF,
> :LOCQTY)
>
>I have read that perhaps I should use the OnNewRecord event

Nope. OnNewRecord is an event of a dataset.

>to do
>this. Can anyone please help me with the syntax for doing this?

Assuming you are using a TIB_Cursor or a TIB_DSQL for this (as you
should be, since your statement is a DML statement, i.e. it's one you
*execute*), assign values to your parameters in the BeforeExecute
event. I don't know where you're finding the values for all the
other parameters, but here's how you'll pass the value of your
variable to the 'PVERSION_ID' parameter in this event:

procedure TForm1.IB_Cursor1BeforeExecute(Sender: TIB_Statement);
begin
Sender.ParamByName('PVERSION_ID').AsInteger := VAR_PVERSION_ID;
end;

But, since you have lots of them:

procedure TForm1.IB_Cursor1BeforeExecute(Sender: TIB_Statement);
begin
with Sender.Row do
begin

ByName('PVERSION_ID').AsInteger := VAR_PVERSION_ID;
ByName('NAME').AsString := SomeStringVar;
ByName('FLOORAREA').AsBlah := SomeBlahVar;
ByName('LOCKD').AsWhatever := .....
................and so on
end;

Helen