USP_DATAFORMTEMPLATE_EDITLOAD_R68ONLINESUBMISSIONSETTINGSBYREFERENCENUMBER

Parameters

Parameter	Parameter Type	Mode
@ID	uniqueidentifier	IN
@DATALOADED	bit	INOUT
@TSLONG	bigint	INOUT
@CURRENTAPPUSERID	uniqueidentifier	IN
@ORGANISATION	nvarchar(160)	INOUT
@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_R68ONLINESUBMISSIONSETTINGSBYREFERENCENUMBER
                    (
                        @ID uniqueidentifier,
                        @DATALOADED bit = 0 output,
                        @TSLONG bigint = 0 output,
                        @CURRENTAPPUSERID uniqueidentifier,
                        @ORGANISATION nvarchar(160) = null output,
                        @CCRNID uniqueidentifier = null output,
                        @REGULATORCODE tinyint = null output,
                        @OTHERREGULATORNAME nvarchar(160) = null output,
                        @REGULATORNUMBER nvarchar(20) = null output,
                        @SENDERINFO xml = null output
                    )
                    as

                        set nocount on;

                        set @DATALOADED = 0
                        set @TSLONG = 0

                        select
                            @DATALOADED = 1,
                            @TSLONG = R68ONLINESUBMISSIONSETTINGS.TSLONG,
                            @ORGANISATION = R68ONLINESUBMISSIONSETTINGS.ORGANISATION,
                            @CCRNID = R68ONLINESUBMISSIONSETTINGS.CCRNID,
                            @REGULATORCODE = R68ONLINESUBMISSIONSETTINGS.REGULATORCODE,
                            @OTHERREGULATORNAME = R68ONLINESUBMISSIONSETTINGS.OTHERREGULATORNAME,
                            @REGULATORNUMBER = R68ONLINESUBMISSIONSETTINGS.REGULATORNUMBER
                        from dbo.R68ONLINESUBMISSIONSETTINGS
                        where R68ONLINESUBMISSIONSETTINGS.ID = @ID

                        -- Open the symmetric key for encryption

                        exec dbo.USP_GET_KEY_ACCESS;

                        set @SENDERINFO = (
                            select ID,
                                    USERID,
                                    PASSWORDHASH,
                                    TYPECODE as TYPE,
                                    ISTRUSTEE,
                                    TRUSTEENAME,
                                    OFFICIALTITLE,
                                    OFFICIALFORENAME,
                                    OFFICIALSURNAME,
                                    PHONENUMBER,
                                    ISOVERSEAS,
                                    POSTCODE
                            from dbo.R68ONLINESUBMISSIONSETTINGSSENDERINFO
                            where R68ONLINESUBMISSIONSETTINGSSENDERINFO.R68ONLINESUBMISSIONSETTINGSID = @ID
                            for xml raw('ITEM'),type,elements,root('SENDERINFO'), binary base64
                        )

                        close symmetric key sym_BBInfinity;

                        return 0;