Historical

Get historical exchange rates for any date available from the Open Exchange Rates API using SQL Server.

Prerequisites:

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

Stored Procedure:


CREATE PROCEDURE usp_OpenExchangeRates_Historical(@Date date,
						  @Response nvarchar(MAX) OUTPUT,
						  @StatusCode int OUTPUT,
						  @StatusDescription nvarchar(MAX) OUTPUT)
AS

DECLARE @URL nvarchar(MAX) 
DECLARE @QueryString nvarchar(MAX) 
DECLARE @DateSegment char(15)
DECLARE @HTTPSessionID uniqueidentifier

SET @URL = 'http://openexchangerates.org/api'
SET @DateSegment = FORMAT(@Date, 'yyyy-MM-dd') + '.json' COLLATE SQL_Latin1_General_CP1_CI_AS;

EXEC SQLHTTP.net.UrlBuilder 	@URL OUTPUT,
				'openexchangerates', 
				'historical', @DateSegment

EXEC SQLHTTP.net.QueryStringBuilder 	@QueryString OUTPUT,
					'openexchangerates',
					'app_id', '#APIKey'

SET @URL = @URL + @QueryString

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

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

CREATE PROCEDURE usp_OpenExchangeRates_Historical(@Date date,

@Response nvarchar(MAX) OUTPUT,

@StatusCode int OUTPUT,

@StatusDescription nvarchar(MAX) OUTPUT)

DECLARE @URL nvarchar(MAX)

DECLARE @QueryString nvarchar(MAX)

DECLARE @DateSegment char(15)

DECLARE @HTTPSessionID uniqueidentifier

SET @URL = 'http://openexchangerates.org/api'

SET @DateSegment = FORMAT(@Date, 'yyyy-MM-dd') + '.json' COLLATE SQL_Latin1_General_CP1_CI_AS;

EXEC SQLHTTP.net.UrlBuilder @URL OUTPUT,

'openexchangerates',

'historical', @DateSegment

EXEC SQLHTTP.net.QueryStringBuilder @QueryString OUTPUT,

'openexchangerates',

'app_id', '#APIKey'

SET @URL = @URL + @QueryString

EXEC SQLHTTP.net.HTTPSession @HTTPSessionID OUTPUT

EXEC SQLHTTP.net.HTTPRequest @HttpSessionID,

@URL = @URL,

@Method = 'GET',

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT,

@Response = @Response OUTPUT



Sample Usage:


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

EXEC usp_OpenExchangeRates_Historical 	@Date = '2000-04-07'
					@Response = @Response OUTPUT, 
					@StatusCode = @StatusCode OUTPUT, 
					@StatusDescription = @StatusDescription OUTPUT

IF @StatusCode >= 400
	EXEC SQLHTTP.net.RaiseHttpError @StatusCode, @StatusDescription, @Response
ELSE
	BEGIN
		SELECT [Name],[Value]
		FROM SQLHTTP.net.Json_To_NodeTable(@Response)
		WHERE [Name] IN ('AUD', 'NZD', 'CAD')
	END

DECLARE @Response nvarchar(MAX)

DECLARE @StatusCode int

DECLARE @StatusDescription nvarchar(MAX)

EXEC usp_OpenExchangeRates_Historical @Date = '2000-04-07'

@Response = @Response OUTPUT,

@StatusCode = @StatusCode OUTPUT,

@StatusDescription = @StatusDescription OUTPUT

IF @StatusCode >= 400

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

ELSE

BEGIN

SELECT [Name],[Value]

FROM SQLHTTP.net.Json_To_NodeTable(@Response)

WHERE [Name] IN ('AUD', 'NZD', 'CAD')

END

Name Value

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

AUD 1.108609

CAD 1.048367

NZD 1.377768



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.