У меня программа работает в MSSQL 2012 и Delphi 2010. Часто нужно бывает сделать действие в одной транзакции, чтобы в случае какой-нибудь ошибки все изменения базы данных откатились. С MSSQL я работаю через компоненты SDAC 6.11.23.
Это выполняется 2-мя разными способами
1)Через Delphi
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
procedure TActionSrv.Commit_IfNeed(var NewTran: boolean);
begin
if NewTran then Conn1.Commit;
end;
procedure TActionSrv.Rollback_IfNeed(var NewTran: boolean);
begin
if NewTran then Conn1.Rollback;
end;
procedure TActionSrv.StartTransaction_IfNeed(var NewTran: boolean);
begin
NewTran:=not Conn1.InTransaction;
if NewTran then Conn1.StartTransaction;
end;
var
NewTran : boolean;
begin
StartTransaction_IfNeed(NewTran);
try
//Само действие
Commit_IfNeed(NewTran);
except
Rollback_IfNeed(NewTran);
Raise;
end;
end;
2)Только через MSSQL средствами T-SQL
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
begin try
begin tran
--Само действие
commit tran
end try
begin catch
rollback tran
exec aip_Raise
end catch
где
create PROCEDURE [dbo].[aip_Raise]
AS
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;
DECLARE @ErrMsg NVARCHAR(4000), @ErrSeverity int, @ErrState int
Select
@ErrMsg = ERROR_MESSAGE(),
@ErrSeverity = ERROR_SEVERITY(),
@ErrState = ERROR_STATE()
RAISERROR(@ErrMsg,@ErrSeverity,@ErrState)
END
База последнее время сильно разрослась и нагрузка на неё стала большая
и иногда стали возникать ошибки блокировки транзакции
"Превышено время ожидания запроса на блокировку."
При работе с 2-м способом (ч/з T-SQL) были очень, очень редко замечены странности типа не закомиченой транзакции и даже нарушения целостности изменений данных. Но это настолько редко (1 может быть к 100 000) что можно сказать что эти наблюдения практически из области мифов и точным свидетельством служить не могут.
Раньше работа с транзакциями была только через Delphi (1-й способ). Потом стали потихоньку вводить работу через T-SQL.
Недавно я прочитал несколько статей в которых говориться что некоторые исключения (очень сильные, резкие) T-SQL уловить не может и тогда транзакция остается незакомиченной. Даже советовали такие места помещать в динамический SQL а его выполнять в sp_execute которую обрамлять обработко исключений в T-SQL
Скажите пожалуйста, может ли действительно 2-способ (ч/з T-SQL) когда либо оставлять не закомиченные транзакции?
(1-способ (через Delphi) как я понимаю в принципе не может). И стоит ли мне всегда избавляться от этого 2-го способа
