Files
DP44/DataPRO_sql/dbo.sp_UsersDelete.StoredProcedure.sql
2026-04-17 14:55:32 -04:00

85 lines
3.4 KiB
Transact-SQL
Raw Permalink Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
USE [DataPRO]
GO
/****** Object: StoredProcedure [dbo].[sp_UsersDelete] Script Date: 6/25/2019 8:49:37 AM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[sp_UsersDelete]
@UserName nvarchar(50) = null
,@UserId int = null
,@errorNumber int output
,@errorMessage nvarchar(250) output
AS
BEGIN
set @errorNumber = 0; set @errorMessage = space(0);
if(@UserName is null and @UserId is null)
begin
set @errorMessage = 'An invalid parameter or option was specified for procedure'
set @errorNumber = 15600
end
else
begin
--If we don't have a UserId, get one based on the UserName, otherwise ignore the UserName
if(@UserId is null and @UserName is not null)
begin
--This assumes that the caller knows that there will not be duplicate UserNames
--(if the possiblity of duplicates exists, the caller should pass the UserId instead)
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.LastUsedHardware where [UserId] = @UserId
delete from dbo.LockedItems where [DataPROUserID] = @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