(SQL Server) Amazon Pay - Create Refund

See more Amazon Pay Examples

Initiate a full or partial refund for a charge.

Note: This example requires Chilkat v9.5.0.89 or later. Contact support@chilkatsoft.com to get a v9.5.0.89 pre-release for testing.

For more information, see https://developer.amazon.com/docs/amazon-pay-api-v2/refund.html#create-refund

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @iTmp0 int
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    -- This example assumes the Chilkat API to have been previously unlocked.
    -- See Global Unlock Sample for sample code.

    DECLARE @http int
    -- Use "Chilkat_9_5_0.Http" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.Http', @http OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    DECLARE @success int

    -- Implements the following CURL command:

    -- curl "https://pay-api.amazon.com/:version/refunds/" \
    -- -X POST
    -- -H "authorization:Px2e5oHhQZ88vVhc0DO%2FsShHj8MDDg%3DEXAMPLESIGNATURE"
    -- -H "x-amz-pay-date:20201012T235046Z"
    -- -H "x-amz-pay-idempotency-key:AVLo5tI10BHgEk2jEXAMPLEKEY"
    -- -d '{
    --     "chargeId": "CHARGE_ID",
    --     "refundAmount": {
    --         "amount": "14.00",
    --         "currencyCode": "USD"
    --     },
    --     "softDescriptor": "Descriptor"
    -- }'

    -- Use the following online tool to generate HTTP code from a CURL command
    -- Convert a cURL Command to HTTP Source Code

    -- Use this online tool to generate code from sample JSON:
    -- Generate Code to Create JSON

    -- The following JSON is sent in the request body.

    -- {
    --     "chargeId": "CHARGE_ID",
    --     "refundAmount": {
    --         "amount": "14.00",
    --         "currencyCode": "USD"
    --     },
    --     "softDescriptor": "Descriptor"
    -- }

    DECLARE @json int
    -- Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @json OUT

    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'chargeId', 'CHARGE_ID'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'refundAmount.amount', '14.00'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'refundAmount.currencyCode', 'USD'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'softDescriptor', 'Descriptor'

    -- Load your Amazon Pay private key.  
    -- There are many other ways to load private keys into the Chilkat private key object, such as from different formats,
    -- or from in-memory strings or bytes.
    DECLARE @privKey int
    -- Use "Chilkat_9_5_0.PrivateKey" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.PrivateKey', @privKey OUT

    EXEC sp_OAMethod @privKey, 'LoadPemFile', @success OUT, 'C:/someDir/myAmazonPayPrivateKey.pem'
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @privKey, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @privKey
        RETURN
      END

    -- Provide your Amazon Pay private key and Public Key ID 
    -- Use your public key ID here.  It must be the one associated with the private key.
    -- Note: The SetAuthPrivateKey method was added in Chilkat v9.5.0.89
    DECLARE @publicKeyId nvarchar(4000)
    SELECT @publicKeyId = 'SANDBOX-AHEGSJCM3L2S637RBGABLAFW'
    EXEC sp_OAMethod @http, 'SetAuthPrivateKey', @success OUT, @publicKeyId, @privKey
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @privKey
        RETURN
      END

    -- Note: When the private key is provided as shown above, Chilkat will automatically add the required x-amz-pay-* headers to the HTTP request,
    -- and will also sign the request.  Nothing more is needed.
    -- Chilkat automatically generates and adds the following headers:
    -- 
    -- x-amz-pay-date
    -- x-amz-pay-host
    -- x-amz-pay-region
    -- x-amz-pay-idempotency-key
    -- Authorization

    EXEC sp_OASetProperty @http, 'Accept', 'application/json'

    -- To use the live system, replace "sandbox" with "live" in the URL passed to PostJson3.
    -- Also, make sure to use the correct region: pay-api.amazon.com, pay-api.amazon.eu, or pay-api.amazon.jp
    DECLARE @resp int
    EXEC sp_OAMethod @http, 'PostJson3', @resp OUT, 'https://pay-api.amazon.eu/sandbox/v2/refunds/', 'application/json', @json
    EXEC sp_OAGetProperty @http, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 = 0
      BEGIN
        EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @privKey
        RETURN
      END

    DECLARE @sbResponseBody int
    -- Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sbResponseBody OUT

    EXEC sp_OAMethod @resp, 'GetBodySb', @success OUT, @sbResponseBody
    DECLARE @jResp int
    -- Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @jResp OUT

    EXEC sp_OAMethod @jResp, 'LoadSb', @success OUT, @sbResponseBody
    EXEC sp_OASetProperty @jResp, 'EmitCompact', 0

    -- If the status code is not equal to 201, this will display error information.

    PRINT 'Response Body:'
    EXEC sp_OAMethod @jResp, 'Emit', @sTmp0 OUT
    PRINT @sTmp0

    DECLARE @respStatusCode int
    EXEC sp_OAGetProperty @resp, 'StatusCode', @respStatusCode OUT

    PRINT 'Response Status Code = ' + @respStatusCode
    IF @respStatusCode <> 201
      BEGIN

        PRINT 'Failed.'
        EXEC @hr = sp_OADestroy @resp

        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @privKey
        EXEC @hr = sp_OADestroy @sbResponseBody
        EXEC @hr = sp_OADestroy @jResp
        RETURN
      END
    EXEC @hr = sp_OADestroy @resp

    -- Sample JSON response:
    -- (Sample code for parsing the JSON response is shown below)

    -- {
    --      "refundId": "S01-5105180-3221187-R022311",
    --      "chargeId": "S01-5105180-3221187-C056351",
    --      "refundAmount": {
    --          "amount": "14.00",
    --          "currencyCode": "USD"
    --      },
    --      "softDescriptor": "Descriptor",
    --      "creationTimestamp": "20190714T155300Z",
    --      "statusDetails": {
    --          "state": "RefundInitiated",
    --          "reasonCode": null,
    --          "reasonDescription": null,
    --          "lastUpdatedTimestamp": "20190714T155300Z"
    --      },
    --      "releaseEnvironment": "Sandbox"
    -- }

    -- Sample code for parsing the JSON response...
    -- Use the following online tool to generate parsing code from sample JSON:
    -- Generate Parsing Code from JSON

    DECLARE @refundId nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @refundId OUT, 'refundId'
    DECLARE @chargeId nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @chargeId OUT, 'chargeId'
    DECLARE @refundAmountAmount nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @refundAmountAmount OUT, 'refundAmount.amount'
    DECLARE @refundAmountCurrencyCode nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @refundAmountCurrencyCode OUT, 'refundAmount.currencyCode'
    DECLARE @softDescriptor nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @softDescriptor OUT, 'softDescriptor'
    DECLARE @creationTimestamp nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @creationTimestamp OUT, 'creationTimestamp'
    DECLARE @statusDetailsState nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @statusDetailsState OUT, 'statusDetails.state'
    DECLARE @statusDetailsReasonCode nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @statusDetailsReasonCode OUT, 'statusDetails.reasonCode'
    DECLARE @statusDetailsReasonDescription nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @statusDetailsReasonDescription OUT, 'statusDetails.reasonDescription'
    DECLARE @statusDetailsLastUpdatedTimestamp nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @statusDetailsLastUpdatedTimestamp OUT, 'statusDetails.lastUpdatedTimestamp'
    DECLARE @releaseEnvironment nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @releaseEnvironment OUT, 'releaseEnvironment'

    EXEC @hr = sp_OADestroy @http
    EXEC @hr = sp_OADestroy @json
    EXEC @hr = sp_OADestroy @privKey
    EXEC @hr = sp_OADestroy @sbResponseBody
    EXEC @hr = sp_OADestroy @jResp


END
GO