User - Report As Spam

Report a user as a spam account to Twitter using SQL Server

Prerequisites:

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

Stored Procedure:


CREATE PROCEDURE usp_Twitter_User_Report_Create(
		@Profile nvarchar(100),
		@screen_name varchar(500),
		@User_Id bigint,
		@perform_block bit = 0,
		@Response nvarchar(MAX) OUTPUT,
		@StatusCode int OUTPUT,
		@StatusDescription nvarchar(MAX) OUTPUT)
AS

DECLARE @Text_perform_block varchar(5) 

SET @Text_perform_block = 
    CASE 
       WHEN @perform_block = 0 THEN 'false'
<span style="color: #ff0000">       ELSE 'true'
    END

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

SET @URL = 'https://api.twitter.com/1.1/users/report_spam.json'

EXEC SQLHTTP.net.QueryStringBuilder   @QueryString OUTPUT,
				      @Profile,
				      'screen_name', @screen_name,
				      'user_id', @User_Id,
				      'perform_block', @Text_perform_block

SET @URL = @URL + @QueryString

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

EXEC usp_Twitter_Auth_Header @Profile, @HTTPSessionID, @URL, 'POST'

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

CREATE PROCEDURE usp_Twitter_User_Report_Create(

@Profile nvarchar(100),

@screen_name varchar(500),

@User_Id bigint,

@perform_block bit = 0,

@Response nvarchar(MAX) OUTPUT,

@StatusCode int OUTPUT,

@StatusDescription nvarchar(MAX) OUTPUT)

DECLARE @Text_perform_block varchar(5)

SET @Text_perform_block =

CASE

WHEN @perform_block = 0 THEN 'false'

<span style="color: #ff0000"> ELSE 'true'

END

DECLARE @URL nvarchar(MAX)

DECLARE @QueryString varchar(MAX)

DECLARE @HTTPSessionID uniqueidentifier

SET @URL = 'https://api.twitter.com/1.1/users/report_spam.json'

EXEC SQLHTTP.net.QueryStringBuilder @QueryString OUTPUT,

@Profile,

'screen_name', @screen_name,

'user_id', @User_Id,

'perform_block', @Text_perform_block

SET @URL = @URL + @QueryString

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

EXEC usp_Twitter_Auth_Header @Profile, @HTTPSessionID, @URL, 'POST'

EXEC SQLHTTP.net.HTTPRequest @HttpSessionID,

@URL = @URL,

@Method = 'POST',

@ContentType = 'application/json',

@Accept = 'application/json',

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT,

@Response = @Response OUTPUT



Sample Usage:


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

EXEC usp_Twitter_User_Report_Create
		@Profile = 'My Twitter',
		@screen_name = 'themattharris',
		@User_Id = '777925',
		@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'@id', N'nvarchar(MAX)') AS [id]
		      ,T.C.value(N'@name', N'nvarchar(MAX)') AS [name]
		      ,T.C.value(N'@location', N'nvarchar(MAX)') AS [location]
		      ,T.C.value(N'@followers_count', N'nvarchar(MAX)') AS [followers_count]
		      ,T.C.value(N'@statuses_count', N'nvarchar(MAX)') AS [statuses_count]
		FROM @X.nodes(N'/JsonObject') T(C)

	END

DECLARE @Response nvarchar(MAX)

DECLARE @StatusCode int

DECLARE @StatusDescription nvarchar(MAX)

EXEC usp_Twitter_User_Report_Create

@Profile = 'My Twitter',

@screen_name = 'themattharris',

@User_Id = '777925',

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

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

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

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

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

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

END

id name location followers_count statuses_count

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

777925 Matt Harris United States 9511 5316



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.