Email-Marketing Campaign Test - Create

Test sending a Constant Contact email marketing campaign message using SQL Server

Prerequisites:

See SQLHTTP easy setup for Constant Contact
See API Call documentation for parameter values and other information
Create the stored procedure documented below

Stored Procedure:


CREATE PROCEDURE usp_ConstantContact_v2_EmailMarketingCampaign_TestSend(
		@Profile nvarchar(100),
		@Body varchar(MAX),
		@CampaignID bigint,
		@Response nvarchar(MAX) OUTPUT,
		@StatusCode int OUTPUT,
		@StatusDescription nvarchar(MAX) OUTPUT)
AS

SET NOCOUNT ON

DECLARE @URL varchar(MAX)
DECLARE @QueryString varchar(MAX)
DECLARE @HTTPSessionID uniqueidentifier

SET @URL = 'https://api.constantcontact.com/v2'

EXEC SQLHTTP.net.UrlBuilder   @URL OUTPUT,
			      @Profile,
			      'emailmarketing',
			      'campaigns', @CampaignID, 'tests'

EXEC SQLHTTP.net.QueryStringBuilder   @QueryString OUTPUT,
				      @Profile,
				      'api_key', '#APIKey'

SET @URL = @URL + @QueryString

EXEC usp_ConstantContact_v2_Auth_Header @Profile, @HTTPSessionID

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

EXEC SQLHTTP.net.HTTPRequest   @HttpSessionID,
                               @URL = @URL,
                               @Method = 'POST',
			       @Body = @Body,
                               @ContentType = 'application/json',
                               @StatusCode = @StatusCode OUTPUT,
                               @StatusDescription = @StatusDescription OUTPUT,
                               @Response = @Response OUTPUT

GO

CREATE PROCEDURE usp_ConstantContact_v2_EmailMarketingCampaign_TestSend(

@Profile nvarchar(100),

@Body varchar(MAX),

@CampaignID bigint,

@Response nvarchar(MAX) OUTPUT,

@StatusCode int OUTPUT,

@StatusDescription nvarchar(MAX) OUTPUT)

SET NOCOUNT ON

DECLARE @URL varchar(MAX)

DECLARE @QueryString varchar(MAX)

DECLARE @HTTPSessionID uniqueidentifier

SET @URL = 'https://api.constantcontact.com/v2'

EXEC SQLHTTP.net.UrlBuilder @URL OUTPUT,

@Profile,

'emailmarketing',

'campaigns', @CampaignID, 'tests'

EXEC SQLHTTP.net.QueryStringBuilder @QueryString OUTPUT,

@Profile,

'api_key', '#APIKey'

SET @URL = @URL + @QueryString

EXEC usp_ConstantContact_v2_Auth_Header @Profile, @HTTPSessionID

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

EXEC SQLHTTP.net.HTTPRequest @HttpSessionID,

@URL = @URL,

@Method = 'POST',

@Body = @Body,

@ContentType = 'application/json',

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT,

@Response = @Response OUTPUT



Sample Usage:


DECLARE @Response nvarchar(MAX)
DECLARE @StatusCode int
DECLARE @StatusDescription nvarchar(MAX)
DECLARE @Body varchar(MAX)

SET @Body = '{
  "personal_message": "This is a test send of the email campaign message.",
  "email_addresses": ["address1@example.com", "address2@example.com","address3@example.com"],
  "format": "HTML_AND_TEXT"
}'

EXEC usp_ConstantContact_v2_EmailMarketingCampaign_TestSend	
		@Profile = 'My ConstantContact',
		@Body = @Body,
		@CampaignID = '1127824545043',
		@Response = @Response OUTPUT, 
		@StatusCode = @StatusCode OUTPUT, 
		@StatusDescription = @StatusDescription OUTPUT

IF @StatusCode >= 400 --An HTTP Request error has occured
	EXEC SQLHTTP.net.RaiseHttpError @StatusCode, @StatusDescription, @Response
ELSE
	BEGIN
		
		DECLARE @X xml
		SET @X = SQLHTTP.net.Json_To_Xml(@Response, '0')

		--The XPath syntax below was easily generated by executing the following commands:
		--EXEC SQLHTTP.net.XQueryHelper @X
		--and then executing: 
		--EXEC SQLHTTP.net.XQueryHelper @X, 'JsonObject'

		SELECT T.C.value(N'@format', N'nvarchar(MAX)') AS [format]
		      ,T.C.value(N'@personal_message', N'nvarchar(MAX)') AS [personal_message]
		FROM @X.nodes(N'/JsonObject') T(C)

	END

DECLARE @Response nvarchar(MAX)

DECLARE @StatusCode int

DECLARE @StatusDescription nvarchar(MAX)

DECLARE @Body varchar(MAX)

SET @Body = '{

"personal_message": "This is a test send of the email campaign message.",

"email_addresses": ["address1@example.com", "address2@example.com","address3@example.com"],

"format": "HTML_AND_TEXT"

EXEC usp_ConstantContact_v2_EmailMarketingCampaign_TestSend

@Profile = 'My ConstantContact',

@Body = @Body,

@CampaignID = '1127824545043',

@Response = @Response OUTPUT,

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT

IF @StatusCode >= 400 --An HTTP Request error has occured

EXEC SQLHTTP.net.RaiseHttpError @StatusCode, @StatusDescription, @Response

ELSE

BEGIN

DECLARE @X xml

SET @X = SQLHTTP.net.Json_To_Xml(@Response, '0')

--The XPath syntax below was easily generated by executing the following commands:

--EXEC SQLHTTP.net.XQueryHelper @X

--and then executing:

--EXEC SQLHTTP.net.XQueryHelper @X, 'JsonObject'

SELECT T.C.value(N'@format', N'nvarchar(MAX)') AS [format]

,T.C.value(N'@personal_message', N'nvarchar(MAX)') AS [personal_message]

FROM @X.nodes(N'/JsonObject') T(C)

END

Format Personal Message

----------------- ---------------------------------------------------

HTML_AND_TEXT This is a test send of the email campaign message.



IMPORTANT DISCLAIMER

CODE/SQL ON THESE PAGES ARE PROVIDED AS-IS AND ARE AVAILABLE FOR ILLUSTRATIVE PURPOSES ONLY.

USERS ARE REQUIRED TO ABIDE BY THE TERMS AND CONDITIONS FOR USING REFERENCED THIRD PARTY WEBSITES AND/OR APIs FROM THEIR RESPECTIVE WEBSITES. WE DO NOT CONDONE ANY VIOLATION OF THIRD PARTY WEBSITES AND/OR APIs TERMS AND CONDITIONS USING OUR SOFTWARE.

USERS SHALL BE SOLELY RESPONSIBLE AND BE SOLELY LIABLE FOR VIOLATION OF ANY RULES SPECIFIED BY THIRD PARTIES FOR USING THEIR WEBSITES AND/OR APIs, OR INFRINGEMENT OF RIGHTS OF SUCH THIRD PARTIES.