USP_SYSTEMROLE_UPDATEFROMDATALISTLIST

Updates data list permissions for a given system role ID, xml for items updated, and xml for items deleted.

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier IN
@CHANGEAGENTID uniqueidentifier IN
@CHANGEDATE datetime IN
@DATALISTLIST xml IN
@DATALISTLIST_DELETED xml IN

Definition

Copy


create procedure dbo.USP_SYSTEMROLE_UPDATEFROMDATALISTLIST
(
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier,
    @CHANGEDATE datetime,
    @DATALISTLIST xml = null,
    @DATALISTLIST_DELETED xml = null
)
as
begin

    if @CHANGEAGENTID is null  
        exec dbo.USP_CHANGEAGENT_GETORCREATECHANGEAGENT @CHANGEAGENTID output;

    if @CHANGEDATE is null
        set @CHANGEDATE = getdate();

    if @DATALISTLIST is not null
    begin

        declare @DATALISTTABLE table
        (
            ID uniqueidentifier,
            DATALISTCATALOGID uniqueidentifier,
            GRANTORDENY bit
        )
        insert into @DATALISTTABLE
        select
            T.c.value('(ID)[1]','uniqueidentifier') AS 'ID',
            T.c.value('(DATALISTCATALOGID)[1]','uniqueidentifier') AS 'DATALISTCATALOGID',
            T.c.value('(GRANTORDENY)[1]','bit') AS 'GRANTORDENY'
        from @DATALISTLIST.nodes('/DATALISTLIST/ITEM') T(c)

        insert into dbo.SYSTEMROLEPERM_DATALIST 
        (
            SYSTEMROLEID,
            GRANTORDENY,
            ID,
            DATALISTCATALOGID,
            ADDEDBYID,
            CHANGEDBYID,
            DATEADDED,
            DATECHANGED
        )
        select 
            @ID,
            GRANTORDENY,
            ID,
            DATALISTCATALOGID,
            @CHANGEAGENTID,
            @CHANGEAGENTID,
            @CHANGEDATE,
            @CHANGEDATE
        from @DATALISTTABLE as [temp]
        where 
            not exists 
            (
                select ID from dbo.SYSTEMROLEPERM_DATALIST as data 
                where data.ID = [temp].ID
            )

        update dbo.[SYSTEMROLEPERM_DATALIST] set 
            [SYSTEMROLEPERM_DATALIST].GRANTORDENY = temp.GRANTORDENY,
            [SYSTEMROLEPERM_DATALIST].CHANGEDBYID = @CHANGEAGENTID,
            [SYSTEMROLEPERM_DATALIST].DATECHANGED = @CHANGEDATE
        from @DATALISTTABLE as [temp]
        where
            [SYSTEMROLEPERM_DATALIST].ID = [temp].ID and
            [SYSTEMROLEPERM_DATALIST].DATALISTCATALOGID = [temp].DATALISTCATALOGID and
            [SYSTEMROLEPERM_DATALIST].GRANTORDENY <> [temp].GRANTORDENY

    end

    if @DATALISTLIST_DELETED is not null
    begin
        declare @DATALISTTABLE_DELETED table
        (
            ID uniqueidentifier
        )
        insert into @DATALISTTABLE_DELETED
        select
            T.c.value('(ID)[1]','uniqueidentifier') AS 'ID'
        from @DATALISTLIST_DELETED.nodes('/DATALISTLIST_DELETED/ITEM') T(c)


        delete from dbo.[SYSTEMROLEPERM_DATALIST] 
        where 
            [SYSTEMROLEPERM_DATALIST].ID in 
            (
                select ID from @DATALISTTABLE_DELETED
            )

    end

end