77 lines
3.2 KiB
Transact-SQL
77 lines
3.2 KiB
Transact-SQL
IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[sp_TestObjectsDelete]') AND type in (N'P', N'PC'))
|
||
DROP PROCEDURE [dbo].[sp_TestObjectsDelete]
|
||
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_TestObjectsDelete]') AND type in (N'P', N'PC'))
|
||
BEGIN
|
||
EXEC dbo.sp_executesql @statement = N'CREATE PROCEDURE [dbo].[sp_TestObjectsDelete] AS'
|
||
END
|
||
GO
|
||
ALTER PROCEDURE [dbo].[sp_TestObjectsDelete]
|
||
@TestObjectId int = 0
|
||
,@TestObjectName nvarchar(50) = null
|
||
,@errorNumber int output
|
||
,@errorMessage nvarchar(250) output
|
||
AS
|
||
BEGIN
|
||
set @errorNumber = 0; set @errorMessage = space(0);
|
||
begin try
|
||
if(@TestObjectId = 0)
|
||
begin
|
||
set @TestObjectId = dbo.foo_IdGetTestObject(@TestObjectName)
|
||
end
|
||
|
||
begin transaction tDeleteTestObjects
|
||
|
||
exec [dbo].[sp_TestObjectHardwareDelete] @TestObjectId, @TestObjectName, @errorNumber output, @errorMessage output
|
||
|
||
exec [dbo].[sp_TestObjectChannelSettingsDelete] @TestObjectId, @TestObjectName, null, @errorNumber output, @errorMessage output
|
||
|
||
exec [dbo].[sp_TestObjectSensorsDelete] @TestObjectId, @TestObjectName, null, @errorNumber output, @errorMessage output
|
||
|
||
delete from [dbo].[TestObjects] where (@TestObjectName is null or TestObjectName = @TestObjectName)
|
||
|
||
commit transaction tDeleteTestObjects
|
||
end try
|
||
begin catch
|
||
set @errorMessage = error_message()
|
||
set @errorNumber = error_number()
|
||
rollback transaction tDeleteTestObjects
|
||
end catch;
|
||
END
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
GO
|