I have included this fix in the next release of IBO.
If you would like your credits in the sources, please get the beta and
modify the header file with them and then you will receive proper
recognition.

Thanks for your help here.

Jason Wharton

> -----Original Message-----
> From: jensdein [mailto:jens.dein@...]
> Sent: Tuesday, August 17, 2004 2:11 AM
> To: IBObjects@yahoogroups.com
> Subject: [IBO] Re: Datasnap and IBO
>
>
> I am using IBO and datasnap and with some minor changes (that I have
> made the author aware of) it works quite well.
>
> I have made the following small change to the IBODataset.pas
> (enclosed
> in the // JDE comment) to make things work :
>
> function TIBODataSet.PSExecuteStatement( const ASQL: string;
> AParams: TParams;
> ResultSet: pointer = nil ):
> integer;
> var
> FQuery: TIBOQuery;
> begin
> // Potential Multi-threading problem!!!
> FQuery := TIBOQuery.Create( IB_Session );
> try
> FQuery.IB_Connection := IB_Connection;
> FQuery.IB_Transaction := IB_Transaction;
> FQuery.SQL.Text := ASQL;
> FQuery.Prepare;
> // FQuery.FParams.Assign( AParams ); //JDE
>
> // JDE Solves Problems with unnamed params
> if Assigned(AParams) then
> begin
> FQuery.FParams.Assign( AParams );
> FQuery.AssignParamsValues(AParams);
> end;
> // JDE
>
> if Assigned( ResultSet ) then
> FQuery.Open
> else
> FQuery.ExecSQL;
> Result := FQuery.RowsAffected;
> finally
> if Assigned( ResultSet ) then
> TDataSet( ResultSet^ ) := FQuery
> else
> FQuery.Free;
> end;
> end;
>
> --- In IBObjects@yahoogroups.com, "Jens Holtsmark" <jens@h...> wrote:
> > Does anybody have practical general experience with using Datasnap
> > and IBO in conjunction?
> >
> > Is this a good combination that works great? Or should I choose
> > another combination?
> >
> > Kind regards
> >
> > Jens Holtsmark