> finally
> IB_Transaction1.Commit;
> dsql.EndBusy;
> end;

Please don't put a Commit in a finally block. That just doesn't set well
with me for some reason.

Put it before or after. I also suggest that you catch an exception and do a
rollback.

Here's how I normally do it.

try
dsql.BeginBusy( false );
try
<do all your stuff>
IB_Transaction1.Commit;
except
IB_Transaction1.Rollback;
raise;
end;
finally
dsql.EndBusy;
end;

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com