Assertion Failure (...\Memdata.pas, Line 6333) with OnNewRecord

cis-wurzen · Post by **cis-wurzen** » Wed 14 Sep 2005 08:12

ODAC 5.55.1.22

I've got an assertion at MemData.pas, in line 6333 when I
close a SmartQuery after an insert is abortet in OnNewRecord.
This error is raised in every Version 5.x, but also in the latest
ODAC-Version of 4.50. With BDE it works fine. Server is
Oracle 9.2.0.6 with patch 4015165. The Client doesn't matter.

I've reported this bug allready in February 2005.

Code: Select all

procedure TfmOdacAssertionBug.TestClick(Sender: TObject);
begin
  OdacSession.Close;
  OdacSession.UserName := edUsername.Text;
  OdacSession.Password := edPassword.Text;
  OdacSession.Server   := edDatabase.Text;
  OdacSession.Open;
  try
    qrODAC.Open;
    qrODAC.Insert; //Insert aborts in OnNewRecord
  finally
    qrODAC.Close;  //assertion is raised at MemData.pas, line 6333 because ODAC-Library are compiled with assertions
  end;             //second butonpress brings acception (programm needs restart) 
end;

procedure TfmOdacAssertionBug.qrODACOnNewRecord(DataSet: TDataSet);
begin
  // do something (ask user etc.)
  
  SysUtils.Abort; //at some conditions it's necessary to break here
end;

Alex · Post by **Alex** » Wed 14 Sep 2005 12:48

Sorry, we cannot reproduce your problem. We need more detailed description.
Please send us complete sample to demonstrate your problem and script to create server objects.
Please, send a message to our ODAC support e-mail address.

cis-wurzen · Post by **cis-wurzen** » Wed 14 Sep 2005 13:43

The Error occurs only if you have at least 1 record in the query and after calling an abort in the OnNewRecord-Event.
The error is then raised when you close the query.

I've just sent the mail with sample code to [email protected].

Alex · Post by **Alex** » Fri 16 Sep 2005 09:05

Thank you for information. We have reproduced your problem and fixed it. This fix will be included in the
next ODAC build.