ViewVC Help

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

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

Comparing ibx/trunk/runtime/IBUpdateSQL.pas (file contents):
Revision 7 by tony, Sun Aug 5 18:28:19 2012 UTC vs.
Revision 80 by tony, Mon Jan 1 11:31:07 2018 UTC

#	Line 106 | Line 106 | begin
106		with Query[UpdateKind] do
107		begin
108		ExecQuery;
109	<	if RowsAffected <> 1 then IBError(ibxeUpdateFailed, [nil]);
109	>	//    if RowsAffected <> 1 then IBError(ibxeUpdateFailed, [nil]);
110	>	// Commented out in release 1.2
111		end;
112		end;
113
#	Line 182 | Line 183 | procedure TIBUpdateSQL.Apply(UpdateKind:
183		begin
184		if not Assigned(FDataSet) then Exit;
185		InternalPrepare(UpdateKind);
186	<	InternalSetParams(Query[UpdateKind],buff);
186	>	InternalSetParams(Query[UpdateKind].Params,buff);
187		ExecSQL(UpdateKind);
188		end;
189

Diff Legend

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