USP_DATAFORMTEMPLATE_EDITLOAD_R68ONLINESETTINGS

Parameters

Parameter	Parameter Type	Mode
@SETTINGSID	uniqueidentifier	INOUT
@ORGANISATION	nvarchar(160)	INOUT
@DATALOADED	bit	INOUT
@TSLONG	bigint	INOUT
@CURRENTAPPUSERID	uniqueidentifier	IN
@CCRNID	uniqueidentifier	INOUT
@REGULATORCODE	tinyint	INOUT
@OTHERREGULATORNAME	nvarchar(160)	INOUT
@REGULATORNUMBER	nvarchar(20)	INOUT
@SENDERINFO	xml	INOUT
Definition

Copy

                    CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDITLOAD_R68ONLINESETTINGS
                    (
                        @SETTINGSID uniqueidentifier = null output,
                        @ORGANISATION nvarchar(160) = null output,
                        @DATALOADED bit = 0 output,
                        @TSLONG bigint = 0 output,
                        @CURRENTAPPUSERID uniqueidentifier,
                        @CCRNID uniqueidentifier = null output,
                        @REGULATORCODE tinyint = null output,
                        @OTHERREGULATORNAME nvarchar(160) = null output,
                        @REGULATORNUMBER nvarchar(20) = null output,
                        @SENDERINFO xml = null output
                    )
                    as
                    begin
                        set nocount on;
                        set @TSLONG = 0;

                        select
                            @SETTINGSID = R68ONLINESUBMISSIONSETTINGS.ID,
                            @TSLONG = R68ONLINESUBMISSIONSETTINGS.TSLONG,
                            @ORGANISATION = R68ONLINESUBMISSIONSETTINGS.ORGANISATION,
                            @CCRNID = R68ONLINESUBMISSIONSETTINGS.CCRNID,
                            @REGULATORCODE = R68ONLINESUBMISSIONSETTINGS.REGULATORCODE,
                            @OTHERREGULATORNAME = R68ONLINESUBMISSIONSETTINGS.OTHERREGULATORNAME,
                            @REGULATORNUMBER = R68ONLINESUBMISSIONSETTINGS.REGULATORNUMBER
                        from
                            dbo.R68ONLINESUBMISSIONSETTINGS  

                        -- Open the symmetric key for encryption
                        exec dbo.USP_GET_KEY_ACCESS; 

                        set @SENDERINFO = (
                            select ID,
                                    USERID,
                                    case when len(coalesce(convert(nvarchar(50), DecryptByKey(PASSWORD)), '')) > 0 then N'Qha8$2Jgs!' else '' end as PASSWORD,
                                    PASSWORDHASH,
                                    TYPECODE as TYPE,
                                    ISTRUSTEE,
                                    TRUSTEENAME,
                                    OFFICIALTITLE,
                                    OFFICIALFORENAME,
                                    OFFICIALSURNAME,
                                    PHONENUMBER,
                                    ISOVERSEAS,
                                    POSTCODE
                            from dbo.R68ONLINESUBMISSIONSETTINGSSENDERINFO
                            where R68ONLINESUBMISSIONSETTINGSSENDERINFO.R68ONLINESUBMISSIONSETTINGSID = @SETTINGSID
                            for xml raw('ITEM'),type,elements,root('SENDERINFO'), binary base64
                        )

                        close symmetric key sym_BBInfinity;

                        -- Record might not exist yet, but that's ok.
                        set @DATALOADED = 1;

                        return 0;
                    end