EAssertionFailed 'Assertion failure (D:\Projects\Delphi\Sdac\Source\MSAccess.pas, line 3496)'

B4rT · Post by **B4rT** » Mon 17 Jan 2005 11:55

I'm using SDAC 3 (History.txt: 3.00.2.9 23.11.04) with Delphi 6 and I have problem with TMSStoredProc component.

When I'm opening stored procedure (by using TMSStoredProc component) for the second time and one of it's params changed the following error shows up:
"EAssertionFailed 'Assertion failure (D:\Projects\Delphi\Sdac\Source\MSAccess.pas, line 3496)'"

Closely:
When I'm executing (Open) stored proc for the first time - everything is OK (regardless the param value: TRUE/FALSE).
When I calling stored proc for the second time and param value chenged (from FALSE to TRUE, or from TRUE to FALSE) I have the error.

One more thing:
When I calling the this stored procedure by MSQuery component (by setting sql.text := 'exec ...') - NOT by MSStoredProc component - then everything is fine: subsequent calls executing without errors, even when mentioned parameter value is changing.

Any soluntion?

Ikar · Post by **Ikar** » Mon 17 Jan 2005 12:03

Please supply us exact SDAC version (3.XX.XX.XX).

B4rT · Post by **B4rT** » Mon 17 Jan 2005 12:11

First line of History.txt file in my SDAC folder says: 3.00.2.9 23.11.04

Ikar · Post by **Ikar** » Tue 18 Jan 2005 09:12

We couldn't reproduce the problem.
Please send us complete small sample to demonstrate it and include script to create server objects.

Olivier Olmer · Post by **Olivier Olmer** » Wed 09 Mar 2005 12:00

We have exactly the same problem in our application. In this application 60 users are working and once a week we get this errormessage only at the same computers. It cannot find the fielddescription of a field. We changed also the code a couple lines above, because of sometimes a list out of bounds exception. The problem occurs at the last asser.

See:MSAccess.Pas:
function TCustomMSDataSet.GetFieldDescByField(Field: TField): TOLEDBFieldDesc;
var
i: integer;
begin
...

Assert(Result nil);
//Result := TOLEDBFieldDesc(FIRecordSet.FieldByName(Field.FieldName));
//CompareText Assert(Field.FieldName = Result.Name, Format('Field.FieldName FieldDesc.Name'#13'"%s" "%s"'#13, [Field.FieldName, Result.Name]));
end;

Ikar · Post by **Ikar** » Thu 10 Mar 2005 12:30

This information isn't enough to reproduce an fix the problem. Please send complete small sample to our support email.

Olivier Olmer · Post by **Olivier Olmer** » Wed 23 Mar 2005 08:41

Refreshing in the doafterpost event seems to put the dataset in edit mode and post it again. Some parameters seems to be modified after doing this. Integer field with value null will become 0. We do not know yet if this leeds to this assertion failure.

Devart Forums