ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/runtime/IBSQL.pas

Comparing ibx/trunk/runtime/IBSQL.pas (file contents):
Revision 31 by tony, Tue Jul 14 15:31:25 2015 UTC vs.
Revision 33 by tony, Sat Jul 18 12:30:52 2015 UTC

#	Line 2311 | Line 2311 | begin
2311		FBOF := True;
2312		FEOF := False;
2313		FRecordCount := 0;
2314	+	if not (csDesigning in ComponentState) then
2315	+	MonitorHook.SQLExecute(Self);
2316		if FGoToFirstRecordOnExecute then
2317		Next;
2318		end;
#	Line 2321 | Line 2323 | begin
2323		Database.SQLDialect,
2324		FSQLParams.AsXSQLDA,
2325		FSQLRecord.AsXSQLDA), True);
2326	+	if not (csDesigning in ComponentState) then
2327	+	MonitorHook.SQLExecute(Self);
2328		(*      if (fetch_res <> 0) and (fetch_res <> isc_deadlock) then
2329		begin
2330		{ Sometimes a prepared stored procedure appears to get
#	Line 2344 | Line 2348 | begin
2348		@FHandle,
2349		Database.SQLDialect,
2350		FSQLParams.AsXSQLDA), True);
2351	+	if not (csDesigning in ComponentState) then
2352	+	MonitorHook.SQLExecute(Self);
2353		end;
2348	–	if not (csDesigning in ComponentState) then
2349	–	MonitorHook.SQLExecute(Self);
2354		FBase.DoAfterExecQuery(self);
2355		//  writeln('Rows Affected = ',RowsAffected);
2356		end;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines