Mailing List Members - Create

Adds multiple members to a Mailgun mailing list using SQL Server

Prerequisites:

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

Stored Procedure:


CREATE PROCEDURE usp_Mailgun_Mailing_List_Members_Create(
		@Profile nvarchar(100),	
		@mailingList varchar(MAX),
		@members nvarchar(MAX) = NULL,
		@upsert bit = 0,
		@CurrentURL nvarchar(MAX) = NULL,
		@Response nvarchar(MAX) OUTPUT,
		@StatusCode int OUTPUT,
		@StatusDescription nvarchar(MAX) OUTPUT)

AS

DECLARE @Text_upsert varchar(5)

SET @Text_upsert = CASE WHEN @upsert = 0 THEN 'false' ELSE 'true' END

DECLARE @QueryString varchar(MAX)
DECLARE @Password nvarchar(4000)
DECLARE @HTTPSessionID uniqueidentifier

IF @CurrentURL IS NULL
	BEGIN

		SET @CurrentURL = 'https://api.mailgun.net/v3'

		EXEC SQLHTTP.net.UrlBuilder 	@CurrentURL OUTPUT,
						@Profile, 
						'lists', @mailingList, 'members.json'

	END
		
EXEC SQLHTTP.net.QueryStringBuilder     @QueryString OUTPUT,
					@Profile, 
					'members', @members,
					'upsert', @Text_upsert			

SET @CurrentURL = @CurrentURL + @QueryString

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

SET @Password = SQLHTTP.net.AuthParam(@Profile, 'APIKey')

EXEC SQLHTTP.net.BasicAuthHeader @HttpSessionID, 'api', @Password

EXEC SQLHTTP.net.HTTPRequest   @HttpSessionID,
                               @URL = @CurrentURL,
                               @Method = 'POST',
                               @StatusCode = @StatusCode OUTPUT,
                               @StatusDescription = @StatusDescription OUTPUT,
                               @Response = @Response OUTPUT
GO

CREATE PROCEDURE usp_Mailgun_Mailing_List_Members_Create(

@Profile nvarchar(100),

@mailingList varchar(MAX),

@members nvarchar(MAX) = NULL,

@upsert bit = 0,

@CurrentURL nvarchar(MAX) = NULL,

@Response nvarchar(MAX) OUTPUT,

@StatusCode int OUTPUT,

@StatusDescription nvarchar(MAX) OUTPUT)

DECLARE @Text_upsert varchar(5)

SET @Text_upsert = CASE WHEN @upsert = 0 THEN 'false' ELSE 'true' END

DECLARE @QueryString varchar(MAX)

DECLARE @Password nvarchar(4000)

DECLARE @HTTPSessionID uniqueidentifier

IF @CurrentURL IS NULL

BEGIN

SET @CurrentURL = 'https://api.mailgun.net/v3'

EXEC SQLHTTP.net.UrlBuilder @CurrentURL OUTPUT,

@Profile,

'lists', @mailingList, 'members.json'

END

EXEC SQLHTTP.net.QueryStringBuilder @QueryString OUTPUT,

@Profile,

'members', @members,

'upsert', @Text_upsert

SET @CurrentURL = @CurrentURL + @QueryString

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

SET @Password = SQLHTTP.net.AuthParam(@Profile, 'APIKey')

EXEC SQLHTTP.net.BasicAuthHeader @HttpSessionID, 'api', @Password

EXEC SQLHTTP.net.HTTPRequest @HttpSessionID,

@URL = @CurrentURL,

@Method = 'POST',

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT,

@Response = @Response OUTPUT



Sample Usage:


DECLARE @CurrentURL nvarchar(MAX)
DECLARE @Response nvarchar(MAX)
DECLARE @StatusCode int
DECLARE @StatusDescription nvarchar(MAX)
DECLARE @Members nvarchar(MAX)

SET @Members =
'[
    {
        "address":  "Alice <alice@example.com>",
        "vars":  {
            "age":  26
        }
    },
    {
        "name":  "Bob",
        "address":  "bob@example.com",
        "vars":  {
            "age":  34
        }
    }
]'

EXEC usp_Mailgun_Mailing_List_Members_Create
		@Profile = 'My Mailgun',
		@mailingList = 'dev@sandbox03fb9bf31fe94f82adb24d0963a7e600.mailgun.org',
		@members = @Members,
		@upsert = 1,
		@CurrentURL = @CurrentURL,
		@Response = @Response OUTPUT, 
		@StatusCode = @StatusCode OUTPUT, 
		@StatusDescription = @StatusDescription OUTPUT

IF @StatusCode >= 400
	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'@message', N'nvarchar(MAX)') AS [message]
		      ,T.C.value(N'list[1]/@name', N'nvarchar(MAX)') AS [name]
		      ,T.C.value(N'list[1]/@description', N'nvarchar(MAX)') AS [description]
		      ,T.C.value(N'list[1]/@address', N'nvarchar(MAX)') AS [address]
		      ,T.C.value(N'list[1]/@members_count', N'nvarchar(MAX)') AS [members_count]
		FROM @X.nodes(N'/JsonObject') T(C)

	END

DECLARE @CurrentURL nvarchar(MAX)

DECLARE @Response nvarchar(MAX)

DECLARE @StatusCode int

DECLARE @StatusDescription nvarchar(MAX)

DECLARE @Members nvarchar(MAX)

SET @Members =

{

"address": "Alice <alice@example.com>",

"vars": {

"age": 26

}

{

"name": "Bob",

"address": "bob@example.com",

"vars": {

"age": 34

}

EXEC usp_Mailgun_Mailing_List_Members_Create

@Profile = 'My Mailgun',

@mailingList = 'dev@sandbox03fb9bf31fe94f82adb24d0963a7e600.mailgun.org',

@members = @Members,

@upsert = 1,

@CurrentURL = @CurrentURL,

@Response = @Response OUTPUT,

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT

IF @StatusCode >= 400

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'@message', N'nvarchar(MAX)') AS [message]

,T.C.value(N'list[1]/@name', N'nvarchar(MAX)') AS [name]

,T.C.value(N'list[1]/@description', N'nvarchar(MAX)') AS [description]

,T.C.value(N'list[1]/@address', N'nvarchar(MAX)') AS [address]

,T.C.value(N'list[1]/@members_count', N'nvarchar(MAX)') AS [members_count]

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

END

message name description address members_count

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

Mailing list has been updated Developers Mailgun dev... dev@sandbox03fb9bf... 1



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.