TR_EMAILSTATUSGENERALPURPOSE_AUDIT_DELETE

/* 
Generated by Blackbaud AppFx Platform
Date:  3/19/2013 1:11:27 AM
Assembly Version:  Blackbaud.AppFx.Platform.SqlClr, Version=3.0.504.0, Culture=neutral, PublicKeyToken=null
Copyright Blackbaud
*/
CREATE TRIGGER dbo.TR_EMAILSTATUSGENERALPURPOSE_AUDIT_DELETE ON dbo.EMAILSTATUSGENERALPURPOSE AFTER DELETE NOT FOR REPLICATION
AS 

declare @ChangeAgentID uniqueidentifier
declare @AuditKey uniqueidentifier
declare @AuditDate datetime

set nocount on

--peform the audit

if dbo.UFN_AUDITENABLED('EMAILSTATUSGENERALPURPOSE') = 1
    begin

        -- the audit key is used to associate the rows in the audit table with a single atomic deletion/modification

        -- for a delete, 

        set @AuditKey = NewID()
        set @AuditDate = GetDate()

        --Get the change agent from the CONTEXT_INFO.  If an application wishes to mark a row as deleted by a non-default changeagent then it will have to update the auditrow after the delete using the ID field (where AUDITTYPECODE=2)

        exec dbo.USP_CHANGEAGENT_GETORCREATECHANGEAGENTFROMCONTEXT @ChangeAgentID output

        INSERT INTO dbo.EMAILSTATUSGENERALPURPOSEAUDIT(
            AUDITRECORDID, 
            AUDITKEY,
            AUDITCHANGEAGENTID,
            AUDITDATE, 
            AUDITTYPECODE,
            [EMAILQUEUEGENERALPURPOSEID],
            [MERGEROWSPERCHUNK],
            [LASTMERGEROWPROCESSED],
            [RETRYNUMBER],
            [STATUS],
            [EXTERNALJOBIDENTITY],
            [ADDEDBYID],
            [CHANGEDBYID],
            [DATEADDED],
            [DATECHANGED],
            [UNIQUEIDFIELDNAME],
            [EMAILADDRESSFIELDNAME],
            [EMAILDISPLAYNAMEFIELDNAME],
            [MERGETOKEN],
            [PRIORITY],
            [REQUESTEDSENT],
            [ACTUALSENT],
            [EMAILHEADER],
            [INTERNALJOBIDENTITY],
            [STATUSMESSAGE],
            [CONSUMERSTARTDATE],
            [CONSUMERENDDATE],
            [CLIENTPROCESSSTARTDATE],
            [CLIENTPROCESSENDDATE],
            [SERVERMODIFIEDDATE],
            [PROCESSAFTERDATE],
            [EXTERNALSERVICESTATUS]
        ) 
        SELECT 
            ID,
            @AuditKey,
            @ChangeAgentID,
            @AuditDate,
            2, --Before DELETE

            [EMAILQUEUEGENERALPURPOSEID],
            [MERGEROWSPERCHUNK],
            [LASTMERGEROWPROCESSED],
            [RETRYNUMBER],
            [STATUS],
            [EXTERNALJOBIDENTITY],
            [ADDEDBYID],
            [CHANGEDBYID],
            [DATEADDED],
            [DATECHANGED],
            [UNIQUEIDFIELDNAME],
            [EMAILADDRESSFIELDNAME],
            [EMAILDISPLAYNAMEFIELDNAME],
            [MERGETOKEN],
            [PRIORITY],
            [REQUESTEDSENT],
            [ACTUALSENT],
            [EMAILHEADER],
            [INTERNALJOBIDENTITY],
            [STATUSMESSAGE],
            [CONSUMERSTARTDATE],
            [CONSUMERENDDATE],
            [CLIENTPROCESSSTARTDATE],
            [CLIENTPROCESSENDDATE],
            [SERVERMODIFIEDDATE],
            [PROCESSAFTERDATE],
            [EXTERNALSERVICESTATUS]

        FROM DELETED


    end