[SOLVED] TOracleSession commits when error occurs

[S]

I am trying to provide my own commit/rollback logic, but when I throw an exception, the Oracle Monitor shows this output:
begin :id := sys.dbms_transaction.local_transaction_id; end;
And a Session.Commit although the session is created with:

FOracleSession := TOracleSession.Create(nil);
  FOracleSession.Name := 'OracleSession';
  FOracleSession.LogonDatabase := Database;
  FOracleSession.LogonUsername := UserName;
  FOracleSession.LogonPassword := Password;
  FOracleSession.ThreadSafe := True;
  FOracleSession.AutoCommit := False;

EDIT:

My bad.

It was after all committed in my own logic - sorry for any inconvenience.