USP_DATAFORMTEMPLATE_EDITLOAD_MKTSEGMENTATION_4

The load procedure used by the edit dataform template "Marketing Effort Edit Form 4"

Parameters

Parameter Parameter Type Mode Description
@ID uniqueidentifier IN The input ID parameter used to load the fields defined on the form.
@CURRENTAPPUSERID uniqueidentifier IN Input parameter indicating the ID of the current user.
@DATALOADED bit INOUT Output parameter indicating whether or not data was actually loaded.
@ACTIVE bit INOUT Active
@CODE nvarchar(10) INOUT Code
@NAME nvarchar(100) INOUT Name
@DESCRIPTION nvarchar(255) INOUT Description
@SITEID uniqueidentifier INOUT Site
@SOURCECODEID uniqueidentifier INOUT Source code
@ITEMLIST xml INOUT Items
@ISTESTMAILING tinyint INOUT Is test marketing effort
@MAILDATE datetime INOUT Date
@PLANPATH nvarchar(max) INOUT Plan
@HOUSEHOLDINGTYPECODE tinyint INOUT Include
@ENABLEHOUSEHOLDING bit INOUT Enable householding?
@SITEREQUIRED bit INOUT Site required?
@SITECANBECHANGED bit INOUT Site can be changed?
@MAILINGTYPECODE tinyint INOUT Marketing effort type
@ISBBEC bit INOUT Is BBEC?
@OWNERID uniqueidentifier INOUT Owner ID
@EXCLUSIONDATETYPECODE tinyint INOUT Consider exclusions as of
@EXCLUSIONASOFDATE datetime INOUT Consider exclusions as of
@EXCLUDEDECEASED bit INOUT Exclude deceased constituents
@EXCLUDEINACTIVE bit INOUT Exclude inactive constituents
@EXCLUSIONS xml INOUT Exclusions
@USEADDRESSPROCESSING bit INOUT Use address processing?
@ADDRESSPROCESSINGOPTIONID uniqueidentifier INOUT Address processing options
@NAMEFORMATPARAMETERID uniqueidentifier INOUT Name format options
@ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE tinyint INOUT Consider seasonal addresses as of
@ADDRESSPROCESSINGOPTIONSEASONALASOFDATE datetime INOUT Consider seasonal addresses as of
@CANUPDATEEXCLUDEDECEASED bit INOUT Can update exclude deceased constituents?
@CANUPDATEEXCLUDEINACTIVE bit INOUT Can update exclude inactive constituents?
@TSLONG bigint INOUT Output parameter indicating the TSLONG value of the record being edited. This is used to manage multi-user concurrency issues when multiple users access the same record.
@ACTIVATIONKPIS xml INOUT Activation KPIs
@USEKPISASDEFAULT bit INOUT Use the chosen KPIs as the default for future marketing efforts
@APPEALINFORMATION xml INOUT Appeal information including the appeal searchlist and record source.
@RUNACTIVATEANDEXPORT bit INOUT Export marketing effort when activation completes
@EXPORTDESCRIPTION nvarchar(255) INOUT Export description
@MAILEXPORTDEFINITIONID uniqueidentifier INOUT Mail export definition
@EMAILEXPORTDEFINITIONID uniqueidentifier INOUT Email export definition
@PHONEEXPORTDEFINITIONID uniqueidentifier INOUT Phone export definition
@CODEVALUEID uniqueidentifier INOUT Code value ID
@RUNSEGMENTATIONSEGMENTREFRESHPROCESS bit INOUT Refresh segment selections and filters
@CACHESOURCEANALYSISRULEDATA bit INOUT Capture source analysis rule data
@BUSINESSUNITS xml INOUT Business units
@OVERRIDEBUSINESSUNITS bit INOUT Override appeal business units
@BASECURRENCYID uniqueidentifier INOUT Base currency ID
@EXPORTDEFINITIONRECORDTYPE nvarchar(50) INOUT Export definition record type
@EXPORTDEFINITIONRECORDTYPEID uniqueidentifier INOUT Export definition record type ID
@EXPORTDEFINITIONQUERYVIEWID uniqueidentifier INOUT Export definition query view ID
@ISBBAC bit INOUT
@ISHISTORICAL bit INOUT
@SOURCECODEISHISTORICAL bit INOUT
@RUNMARKETINGEXCLUSIONSREPORT bit INOUT
@SEGMENTUSESADVANCEDNAMEFORMATOPTION bit INOUT
@CHANNELCODE tinyint INOUT
@ALLOWRESERVINGFINDERNUMBERS bit INOUT
@ALLOWSPECIFYBUDGET bit INOUT
@ALLOWEXCLUDEPREVIOUSEFFORTS bit INOUT
@DUEDATE datetime INOUT

