spAddUpdate_EmailTest

Parameters

Parameter	Parameter Type	Mode
@PKID	int	INOUT
@CurrentUsersID	int	IN
@NewGuid	uniqueidentifier	IN
Definition

Copy


CREATE PROCEDURE [dbo].[spAddUpdate_EmailTest]
(
      @PKID        int OUTPUT,
    @CurrentUsersID int,
      @NewGuid        uniqueidentifier
)
AS
DECLARE @TestMailID int

INSERT INTO [dbo].Email ( 
    EmailTemplateID, 
    ParentEmailID,
    [Name],    
    [Description],
    OwnerID,
    [Guid],
    [Type],
    [Status],
    ContentHTML,    
    ContentText,
    FromAddress,  
    FromDisplayName,      
    [Subject],            
    [Priority],             
    ReplyAddress,  
    ReturnReceipt,     
    ReturnReceiptAddress,   
    ForwardDSN,        
    ForwardDSNAddress,        
    SendAfterDate,
    ClientSitesID,
    EmailAddressTypeID
)SELECT               
    EmailTemplateID,
    @PKID,
    newid(),     
    [Description],    
    @CurrentUsersID,
    @NewGuid,
    15,
    0,
    ContentHTML,    
    ContentText,
    FromAddress,  
    FromDisplayName
,      
    [Subject],   

    Priority,             
    ReplyAddress,  
    ReturnReceipt,     
    ReturnReceiptAddress,   
    ForwardDSN,        
    ForwardDSNAddress,
    SendAfterDate,
    ClientSitesID,
    EmailAddressTypeID
FROM        
    [dbo].Email
WHERE       
    ID = @PKID

SELECT  @TestMailID = @@Identity


INSERT Email_EmailList (EmailID, EmailListID, IsTest) 
            SELECT @TestMailID, EmailListID, 1
            FROM Email_EmailList 
            WHERE EmailID = @PKID AND IsTest = 1

SET @PKID = @TestMailID    

exec spAuditThis @CurrentUsersID, 1, @NewGuid, 15