[Instantobjects-cvscommit] Source/Brokers/NexusDbSQL InstantNexusDbSQL.pas,1.3,1.4

[Steven M. <sr...@us...>]

Update of /cvsroot/instantobjects/Source/Brokers/NexusDbSQL
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11316

Modified Files:
	InstantNexusDbSQL.pas 
Log Message:
Removed 'Prepare' code because of changes to IO core.

Index: InstantNexusDbSQL.pas
===================================================================
RCS file: /cvsroot/instantobjects/Source/Brokers/NexusDbSQL/InstantNexusDbSQL.pas,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** InstantNexusDbSQL.pas	18 Feb 2005 08:19:17 -0000	1.3
--- InstantNexusDbSQL.pas	1 Mar 2005 06:39:05 -0000	1.4
***************
*** 135,141 ****
      function GetSQLQuote: Char; override;
      function InternalCreateQuery: TInstantQuery; override;
-     procedure PrepareQuery(DataSet : TDataSet); override;
-     procedure UnprepareQuery(DataSet : TDataSet); override;
-     function ExecuteQuery(DataSet : TDataSet) : integer; override;
      procedure AssignDataSetParams(DataSet : TDataSet; AParams: TParams); override;
    public
--- 135,138 ----
***************
*** 558,574 ****
  end;
  
- function TInstantNexusDbSQLBroker.ExecuteQuery(DataSet: TDataSet) : integer;
- begin
-   //don't call inherited!
-   
-   //CodeSite.EnterMethod('TInstantNexusDbSQLBroker.ExecuteQuery');
-   with TNexusDbQuery(DataSet) do
-   begin
-     ExecSQL;
-     Result := RowsAffected;
-   end;
-   //CodeSite.ExitMethod('TInstantNexusDbSQLBroker.ExecuteQuery');
- end;
- 
  function TInstantNexusDbSQLBroker.GetConnector: TInstantNexusDbSQLConnector;
  begin
--- 555,558 ----
***************
*** 598,613 ****
  end;
  
- procedure TInstantNexusDbSQLBroker.PrepareQuery(DataSet: TDataSet);
- begin
-   inherited;
-   TNexusDbQuery(DataSet).Prepare;
- end;
- 
- procedure TInstantNexusDbSQLBroker.UnprepareQuery(DataSet: TDataSet);
- begin
-   inherited;
-   TNexusDbQuery(DataSet).Unprepare;
- end;
- 
  { TInstantNexusDbSQLQuery }
  
--- 582,585 ----