Я использовал этот sp_getapplock для блокировки сеанса ресурса.Ниже описана процедура:
CREATE Procedure [dbo].[system-LockProcedure] @procname varchar(200)
AS
--BEGIN TRAN
BEGIN
DECLARE @lockreturn int,
@lockresource varchar(200) --sysname
SELECT @lockresource = @procname
-- The below line will try to acquire an exclusive lock on the PROC for the session, If the Proc is already in execution the @lockreturn value will be > 0
EXEC @lockreturn = sp_getapplock @lockresource, @LockMode = 'Exclusive', @LockOwner = 'Session' , @LockTimeout = 100
Print @lockreturn
IF @lockreturn <> 0
BEGIN
RAISERROR ('Another instance of the procedure is already running', 16, 1)
RETURN
END
-- The Code to be executed goes here. All the core logic of the proc goes here..
Print 'Procedure Execution Started for user: ' + cast (CURRENT_USER as nvarchar(20))+ ' for session: ' + cast (@@SPID as nvarchar(10))
-- This is just to make the system wait for 30 seconds and make sure if there is any concurrent execution triggered will fail
exec @lockresource
Print 'Procedure Execution Ended for user: ' + cast (CURRENT_USER as nvarchar(20))+ ' for session: ' + cast (@@SPID as nvarchar(10))
Print @lockreturn
-- This is to release the lock once the SP code is ran completely
EXEC sp_releaseapplock @lockresource , 'Session'
-- END TRY
END
Мы можем выполнить эту процедуру на вашем локальном компьютере также для проверки.
Когда я выполняю процедуру за один сеанс, если кто-то хочет выполнить это хранилищеПроцедура затем показывает сообщение о том, что оно уже открыто в другом сеансе.При выполнении этой процедуры с именем ресурса, которое также является процедурой Object
EXEC dbo.[system-LockProcedure]'dbo.usp_Test1'
, она работает нормально
EXEC dbo.[system-LockProcedure]'dbo.usp_Test2'
, у которой есть входные параметры, и запрашивает входной параметр
Error :
Msg 201, Level 16, State 4, Procedure USP_Test2, Line 23
Procedure or function 'USP_Test2' expects parameter '@ThreadID', which was not supplied.