I wondered if there were more to the fix than that. I was hoping just that
would be it.
You could look at other changes in that file and see if they will also work.
Use BeyondCompare to see them.

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com

-- We may not have it all together --
-- But together we have it all --

----- Original Message -----
From: "Daniel Rail" <daniel@...>
To: <IBObjects@yahoogroups.com>
Sent: Friday, October 04, 2002 4:19 AM
Subject: Re: [IBO] AV in TIBOQuery and TIB_Query


> Just to let you know that it didn't work for me. But, I'll just revert to
> a previous version that this is supposed to work with, for this
> exception. Also, I'll try to take the time to compare the source codes
and
> try to find the cause (I have Beyond Compare to help me). I'll let you
> know when I find something. Does TIB_Query and TIB_Cursor use the same
> code? And, if so then why it would work, prior to the change below, with
> TIB_Cursor and not with TIB_Query?
>
> Thank you for your time and have a nice day.
>
> Daniel Rail
>
> At 03/10/2002 09:16 PM, you wrote:
> >Here is the fix in IBA_Row.imp around line 500:
> >
> >procedure TIB_Row.SetDuplicateBufferPointers;
> >var
> > ii: integer;
> > tmpCol: TIB_Column;
> > tmpS: string;
> >begin
> >// This makes duplicate parameters of same data size bind to the same
place.
> > if Statement.FCombineDuplicateParams and ( RowType = rtParam ) then
> > for ii := 0 to FPSQLDA.sqld - 1 do
> > begin
> > tmpS := Copy( FPSQLDA.sqlvar[ii].relname, 1,
> > FPSQLDA.sqlvar[ii].relname_length );
> > if tmpS <> '' then
> > tmpS := Statement.IB_Connection.mkVarIdent( tmpS ) + '.';
> > tmpS := tmpS + Statement.IB_Connection.mkVarIdent(
> > Copy( FPSQLDA.sqlvar[ii].aliasname, 1,
> > FPSQLDA.sqlvar[ii].aliasname_length ));
> > lastColumnIndex := -1;
> > if GetByName( tmpS, tmpCol ) then
> > if Addr( tmpCol.PSQLVAR^ ) <> Addr( PSQLDA.sqlvar[ii] ) then
> > if SQLTypesEqual( tmpCol.PSQLVAR.SQLType,
> > PSQLDA.sqlvar[ii].sqltype ) then
> > begin
> > FPSQLDA.sqlvar[ii].SQLInd := tmpCol.FPXSQLVAR.SQLInd;
> > FPSQLDA.sqlvar[ii].SQLData := tmpCol.FPXSQLVAR.SQLData;
> > end;
> > end;
> >end;
> >
> >Regards,
> >Jason Wharton
> >CPS - Mesa AZ
> >http://www.ibobjects.com
> >
> >-- We may not have it all together --
> >-- But together we have it all --
> >
> >
> >----- Original Message -----
> >From: "Daniel Rail" <daniel@...>
> >To: <IBObjects@yahoogroups.com>
> >Sent: Thursday, October 03, 2002 4:59 PM
> >Subject: Re: [IBO] AV in TIBOQuery and TIB_Query
> >
> >
> > > At 01/10/2002 04:21 PM, you wrote:
> > > >Fixed, will be in the next sub-release.
> > > >One line of code!!!
> > > >Let me know if you want the code change or if you will just get the
next
> > > >sub-release.
> > >
> > > Could you send me that line of code? Unfortunately, my boss just
asked me
> > > to make a correction in a current production version of our software
and
> > > I'll need that line of code. And, I only made the changes to
circumvent
> > > that bug in the current beta version of our software. Bummer!!! And,
I
> > > don't like switching between component version.
> > >
> > > Thank you and have a nice day.
> > >
> > >
> > > Daniel Rail
> > > Senior System Engineer
> > > ACCRA Group Inc. (www.accra.ca)
> > > ACCRA Med Software Inc. (www.accramed.ca)