USP_DATAFORMTEMPLATE_EDIT_MKTSEGMENTWHITEMAIL

The save procedure used by the edit dataform template "White Segment 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.
@QUERYVIEWCATALOGID uniqueidentifier IN Record source
@NAME nvarchar(100) IN Name
@DESCRIPTION nvarchar(255) IN Description
@SEGMENTCATEGORYCODEID uniqueidentifier IN Category
@SEGMENTATIONID uniqueidentifier IN Marketing effort
@STATUSCODE tinyint IN Status
@ACTIVEFROM date IN Active from
@ACTIVETO date IN Active to
@SOURCECODEID uniqueidentifier IN Source code
@SOURCECODEITEMLIST xml IN Source code items
@CODEVALUEID uniqueidentifier IN Code value ID
@CODE nvarchar(10) IN Code
@GROUPS xml IN Groups

Definition

Copy


create procedure dbo.[USP_DATAFORMTEMPLATE_EDIT_MKTSEGMENTWHITEMAIL]
(
  @ID uniqueidentifier,
  @CHANGEAGENTID uniqueidentifier = null,
  @QUERYVIEWCATALOGID uniqueidentifier,
  @NAME nvarchar(100),
  @DESCRIPTION nvarchar(255),
  @SEGMENTCATEGORYCODEID uniqueidentifier,
  @SEGMENTATIONID uniqueidentifier,
  @STATUSCODE tinyint,
  @ACTIVEFROM date,
  @ACTIVETO date,
  @SOURCECODEID uniqueidentifier,
  @SOURCECODEITEMLIST xml,
  @CODEVALUEID uniqueidentifier,
  @CODE nvarchar(10),
  @GROUPS xml
)
as
  set nocount on;

  declare @CURRENTDATE datetime;

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

    exec dbo.[USP_DATAFORMTEMPLATE_EDIT_MKTSEGMENT_2]
      @ID = @ID,
      @CHANGEAGENTID = @CHANGEAGENTID,
      @NAME = @NAME,
      @DESCRIPTION = @DESCRIPTION,
      @SEGMENTCATEGORYCODEID = @SEGMENTCATEGORYCODEID,
      @CODE = @CODE,
      @QUERYVIEWCATALOGID = @QUERYVIEWCATALOGID,
      @SELECTIONS = null,
      @GROUPS = @GROUPS,
      @ALLOWCODEUPDATE = 0,
      @CODEVALUEID = @CODEVALUEID;

    select @CURRENTDATE = [DATECHANGED] from dbo.[MKTSEGMENT] where [ID] = @ID;

    update dbo.[MKTSEGMENTWHITEMAIL] set
      [SEGMENTATIONID] = @SEGMENTATIONID,
      [STATUSCODE] = @STATUSCODE,
      [ACTIVEFROM] = @ACTIVEFROM,
      [ACTIVETO] = @ACTIVETO,
      [SOURCECODEID] = @SOURCECODEID,
      [CHANGEDBYID] = @CHANGEAGENTID,
      [DATECHANGED] = @CURRENTDATE
    where [ID] = @ID;

    exec dbo.[USP_MKTSOURCECODEPART_WHITEMAILSEGMENT_GETITEMLIST_UPDATEFROMXML] @ID, @SOURCECODEITEMLIST, @CHANGEAGENTID, @CURRENTDATE;
  end try

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

  return 0;