USP_RECORDOPERATION_MKTCOMMUNICATIONEFFORTSEEDDELETE

CREATE procedure dbo.USP_RECORDOPERATION_MKTCOMMUNICATIONEFFORTSEEDDELETE
(
  @ID uniqueidentifier,
  @CHANGEAGENTID uniqueidentifier
)
as begin

  set nocount on;

  declare @ACTIVE bit = 0;

  select
    @ACTIVE = [ACTIVE]
  from
    dbo.[MKTSEGMENTATION]
  where
    [ID] = (select [SEGMENTATIONID] from dbo.[MKTSEGMENTATIONSEED] where [ID] = @ID);

  begin try
    --check deletion rules, if any

    if isnull(@ACTIVE, 0) = 1
      raiserror('BBERR_MARKETINGEFFORTACTIVE', 13, 1);

    declare @RESULT int;
    exec @RESULT = dbo.[USP_MKTSEGMENTATION_CHECKACTIVATION] @ID;
    if @RESULT <> 0
      raiserror('BBERR_MARKETINGEFFORTACTIVATING', 13, 1);

    -- use the system generated delete routine to allow proper recording of the deleting agent

    exec dbo.[USP_MKTSEGMENTATIONSEED_DELETEBYID_WITHCHANGEAGENTID] @ID, @CHANGEAGENTID;
    return 0;

  end try

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

end