I am running some routine database where the program on startup interrogates the
database and updates fields if it as an old version. Adding Tables and Fields
works fine.
Also in one case I want to do an INSERT statement and this does now work.
This is using D2007/IB and TIBQuery component, and all commands are executed
using statements like
IBQuery1.SQL.text:='INSERT INTO SECTOR (ID, SECTORDESC) VALUES (1001,'
+Quotedstr(Desc1)+')';
try
IBTransaction1.StartTransaction;
IBQuery1.SQL.Execute;
Status:='OK';
except
Status:='error';
end;
if IBTransaction1.InTransaction then IBTransaction1.commit;
The same structure works for adding a table and ALTER TABLE (adding fields), and
does as expected, but not for the INSERT. The Status is set to OK - the except
is not triggered. But no INSERT is done. As far as I can see all Commits are
done.
Anyone have an idea why the INSERT statements are not working?
John Bird
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi@delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-requ...@delphi.org.nz with Subject:
unsubscribe
