USP_DATAFORMTEMPLATE_EDIT_MKTSPONSORSHIPMAILINGTEMPLATE_3

CREATE procedure dbo.[USP_DATAFORMTEMPLATE_EDIT_MKTSPONSORSHIPMAILINGTEMPLATE_3]
(
  @ID uniqueidentifier,
  @CURRENTAPPUSERID uniqueidentifier,
  @CHANGEAGENTID uniqueidentifier = null,
  @CODE nvarchar(10),
  @NAME nvarchar(50),
  @DESCRIPTION nvarchar(255),
  @SITEID uniqueidentifier,
  @SOURCECODEID uniqueidentifier,
  @ITEMLIST xml,
  @EXCLUSIONDATETYPECODE tinyint,
  @EXCLUSIONASOFDATE datetime,
  @EXCLUDEDECEASED bit,
  @EXCLUDEINACTIVE bit,
  @EXCLUSIONS xml,
  @USEADDRESSPROCESSING bit,
  @ADDRESSPROCESSINGOPTIONID uniqueidentifier,
  @NAMEFORMATPARAMETERID uniqueidentifier,
  @ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE tinyint,
  @ADDRESSPROCESSINGOPTIONSEASONALASOFDATE datetime,
  @ACTIVATIONKPIS xml,
  @USEKPISASDEFAULT bit,
  @APPEALINFORMATION xml,
  @RUNACTIVATEANDEXPORT bit,
  @EXPORTDESCRIPTION nvarchar(255),
  @MAILEXPORTDEFINITIONID uniqueidentifier,
  @EMAILEXPORTDEFINITIONID uniqueidentifier,
  @PHONEEXPORTDEFINITIONID uniqueidentifier,
  @CODEVALUEID uniqueidentifier,
  @RUNSEGMENTATIONSEGMENTREFRESHPROCESS bit,
  @CACHESOURCEANALYSISRULEDATA bit,
  @RUNMARKETINGEXCLUSIONSREPORT bit
)
as
  set nocount on;

  declare @CURRENTDATE datetime;
  declare @CURRENTSITEID uniqueidentifier;
  declare @OLDSOURCECODEID uniqueidentifier;
  declare @SPONSORSHIPMAILINGPROCESSID uniqueidentifier;

  if exists(select top 1 1 from dbo.[MKTSPONSORSHIPMAILINGTEMPLATERULE] where [SPONSORSHIPMAILINGTEMPLATEID] = @ID) or
     exists(select top 1 1 from dbo.[MKTSPONSORSHIPMAILINGTEMPLATESEED] where [SPONSORSHIPMAILINGTEMPLATEID] = @ID)
    begin
      select @CURRENTSITEID = [SITEID] from dbo.[MKTSPONSORSHIPMAILINGTEMPLATE] where [ID] = @ID;

      if (@CURRENTSITEID <> @SITEID or (@CURRENTSITEID is null and @SITEID is not null) or (@CURRENTSITEID is not null and @SITEID is null))
        begin
          raiserror('Site may not be changed on an sponsorship effort template that is in use or has dependencies.', 13, 1);
          return 1;
        end
    end

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

    select
      @OLDSOURCECODEID = [SOURCECODEID],
      @CURRENTDATE = getdate()
    from dbo.[MKTSPONSORSHIPMAILINGTEMPLATE]
    where [ID] = @ID;

    /* update the sponsorship mailing template fields */
    update dbo.[MKTSPONSORSHIPMAILINGTEMPLATE] set
      [CODE] = @CODE,
      [PARTDEFINITIONVALUESID] = @CODEVALUEID,
      [NAME] = @NAME,
      [DESCRIPTION] = @DESCRIPTION,
      [SITEID] = @SITEID,
      [SOURCECODEID] = @SOURCECODEID,
      [USEADDRESSPROCESSING] = @USEADDRESSPROCESSING,
      [ADDRESSPROCESSINGOPTIONID] = @ADDRESSPROCESSINGOPTIONID,
      [NAMEFORMATPARAMETERID] = @NAMEFORMATPARAMETERID,
      [ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE] = @ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE,
      [ADDRESSPROCESSINGOPTIONSEASONALASOFDATE] = @ADDRESSPROCESSINGOPTIONSEASONALASOFDATE,
      [RUNACTIVATEANDEXPORT] = @RUNACTIVATEANDEXPORT,
      [RUNSEGMENTATIONSEGMENTREFRESHPROCESS] = @RUNSEGMENTATIONSEGMENTREFRESHPROCESS,
      [CACHESOURCEANALYSISRULEDATA] = @CACHESOURCEANALYSISRULEDATA,
      [RUNMARKETINGEXCLUSIONSREPORT] = @RUNMARKETINGEXCLUSIONSREPORT,
      [CHANGEDBYID] = @CHANGEAGENTID,
      [DATECHANGED] = @CURRENTDATE
    where [ID] = @ID;

    /* save the sourcecode parts */
    exec dbo.[USP_MKTSPONSORSHIPMAILINGTEMPLATESOURCECODEPART_GETITEMLIST2_UPDATEFROMXML] @ID, @ITEMLIST, @CHANGEAGENTID, @CURRENTDATE;

    /* update any rule codes in this template with their base segment codes */
    if isnull(cast(@OLDSOURCECODEID as varchar(36)), '') <> isnull(cast(@SOURCECODEID as varchar(36)), '')
      update dbo.[MKTSPONSORSHIPMAILINGTEMPLATERULE] set
        [CODE] = (case when @SOURCECODEID is null then '' else [MKTSEGMENT].[CODE] end),
        [CHANGEDBYID] = @CHANGEAGENTID,
        [DATECHANGED] = @CURRENTDATE
      from dbo.[MKTSPONSORSHIPMAILINGTEMPLATERULE] as [RULE]
      inner join dbo.[MKTSEGMENT] on [MKTSEGMENT].[ID] = [RULE].[SEGMENTID]
      where [RULE].[SPONSORSHIPMAILINGTEMPLATEID] = @ID;

    /* save the contact rules/communication preferences for the sponsorship mailing business process */
    select
      @SPONSORSHIPMAILINGPROCESSID = [ID]
    from dbo.[MKTSPONSORSHIPMAILINGPROCESS]
    where [SPONSORSHIPMAILINGTEMPLATEID] = @ID;

    exec dbo.[USP_BUSINESSPROCESSCOMMPREF_UPDATE]
      @CHANGEAGENTID = @CHANGEAGENTID,
      @BUSINESSPROCESSCATALOGID = '854A7703-89D1-4EF7-A7C6-B8836A887092',
      @BUSINESSPROCESSPARAMETERSETID = @SPONSORSHIPMAILINGPROCESSID,
      @EXCLUSIONDATETYPECODE = @EXCLUSIONDATETYPECODE,
      @EXCLUSIONASOFDATE = @EXCLUSIONASOFDATE,
      @EXCLUDEDECEASED = @EXCLUDEDECEASED,
      @EXCLUDEINACTIVE = @EXCLUDEINACTIVE,
      @EXCLUSIONS = @EXCLUSIONS,
      @CURRENTAPPUSERID = @CURRENTAPPUSERID;

    /* Save KPIs */   
    exec dbo.[USP_MKTSPONSORSHIPMAILINGTEMPLATEKPI_SAVEFIELD]
      @ID,
      @ACTIVATIONKPIS,
      @USEKPISASDEFAULT,
      @CHANGEAGENTID;

    /* Save appeal information */
    exec dbo.[USP_MKTSPONSORSHIPMAILINGTEMPLATEAPPEAL_SAVEFIELD]
      @ID,
      @APPEALINFORMATION;

   /* Save export information */
   exec dbo.[USP_MKTSPONSORSHIPMAILINGTEMPLATEEXPORT_SAVEFIELD]
     @ID,
     @EXPORTDESCRIPTION,
     @MAILEXPORTDEFINITIONID,
     @EMAILEXPORTDEFINITIONID,
     @PHONEEXPORTDEFINITIONID;
  end try

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

  return 0;