USE [Vertragsverwaltung_20160404]
GO
/****** Object:  StoredProcedure [dbo].[sp_copy_securityObjects]    Script Date: 02.12.2016 09:08:53 ******/
DROP PROCEDURE [dbo].[sp_copy_securityObjects]
GO
/****** Object:  StoredProcedure [dbo].[sp_copy_securityObjects]    Script Date: 02.12.2016 09:08:55 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author:		<Author,,Name>
-- Create date: <Create Date,,>
-- Description:	<Description,,>
-- =============================================
CREATE PROCEDURE [dbo].[sp_copy_securityObjects]
@source int,
@dest int,
@mitarbeiternr int
AS
BEGIN
    declare @newkey int
    declare @ec int
    declare @rsnr int
    select * into #tmpa from rolle_securityobject where rollenr=@source and aktiv=1
    declare xc cursor for
       select rolle_securityobjectnr from #tmpa
    open xc
    fetch next from xc into @rsnr
    while @@fetch_status=0 begin
       execute sp_get_dbkey 'Rolle_SecurityObject', @newkey output, @ec output
       update #tmpa set rolle_securityobjectnr = @newkey where rolle_securityobjectnr=@rsnr
       fetch next from xc into @rsnr
    end
    close xc
    deallocate xc
    update #tmpa set rollenr=@dest, erstellt_am=getdate(), mutiert_am=getdate(), mutierer=@mitarbeiternr
    insert rolle_securityobject select * from #tmpa
    drop table #tmpa
END



GO