You can use TIB_Script.OnStatement event or TIB_Script.CurrentSQL
property...

Example:

var LastStatement:String; // may be global variable or privacy in you
form
ErrorFlag:boolean;

Procedure TMyScript.OnStatement(Sender:TIB_Script; var Statement:String; var
SkipIt:boolean);
begin
LastStatement:=Statement;
SkipIt:=ErrorFlag; // for skip all next lines
end;

Procedure TMyScript.OnError(................);
begin
..........
ErrorFlag:=True;
.........
end;


After error in LastStatement must be line with error...

WBR, Dmitry Beloshistov AKA [-=BDS=-]
e-mail: torin@...

----- Original Message -----
From: "Tobias Giesen" <tobias_subscriber@...>
To: <IBObjects@yahoogroups.com>
Sent: Wednesday, August 22, 2001 11:28 PM
Subject: [IBO] Debugging scripts


> Hi!
>
> I have a huge DDL script (TIB_Script). I reordered some things, and now it
> returns an error message, to the effect, "error error blah error foreign
key
> error preserve data integrity error error trigger". No line number. No
table
> name ;=(
>
> How on earth could I know what line of the script, or which table
definition
> causes this error?
>
> Thanks.
>
> Cheers,
> Tobias
>