USP_MKTNETCOMMUNITYINTEGRATION_SAVE

Saves information required to integrate Blackbaud Direct Marketing and Blackbaud Internet Solutions.

Parameters

Parameter Parameter Type Mode Description
@CHANGEAGENTID uniqueidentifier IN
@NETCOMMUNITYURL UDT_WEBADDRESS IN

Definition

Copy


CREATE procedure dbo.[USP_MKTNETCOMMUNITYINTEGRATION_SAVE]
(
  @CHANGEAGENTID uniqueidentifier,
  @NETCOMMUNITYURL dbo.[UDT_WEBADDRESS]
)
as
  set nocount on;

    declare @CURRENTDATE datetime;

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

    set @CURRENTDATE = getdate();

    begin try
    /* NETCOMMUNITYURL */

        if not exists (select top 1 1 from dbo.[NETCOMMUNITYINTEGRATION] where [ID] = '8E7E8AA7-8443-4680-B413-54EC605DFDAD')
            insert into dbo.[NETCOMMUNITYINTEGRATION]
            (
                [ID],
                [URL],
                [ADDEDBYID],
                [CHANGEDBYID],
                [DATEADDED],
                [DATECHANGED]
            )
            values
            (
                '8E7E8AA7-8443-4680-B413-54EC605DFDAD',
                @NETCOMMUNITYURL,
                @CHANGEAGENTID,
                @CHANGEAGENTID,
                @CURRENTDATE,
                @CURRENTDATE
            );
      else
            update 
                dbo.[NETCOMMUNITYINTEGRATION]
            set
                [URL] = @NETCOMMUNITYURL,
                [DATECHANGED] = @CURRENTDATE,
                [CHANGEDBYID] = @CHANGEAGENTID
            where [NETCOMMUNITYINTEGRATION].[ID] = '8E7E8AA7-8443-4680-B413-54EC605DFDAD';

/*
    if not exists (select top 1 1 from dbo.[SYSTEMROLE] where [ID] = '20374442-385F-4DE1-9080-E6FAED05C382' or [NAME] = N'BBIS Web Service Authorized Accounts')
      insert into dbo.[SYSTEMROLE]
      (
        [ID],
        [NAME],
        [DESCRIPTION],
        [ADDEDBYID],
        [CHANGEDBYID],
        [DATEADDED],
        [DATECHANGED]
      )
      values
      (
        '20374442-385F-4DE1-9080-E6FAED05C382',
        N'BBIS Web Service Authorized Accounts',
        N'Only Windows Accounts in this role can access the BBIS web service endpoint.',
        @CHANGEAGENTID,
        @CHANGEAGENTID,
        @CURRENTDATE,
        @CURRENTDATE
      );
*/      
    end try

  begin catch
      exec dbo.[USP_RAISE_ERROR];
      return 1;
  end catch

  return 0;