69 lines
3.0 KiB
Plaintext
69 lines
3.0 KiB
Plaintext
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[sp_UserDelete]') AND type in (N'P', N'PC'))
|
|
DROP PROCEDURE [dbo].[sp_UserDelete]
|
|
GO
|
|
SET ANSI_NULLS ON
|
|
GO
|
|
SET QUOTED_IDENTIFIER ON
|
|
GO
|
|
IF NOT EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[sp_UserDelete]') AND type in (N'P', N'PC'))
|
|
BEGIN
|
|
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[sp_UserDelete] AS'
|
|
END
|
|
GO
|
|
ALTER PROCEDURE [dbo].[sp_UserDelete]
|
|
@UserName varchar(50) = null
|
|
,@errorNumber int output
|
|
,@errorMessage nvarchar(250) output
|
|
AS
|
|
BEGIN
|
|
set @errorNumber = 0; set @errorMessage = space(0);
|
|
|
|
declare @UserId int
|
|
|
|
if(@UserName is null)
|
|
begin
|
|
set @errorMessage = 'An invalid parameter or option was specified for procedure'
|
|
set @errorNumber = 15600
|
|
end
|
|
else
|
|
begin
|
|
if(@UserName is not null)
|
|
begin
|
|
set @UserId = dbo.foo_IdGetUser (@UserName)
|
|
end
|
|
|
|
begin transaction [t_DataPROUsers]
|
|
delete from [dbo].[UIItemSettings] where [UserId] = @UserId
|
|
|
|
delete from dbo.UserProperties where UserId = @UserId
|
|
|
|
delete from dbo.Users where [ID] = @UserId
|
|
|
|
delete from dbo.TagAssignments where [ObjectID] = @UserId
|
|
|
|
delete from dbo.UserProperties where [UserId] = @UserId
|
|
|
|
|
|
if(@@error != 0)
|
|
begin
|
|
set @errorNumber = error_number(); set @errorMessage = error_message();
|
|
rollback transaction [t_DataPROUsers]
|
|
end
|
|
else
|
|
begin
|
|
commit transaction [t_DataPROUsers]
|
|
end
|
|
end
|
|
END
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
GO
|