USP_DATAFORMTEMPLATE_EDIT_REPORTPARAMETER_PERMISSIONS

The save procedure used by the edit dataform template "Edit Report Parameter Permissions".

Parameters

Parameter	Parameter Type	Mode	Description
@ID	uniqueidentifier	IN	The input ID parameter indicating the ID of the record being edited.
@CHANGEAGENTID	uniqueidentifier	IN	Input parameter indicating the ID of the change agent invoking the procedure.
@SYSTEMROLELIST	xml	IN	System Role List

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_REPORTPARAMETER_PERMISSIONS(
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier = null,    
    @SYSTEMROLELIST xml
) as

    set nocount on;

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

    declare @CURRENTDATE datetime;
    set @CURRENTDATE=getdate();

    begin try

        -- build a temporary table containing the values from the XML, excluding ones where permission is None

        declare @TempTbl table (ID uniqueidentifier, SYSTEMROLEID uniqueidentifier, GRANTORDENY bit)
        insert into @TempTbl 
            select ID, SYSTEMROLEID, GRANTORDENY
            from dbo.UFN_REPORTPARAMETER_GETSYSTEMROLEPERMISSIONSLIST_FROMITEMLISTXML(@SYSTEMROLELIST)
            where (GRANTORDENY = 0) or (GRANTORDENY = 1)

        -- rebuild the system role list

        set @SYSTEMROLELIST = (
            select ID, SYSTEMROLEID, GRANTORDENY
            from @TempTbl
            for xml raw('ITEM'), type, elements, root('SYSTEMROLELIST'), BINARY BASE64
        )

        if @SYSTEMROLELIST is null
      begin

        --Cache CONTEXT INFO CR292749-020408

        declare @contextCache varbinary(128);
        set @contextCache = CONTEXT_INFO();
        if not @CHANGEAGENTID is null
          set CONTEXT_INFO @CHANGEAGENTID;

              delete from dbo.SYSTEMROLEPERM_REPORT where REPORTCATALOGID = @ID

        --Restore CONTEXT INFO CR292749-020408

        if not @contextCache is null
          set CONTEXT_INFO @contextCache; 

      end 
    else
            exec dbo.USP_REPORTPARAMETER_GETSYSTEMROLEPERMISSIONSLIST_UPDATEFROMXML @ID, @SYSTEMROLELIST, @CHANGEAGENTID;

        return 0;

    end try
    begin catch

        exec dbo.USP_RAISE_ERROR;
        return 1;

    end catch