ViewVC Help

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

root/public/ibx/branches/udr/client/FBAttachment.pas

Comparing ibx/branches/udr/client/FBAttachment.pas (file contents):
Revision 387 by tony, Wed Jan 19 13:34:42 2022 UTC vs.
Revision 388 by tony, Wed Jan 19 13:58:37 2022 UTC

#	Line 1099 | Line 1099 | begin
1099		tr := StartTransaction(TPB,taCommit);
1100		try
1101		ExecImmediate(tr,sql,aSQLDialect);
1102	+	tr.Commit;
1103		except
1104		tr.Rollback(true);
1105		raise;
#	Line 1122 | Line 1123 | begin
1123		tr := StartTransaction(TPB,taCommit);
1124		try
1125		Result := ExecuteSQL(tr,sql,SQLDialect,params);
1126	+	tr.Commit;
1127		except
1128		tr.Rollback(true);
1129		raise;
#	Line 1245 | Line 1247 | begin
1247		tr := StartTransaction([isc_tpb_read,isc_tpb_wait,isc_tpb_concurrency],taCommit);
1248		try
1249		Result := OpenCursorAtStart(tr,sql,FSQLDialect,Scrollable,params);
1250	+	tr.Commit;
1251		except
1252		tr.Rollback(true);
1253		raise;

Diff Legend

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