Devart Forums

Hello,

we have one strange situation where, when we activate a TOraQuery we get the error Message
"Exception class N_61 unknown error 1"

The procedure is very simple.

Is this a ODAC internal error?

Regards
Andreas


function GetUserData(Feld: String): String;
var
qrUserData: TOraQuery;
begin

qrUserData := TOraQuery.Create(nil);

qrUserData.SQL.Text := 'SELECT * ' +
'FROM BENUTZER BE ' +
'LEFT OUTER JOIN KRANKENHAUS KH ON KH.KODEX = BE.KRAN_KODE ' +
'WHERE UPPER(BE.BENUTZER) = :pBenutzer ' +
'AND upper(BE.APPLIKATION) = :pApplikation';
qrUserData.ParamByName('pBenutzer').AsString := AnsiUpperCase(GetUser);
qrUserData.ParamByName('pApplikation').AsString := AnsiUpperCase(Application.Name);
qrUserData.Active := True; <<< generates Error


Result := qrUserData.FieldByName(Feld).AsString;

qrUserData.Active := False;

qrUserData.Free;

end;

Hello,

We can't reproduce the problem on the latest ODAC version 9.5.16. Please try to reproduce the problem on the latest ODAC version http://www.devart.com/odac/download.html and let us know the result.

Hello,

I installed the last version and now the class in the error Message changed to EDBerror

As I wrote the same delphi function is called many time in different places and it also works with all other records in this form.

Regards
Andreas

Hello,

my colleague found the error. It was not related to ODAC ( sorry ) but was a overflow of a array that triggered the error when we set the query to active

Sorry for the disturbance and thank you for your help
Andreas

If you have any further questions, feel free to contact us.