create procedure sys.sp_MSreleaseFixPALRoleAppLock
as
begin
set nocount on
declare @retcode smallint
declare @lock_resource nvarchar(255)
declare @DbPrincipal sysname
/*
** Security Check.
*/
exec @retcode = sys.sp_MSreplcheck_publish
if @retcode<>0 or @@error<>0
return 1
select @retcode = 0
-- use the dbowner role
select @DbPrincipal = N'db_owner'
select @lock_resource = N'MSinternal_repl_Fix_PAL_' + convert(nvarchar(6), db_id())
exec @retcode = sp_releaseapplock @Resource = @lock_resource, @LockOwner = N'Session', @DbPrincipal = @DbPrincipal
if @@error<>0 or @retcode<0
return 1
else
return 0
end