USP_DATAFORMTEMPLATE_EDIT_SOLICITCODE_2

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier IN
@CURRENTAPPUSERID uniqueidentifier IN
@CHANGEAGENTID uniqueidentifier IN
@DESCRIPTION nvarchar(100) IN
@EXCLUSIONCODE tinyint IN
@SITEID uniqueidentifier IN
@CONSENTCODE tinyint IN
@SOLICITCODECHANNELCODE tinyint IN
@COMMENTS nvarchar(255) IN

Definition

Copy


CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_SOLICITCODE_2
(
        @ID uniqueidentifier,
        @CURRENTAPPUSERID uniqueidentifier,
        @CHANGEAGENTID uniqueidentifier = null,
        @DESCRIPTION nvarchar(100),
        @EXCLUSIONCODE tinyint,
        @SITEID uniqueidentifier,
        @CONSENTCODE tinyint,
        @SOLICITCODECHANNELCODE tinyint,
        @COMMENTS nvarchar(255)
)
as

set nocount on;

if @CONSENTCODE <> 0 and @SOLICITCODECHANNELCODE is null
    raiserror('BBERR_CHANNEL_REQURIED', 13, 1)

declare @CURRENTDATE datetime = getdate();

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

if @SITEID is null
    begin 
    if dbo.UFN_SITEREQUIREDFORUSER(@CURRENTAPPUSERID) = 1 
        begin
        raiserror('Site is required.',13,1)
        return
        end
    end 

begin try
    update dbo.SOLICITCODE set
        DESCRIPTION = @DESCRIPTION,
        EXCLUSIONCODE = @EXCLUSIONCODE,
        SITEID = @SITEID,
        CHANGEDBYID = @CHANGEAGENTID,
                DATECHANGED = @CURRENTDATE,
                CONSENTCODE = @CONSENTCODE,
                SOLICITCODECHANNELCODE = isnull(@SOLICITCODECHANNELCODE,0),
                COMMENTS = @COMMENTS
    where ID = @ID;
end try
begin catch
        exec dbo.USP_RAISE_ERROR
        return 1
end catch

return 0;