Definition

Copy


CREATE procedure dbo.[USP_DATAFORMTEMPLATE_EDITLOAD_MKTSEGMENTATION_4]
(
  @ID uniqueidentifier,
  @CURRENTAPPUSERID uniqueidentifier,
  @DATALOADED bit = 0 output,
  @ACTIVE bit = null output,
  @CODE nvarchar(10) = null output,
  @NAME nvarchar(100) = null output,
  @DESCRIPTION nvarchar(255) = null output,
  @SITEID uniqueidentifier = null output,
  @SOURCECODEID uniqueidentifier = null output,
  @ITEMLIST xml = null output,
  @ISTESTMAILING tinyint = null output,
  @MAILDATE datetime = null output,
  @PLANPATH nvarchar(max) = null output,
  @HOUSEHOLDINGTYPECODE tinyint = null output,
  @ENABLEHOUSEHOLDING bit = null output,
  @SITEREQUIRED bit = null output,
  @SITECANBECHANGED bit = null output,
  @MAILINGTYPECODE tinyint = null output,
  @ISBBEC bit = null output,
  @OWNERID uniqueidentifier = null output,
  @EXCLUSIONDATETYPECODE tinyint = null output,
  @EXCLUSIONASOFDATE datetime = null output,
  @EXCLUDEDECEASED bit = null output,
  @EXCLUDEINACTIVE bit = null output,
  @EXCLUSIONS xml = null output,
  @USEADDRESSPROCESSING bit = null output,
  @ADDRESSPROCESSINGOPTIONID uniqueidentifier = null output,
  @NAMEFORMATPARAMETERID uniqueidentifier = null output,
  @ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE tinyint = null output,
  @ADDRESSPROCESSINGOPTIONSEASONALASOFDATE datetime = null output,
  @CANUPDATEEXCLUDEDECEASED bit = null output,
  @CANUPDATEEXCLUDEINACTIVE bit = null output,
  @TSLONG bigint = 0 output,
  @ACTIVATIONKPIS xml = null output,
  @USEKPISASDEFAULT bit = null output,
  @APPEALINFORMATION xml = null output,
  @RUNACTIVATEANDEXPORT bit = null output,
  @EXPORTDESCRIPTION nvarchar(255) = null output,
  @MAILEXPORTDEFINITIONID uniqueidentifier = null output,
  @EMAILEXPORTDEFINITIONID uniqueidentifier = null output,
  @PHONEEXPORTDEFINITIONID uniqueidentifier = null output,
  @CODEVALUEID uniqueidentifier = null output,
  @RUNSEGMENTATIONSEGMENTREFRESHPROCESS bit = null output,
  @CACHESOURCEANALYSISRULEDATA bit = null output,
  @BUSINESSUNITS xml = null output,
  @OVERRIDEBUSINESSUNITS bit = null output,
  @BASECURRENCYID uniqueidentifier = null output,
  @EXPORTDEFINITIONRECORDTYPE nvarchar(50) = null output,
  @EXPORTDEFINITIONRECORDTYPEID uniqueidentifier = null output,
  @EXPORTDEFINITIONQUERYVIEWID uniqueidentifier = null output,
  @ISBBAC bit = null output,
  @ISHISTORICAL bit = null output,
  @SOURCECODEISHISTORICAL bit = null output,
  @RUNMARKETINGEXCLUSIONSREPORT bit = null output,
  @SEGMENTUSESADVANCEDNAMEFORMATOPTION bit = null output,
  @CHANNELCODE tinyint = null output,
  @ALLOWRESERVINGFINDERNUMBERS bit = null output,
  @ALLOWSPECIFYBUDGET bit = null output,
  @ALLOWEXCLUDEPREVIOUSEFFORTS bit = null output,
  @DUEDATE datetime = null output
)
as
  set nocount on;

  declare @MARKETINGPLANITEMID uniqueidentifier;

  set @DATALOADED = 0;
  set @TSLONG = 0;

  if (select [ACTIVE] from dbo.[MKTSEGMENTATION] where [ID] = @ID) = 0
    begin
      declare @R int;
      exec @R = dbo.[USP_MKTSEGMENTATION_CHECKACTIVATION] @ID;
      if @R <> 0
        return 1;
    end

  select
    @DATALOADED = 1,
    @ACTIVE = [MKTSEGMENTATION].[ACTIVE],
    @NAME = [MKTSEGMENTATION].[NAME],
    @CODE = [MKTSEGMENTATION].[CODE],
    @CODEVALUEID = [MKTSEGMENTATION].[PARTDEFINITIONVALUESID],
    @DESCRIPTION = [MKTSEGMENTATION].[DESCRIPTION],
    @SITEID = [MKTSEGMENTATION].[SITEID],
    @SOURCECODEID = [MKTSEGMENTATION].[SOURCECODEID],
    @ITEMLIST = dbo.[UFN_MKTSOURCECODEPART_GETITEMLIST2_TOITEMLISTXML]([MKTSEGMENTATION].[ID]),
    @ISTESTMAILING = case when [MKTSEGMENTATION].[PARENTSEGMENTATIONID] is null then 0 else 1 end,
    @MAILDATE = [MKTSEGMENTATION].[MAILDATE],
    @PLANPATH = dbo.[UFN_MKTMARKETINGPLANITEM_PATH]([MKTSEGMENTATION].[MARKETINGPLANITEMID], 1),
    @ENABLEHOUSEHOLDING = (case when [MKTSEGMENTATION].[MAILINGTYPECODE] = 1 then 0 else @ENABLEHOUSEHOLDING end),
    @HOUSEHOLDINGTYPECODE = [MKTSEGMENTATION].[HOUSEHOLDINGTYPECODE],
    @MARKETINGPLANITEMID = [MKTSEGMENTATION].[MARKETINGPLANITEMID],
    @MAILINGTYPECODE = [MKTSEGMENTATION].[MAILINGTYPECODE],
    @OWNERID = dbo.[UFN_BUSINESSPROCESSINSTANCE_GETOWNER]('22C3D75C-A956-4BFC-A5FD-4B866BAEF509', [MKTSEGMENTATIONACTIVATEPROCESS].[ID]),
    @EXCLUSIONDATETYPECODE = isnull([BUSINESSPROCESSCOMMPREF].[DATETYPECODE], 0),
    @EXCLUSIONASOFDATE = [BUSINESSPROCESSCOMMPREF].[ASOFDATE],
    @EXCLUDEDECEASED = isnull([BUSINESSPROCESSCOMMPREF].[EXCLUDEDECEASED], 0),
    @EXCLUDEINACTIVE = isnull([BUSINESSPROCESSCOMMPREF].[EXCLUDEINACTIVE], 0),
    @EXCLUSIONS = dbo.[UFN_MKTSEGMENTATION_GETREQUIREDANDSELECTEDSOLICITCODEEXCLUSIONS_TOITEMLISTXML]([MKTSEGMENTATIONACTIVATEPROCESS].[ID]),
    @USEADDRESSPROCESSING = [MKTSEGMENTATION].[USEADDRESSPROCESSING],
    @ADDRESSPROCESSINGOPTIONID = [MKTSEGMENTATION].[ADDRESSPROCESSINGOPTIONID],
    @NAMEFORMATPARAMETERID = [MKTSEGMENTATION].[NAMEFORMATPARAMETERID],
    @ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE = [MKTSEGMENTATION].[ADDRESSPROCESSINGOPTIONSEASONALASOFDATETYPECODE],
    @ADDRESSPROCESSINGOPTIONSEASONALASOFDATE = [MKTSEGMENTATION].[ADDRESSPROCESSINGOPTIONSEASONALASOFDATE],
    @TSLONG = [MKTSEGMENTATION].[TSLONG],
    @RUNACTIVATEANDEXPORT = [MKTSEGMENTATION].[RUNACTIVATEANDEXPORT],
    @EXPORTDESCRIPTION = [MKTSEGMENTATIONEXPORTPROCESS].[DESCRIPTION],
    @MAILEXPORTDEFINITIONID = [MKTSEGMENTATIONEXPORTPROCESS].[MAILEXPORTDEFINITIONID],
    @EMAILEXPORTDEFINITIONID = [MKTSEGMENTATIONEXPORTPROCESS].[EMAILEXPORTDEFINITIONID],
    @PHONEEXPORTDEFINITIONID = [MKTSEGMENTATIONEXPORTPROCESS].[PHONEEXPORTDEFINITIONID],
    @RUNSEGMENTATIONSEGMENTREFRESHPROCESS = [MKTSEGMENTATIONACTIVATEPROCESS].[RUNSEGMENTATIONSEGMENTREFRESHPROCESS],
    @CACHESOURCEANALYSISRULEDATA = [MKTSEGMENTATIONACTIVATEPROCESS].[CACHESOURCEANALYSISRULEDATA],
    @BUSINESSUNITS = dbo.[UFN_MKTSEGMENTATIONBUSINESSUNIT_GETBUSINESSUNITS_TOITEMLISTXML](@ID),
    @OVERRIDEBUSINESSUNITS = [MKTSEGMENTATION].[OVERRIDEBUSINESSUNITS],
    @BASECURRENCYID = [MKTSEGMENTATION].[BASECURRENCYID],
    @ISHISTORICAL = [MKTSEGMENTATION].[ISHISTORICAL],
    @SOURCECODEISHISTORICAL = isnull([MKTSOURCECODE].[ISHISTORICAL], 0),
    @RUNMARKETINGEXCLUSIONSREPORT = [MKTSEGMENTATIONACTIVATEPROCESS].[RUNMARKETINGEXCLUSIONSREPORT],
    @CHANNELCODE = isnull([MKTSEGMENTATION].[CHANNELCODE], 255),
    @ALLOWRESERVINGFINDERNUMBERS = isnull([MKTSEGMENTATION].[ALLOWRESERVINGFINDERNUMBERS], 1),
    @ALLOWSPECIFYBUDGET = isnull([MKTSEGMENTATION].[ALLOWSPECIFYBUDGET], 1),
    @ALLOWEXCLUDEPREVIOUSEFFORTS = isnull([MKTSEGMENTATION].[ALLOWEXCLUDEPREVIOUSEFFORTS], 1),
    @DUEDATE = [MKTSEGMENTATION].[DUEDATE]

  from dbo.[MKTSEGMENTATION]
  left outer join dbo.[MKTSOURCECODE] on [MKTSOURCECODE].[ID] = [MKTSEGMENTATION].[SOURCECODEID]
  inner join dbo.[MKTSEGMENTATIONACTIVATEPROCESS] on [MKTSEGMENTATIONACTIVATEPROCESS].[SEGMENTATIONID] = [MKTSEGMENTATION].[ID]
  left outer join dbo.[BUSINESSPROCESSCOMMPREF] on [BUSINESSPROCESSCOMMPREF].[BUSINESSPROCESSPARAMETERSETID] = [MKTSEGMENTATIONACTIVATEPROCESS].[ID]
  left outer join dbo.[MKTSEGMENTATIONEXPORTPROCESS] on [MKTSEGMENTATIONEXPORTPROCESS].[SEGMENTATIONID] = [MKTSEGMENTATION].[ID]
  where [MKTSEGMENTATION].[ID] = @ID;

  if @DATALOADED = 1
    begin
      set @ISBBEC = (case when dbo.[UFN_INSTALLEDPRODUCTS_PRODUCTIS]('BB9873D7-F1ED-430A-8AB4-F09F47056538') = 0 then 1 else 0 end);
      set @ISBBAC = dbo.[UFN_MKTCOMMON_PRODUCTISALTRU]();

      if @ISBBEC = 1 and @OVERRIDEBUSINESSUNITS = 0
        begin
          declare @APPEALSYSTEMID uniqueidentifier;

          select 
            @APPEALSYSTEMID = convert(uniqueidentifier, [MKTSEGMENTATIONACTIVATE].[APPEALSYSTEMID])
          from dbo.[MKTSEGMENTATIONACTIVATE]
          where [SEGMENTATIONID] = @ID
          and [APPEALSYSTEMID] <> ''
          and dbo.[UFN_MKTRECORDSOURCE_VALIDFORBBEC]([RECORDSOURCEID]) = 1;

          if @APPEALSYSTEMID is not null
            set @BUSINESSUNITS = dbo.[UFN_APPEALBUSINESSUNIT_GETBUSINESSUNITS_TOITEMLISTXML](@APPEALSYSTEMID);
        end

      if @ADDRESSPROCESSINGOPTIONID is null
        select top 1 @ADDRESSPROCESSINGOPTIONID = [ID] from dbo.[ADDRESSPROCESSINGOPTION] where [ISDEFAULT] = 1 and dbo.[UFN_SITEALLOWEDFORUSER](@CURRENTAPPUSERID, [SITEID]) = 1;
      if @NAMEFORMATPARAMETERID is null
        select top 1 @NAMEFORMATPARAMETERID = [ID] from dbo.[NAMEFORMATPARAMETER] where [ISDEFAULT] = 1 and dbo.[UFN_SITEALLOWEDFORUSER](@CURRENTAPPUSERID, [SITEID]) = 1;

      select
        @ENABLEHOUSEHOLDING = (case when sum(case when isnull([MKTRECORDSOURCEFIELDMAPPINGS].[HOUSEHOLDIDFIELD],'') = '' then 0 else 1 end) = 0 then 0 else 1 end)
      from dbo.[MKTRECORDSOURCE]
      left join dbo.[MKTRECORDSOURCEFIELDMAPPINGS] on [MKTRECORDSOURCEFIELDMAPPINGS].[ID] = [MKTRECORDSOURCE].[ID]
      where dbo.[UFN_MKTRECORDSOURCE_VALIDFORPRODUCT]([MKTRECORDSOURCE].[ID]) = 1;

      set @SITEREQUIRED = dbo.[UFN_SITEREQUIREDFORUSERONFEATURE](@CURRENTAPPUSERID, '79096B1C-66AD-496B-95D5-B9BA1C61BA3C', 1);
      set @SITECANBECHANGED = 1; -- obsolete


      set @CANUPDATEEXCLUDEDECEASED = 1;
      set @CANUPDATEEXCLUDEINACTIVE = 1;

      if dbo.[UFN_APPUSER_ISSYSADMIN](@CURRENTAPPUSERID) = 0
        begin
          set @CANUPDATEEXCLUDEDECEASED = dbo.[UFN_SECURITY_APPUSER_GRANTED_SYSTEMPRIVILEGE_IN_SYSTEMROLE](@CURRENTAPPUSERID, '2EEC593D-06B1-49E0-9031-A4076B07081C');
          set @CANUPDATEEXCLUDEINACTIVE = dbo.[UFN_SECURITY_APPUSER_GRANTED_SYSTEMPRIVILEGE_IN_SYSTEMROLE](@CURRENTAPPUSERID, 'C0E02A6F-DF46-460C-ACA2-CC31C9C11BFC');
        end

      declare @KPITABLE as table (
        [KPICATALOGID] uniqueidentifier,
        [SELECTED] bit,
        [NAME] nvarchar(255),
        [GOALTYPECODE] tinyint,
        [DEFAULT] bit,
        [LOCKED] bit,
        [TEMPLATETYPECODE] tinyint
      );

      insert into @KPITABLE
        exec dbo.[USP_MKTSEGMENTATIONACTIVATEKPI_GETFIELDS] @ID, 1, @CURRENTAPPUSERID;

      set @ACTIVATIONKPIS = (
        select 
          [KPICATALOGID],
          [SELECTED],
          [NAME],
          [GOALTYPECODE],
          [DEFAULT]
        from @KPITABLE 
        for xml raw('ITEM'), type, elements, root('ACTIVATIONKPIS'), binary base64);

      -- make sure the appeal name and description are up-to-date in our table

      exec dbo.[USP_MKTSEGMENTATIONACTIVATE_UPDATEAPPEALINFO] @ID;

      -- get appeal search catalog IDs with their record source names

      set @APPEALINFORMATION = (
        select 
          [MKTAPPEALRECORDSOURCE].[ID] as [RECORDSOURCEID],
          [QUERYVIEWCATALOG].[DISPLAYNAME] as [RECORDSOURCENAME],
          [MKTAPPEALRECORDSOURCE].[SEARCHLISTCATALOGID] as [SEARCHLISTCATALOGID],
          [MKTAPPEALRECORDSOURCE].[DESCRIPTIONFIELD] as [SEARCHLISTDESCRIPTIONFIELD],
          [MKTSEGMENTATIONACTIVATE].[APPEALSYSTEMID] as [APPEALSYSTEMID],
          (case when @ISBBEC = 1 and [MKTSEGMENTATIONACTIVATE].[APPEALSYSTEMID] <> '' and dbo.[UFN_MKTRECORDSOURCE_VALIDFORBBEC]([MKTAPPEALRECORDSOURCE].[ID]) = 1 then
            (select [NAME] from dbo.[APPEAL] where [ID] = cast([MKTSEGMENTATIONACTIVATE].[APPEALSYSTEMID] as uniqueidentifier))
           else
            [MKTSEGMENTATIONACTIVATE].[APPEALID]
           end) as [APPEALID],
          (case when @ISBBEC = 1 and [MKTSEGMENTATIONACTIVATE].[APPEALSYSTEMID] <> '' and dbo.[UFN_MKTRECORDSOURCE_VALIDFORBBEC]([MKTAPPEALRECORDSOURCE].[ID]) = 1 then
            (select [DESCRIPTION] from dbo.[APPEAL] where [ID] = cast([MKTSEGMENTATIONACTIVATE].[APPEALSYSTEMID] as uniqueidentifier))
           else
            [MKTSEGMENTATIONACTIVATE].[APPEALDESCRIPTION]
           end) as [APPEALDESCRIPTION]
        from dbo.[MKTAPPEALRECORDSOURCE]
        inner join [QUERYVIEWCATALOG] on [MKTAPPEALRECORDSOURCE].[ID] = [QUERYVIEWCATALOG].[ID]
        left join [MKTSEGMENTATIONACTIVATE] on [MKTSEGMENTATIONACTIVATE].[RECORDSOURCEID] = [MKTAPPEALRECORDSOURCE].[ID] and [MKTSEGMENTATIONACTIVATE].[SEGMENTATIONID] = @ID
        where (@ACTIVE = 0 or (@ACTIVE = 1 and [MKTSEGMENTATIONACTIVATE].[APPEALID] <> ''))
        and (dbo.[UFN_MKTRECORDSOURCE_VALIDFORPRODUCT]([QUERYVIEWCATALOG].[ID]) = 1)
        for xml raw('ITEM'), type, elements, root('APPEALINFORMATION'), binary base64);
    end

  set @EXPORTDEFINITIONRECORDTYPE = dbo.[UFN_MKTEXPORTDEFINITION_GETRECORDTYPEFROMMAILINGTYPECODE](@MAILINGTYPECODE);
  set @EXPORTDEFINITIONRECORDTYPEID = dbo.[UFN_MKTEXPORTDEFINITION_GETRECORDTYPEIDFROMMAILINGTYPECODE](@MAILINGTYPECODE);
  set @EXPORTDEFINITIONQUERYVIEWID = dbo.[UFN_MKTEXPORTDEFINITION_GETQUERYVIEWIDFROMMAILINGTYPECODE](@MAILINGTYPECODE);

  -- See if any segments override the address processing option with a name format that contains an advanced spouse option.

  if exists (select top 1 1
             from dbo.[MKTSEGMENTATIONSEGMENT]
             inner join dbo.[NAMEFORMATPARAMETER] on [NAMEFORMATPARAMETER].[ID] = [MKTSEGMENTATIONSEGMENT].[NAMEFORMATPARAMETERID]
             where 
               [MKTSEGMENTATIONSEGMENT].[SEGMENTATIONID] = @ID and
               [MKTSEGMENTATIONSEGMENT].[OVERRIDEADDRESSPROCESSING] = 1 and
               [MKTSEGMENTATIONSEGMENT].[USEADDRESSPROCESSING] = 1 and
               ([NAMEFORMATPARAMETER].[JOINTEXCLUDESPOUSE] = 1 or [NAMEFORMATPARAMETER].[JOINTSPOUSESMAILEDSEPARATELY] = 1)
             )
    set @SEGMENTUSESADVANCEDNAMEFORMATOPTION = 1;
  else
    set @SEGMENTUSESADVANCEDNAMEFORMATOPTION = 0;

  return 0;