USP_DATAFORMTEMPLATE_EDIT_EMAILFINDER

The save procedure used by the edit dataform template "EmailFinder Edit Form".

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.
@NAME	nvarchar(150)	IN	Name
@DESCRIPTION	nvarchar(250)	IN	Description
@SITEID	uniqueidentifier	IN	Site
@PRIMARYCONTACTNAME	nvarchar(250)	IN	Name
@PRIMARYCONTACTEMAIL	UDT_EMAILADDRESS	IN	Email address
@PRIMARYCONTACTPHONE	nvarchar(20)	IN	Phone number
@ALTERNATECONTACTNAME	nvarchar(250)	IN	Name
@ALTERNATECONTACTEMAIL	UDT_EMAILADDRESS	IN	Email address
@ALTERNATECONTACTPHONE	nvarchar(20)	IN	Phone number
@OPTOUTSUBJECT	nvarchar(255)	IN	Subject
@OPTOUTREPLYTO	UDT_EMAILADDRESS	IN	Reply to
@OPTOUTORG	nvarchar(150)	IN	Organization
@OPTOUTADDRESS	nvarchar(300)	IN	Address
@OPTOUTPHONE	nvarchar(150)	IN	Phone
@OPTOUTWEBSITE	nvarchar(150)	IN	Web Site
@OPTOUTMISSION	nvarchar(300)	IN	Mission
@CURRENTAPPUSERID	uniqueidentifier	IN	Input parameter indicating the ID of the current user.
@OPTOUTDEFAULTEMAIL	nvarchar(1024)	IN

Definition

Copy



CREATE procedure dbo.USP_DATAFORMTEMPLATE_EDIT_EMAILFINDER
(
    @ID uniqueidentifier,
    @CHANGEAGENTID uniqueidentifier,    
    @NAME nvarchar(150),
    @DESCRIPTION nvarchar(250),
    @SITEID uniqueidentifier,
    @PRIMARYCONTACTNAME nvarchar(250),
    @PRIMARYCONTACTEMAIL dbo.UDT_EMAILADDRESS,
    @PRIMARYCONTACTPHONE nvarchar(20),
    @ALTERNATECONTACTNAME nvarchar(250),
    @ALTERNATECONTACTEMAIL dbo.UDT_EMAILADDRESS,
    @ALTERNATECONTACTPHONE nvarchar(20),
    @OPTOUTSUBJECT nvarchar(255),
    @OPTOUTREPLYTO dbo.UDT_EMAILADDRESS,
    @OPTOUTORG nvarchar(150),
    @OPTOUTADDRESS nvarchar(300),
    @OPTOUTPHONE nvarchar(150),
    @OPTOUTWEBSITE nvarchar(150),
    @OPTOUTMISSION nvarchar(300),
    @CURRENTAPPUSERID uniqueidentifier,
    @OPTOUTDEFAULTEMAIL nvarchar(1024)
)
as
    set nocount on;

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

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

    if (@SITEID is not null) 
        begin
            if dbo.UFN_SITEALLOWEDFORUSER(@CURRENTAPPUSERID, @SITEID) = 0
                begin
                    raiserror ('ERR_SITE_NOACCESS',13,1);
                    return 1;
                end
        end

    begin try

        update 
            dbo.EMAILFINDER
        set 
            NAME = @NAME,
            DESCRIPTION = @DESCRIPTION,
            SITEID = @SITEID,
            PRIMARYCONTACTNAME = @PRIMARYCONTACTNAME,
            PRIMARYCONTACTEMAIL = @PRIMARYCONTACTEMAIL,
            PRIMARYCONTACTPHONE = @PRIMARYCONTACTPHONE,
            ALTERNATECONTACTNAME = @ALTERNATECONTACTNAME,
            ALTERNATECONTACTEMAIL = @ALTERNATECONTACTEMAIL,
            ALTERNATECONTACTPHONE = @ALTERNATECONTACTPHONE,
            OPTOUTSUBJECT = @OPTOUTSUBJECT,
            OPTOUTREPLYTO = @OPTOUTREPLYTO,
            OPTOUTORG = @OPTOUTORG,
            OPTOUTADDRESS = @OPTOUTADDRESS,
            OPTOUTPHONE = @OPTOUTPHONE,
            OPTOUTWEBSITE = @OPTOUTWEBSITE,
            OPTOUTMISSION = @OPTOUTMISSION,
            OPTOUTDEFAULTEMAIL = @OPTOUTDEFAULTEMAIL,
            CHANGEDBYID = @CHANGEAGENTID,
            DATECHANGED = @CURRENTDATE
        where 
            ID = @ID;
    end try
    begin catch
        exec dbo.USP_RAISE_ERROR;
        return 1;
    end catch

    return 0;