(SQL Server) Walmart - Update Inventory for an Item

Note: This example uses classes, properties, or methods discontinued in Chilkat v11.0.0 or greater.

Demonstrates how to update inventory for an item.

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)
    DECLARE @sTmp1 nvarchar(4000)
    -- ---------------------------------------------------------------------------------------------------------
    -- Note: This example is deprecated.  The Walmart API no longer uses the Signature method of authenticating.
    -- Walmart now uses OAuth2.  
    -- ---------------------------------------------------------------------------------------------------------

    -- This example requires the Chilkat API to have been previously unlocked.
    -- See Global Unlock Sample for sample code.

    -- Sends the following PUT request:
    -- PUT https://marketplace.walmartapis.com/v2/inventory?sku={SKU}

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

    DECLARE @success int
    EXEC sp_OAMethod @sbUrl, 'Append', @success OUT, 'https://marketplace.walmartapis.com/v2/inventory?sku={SKU}'
    DECLARE @numReplaced int
    EXEC sp_OAMethod @sbUrl, 'Replace', @numReplaced OUT, '{SKU}', 'HOPP~904~51041'

    DECLARE @requestMethod nvarchar(4000)
    SELECT @requestMethod = 'PUT'

    -- First we need to generate a signature for our request.
    -- The signature needs to be re-generated for each new Walmart HTTP request.
    DECLARE @authUtil int
    -- Use "Chilkat_9_5_0.AuthUtil" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.AuthUtil', @authUtil OUT

    DECLARE @wmConsumerId nvarchar(4000)
    SELECT @wmConsumerId = 'WALMART_CONSUMER_ID'
    DECLARE @wmPrivateKey nvarchar(4000)
    SELECT @wmPrivateKey = 'WALMART_PRIVATE_KEY'
    DECLARE @jsonStr nvarchar(4000)
    EXEC sp_OAMethod @sbUrl, 'GetAsString', @sTmp0 OUT
    EXEC sp_OAMethod @authUtil, 'WalmartSignature', @jsonStr OUT, @sTmp0, @wmConsumerId, @wmPrivateKey, @requestMethod
    EXEC sp_OAGetProperty @authUtil, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 <> 1
      BEGIN
        EXEC sp_OAGetProperty @authUtil, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @sbUrl
        EXEC @hr = sp_OADestroy @authUtil
        RETURN
      END

    -- The JSON returned by WalmartSignature contains the values to be used in the following
    -- header fields: WM_SEC.AUTH_SIGNATURE, WM_SEC.TIMESTAMP, and WM_QOS.CORRELATION_ID
    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, 'Load', @success OUT, @jsonStr

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

    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'WM_SVC.NAME', 'Walmart Marketplace'
    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'correlation_id'
    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'WM_QOS.CORRELATION_ID', @sTmp0
    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'timestamp'
    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'WM_SEC.TIMESTAMP', @sTmp0
    EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'signature'
    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'WM_SEC.AUTH_SIGNATURE', @sTmp0
    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'WM_CONSUMER.ID', @wmConsumerId
    EXEC sp_OASetProperty @http, 'Accept', 'application/xml'

    -- Note: Do not explicitly set the "Host" header.  Chilkat will set it automatically.

    -- The body of the PUT request will be XML that looks like this:

    -- 	<?xml version="1.0" encoding="utf-8" ?>
    -- 	<wm:inventory xmlns:wm="http://walmart.com/">
    -- 	    <wm:sku>HOPP~904~51041</wm:sku>
    -- 	    <wm:quantity>
    -- 	        <wm:unit>EACH</wm:unit>
    -- 	        <wm:amount>235</wm:amount>
    -- 	    </wm:quantity>
    -- 	    <wm:fulfillmentLagTime>5</wm:fulfillmentLagTime>
    -- 	</wm:inventory>

    -- Build the XML request body:
    DECLARE @originalAmount int
    SELECT @originalAmount = 234

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

    EXEC sp_OASetProperty @xmlBody, 'Tag', 'wm:inventory'
    EXEC sp_OAMethod @xmlBody, 'AddAttribute', @success OUT, 'xmlns:wm', 'http://walmart.com/'
    EXEC sp_OAMethod @xmlBody, 'UpdateChildContent', NULL, 'wm:sku', 'HOPP~904~51041'
    EXEC sp_OAMethod @xmlBody, 'UpdateChildContent', NULL, 'wm:quantity|wm:unit', 'EACH'
    EXEC sp_OAMethod @xmlBody, 'UpdateChildContentInt', NULL, 'wm:quantity|wm:amount', @originalAmount + 1
    EXEC sp_OAMethod @xmlBody, 'UpdateChildContent', NULL, 'wm:fulfillmentLagTime', '5'


    PRINT 'PUT request body:'
    EXEC sp_OAMethod @xmlBody, 'GetXml', @sTmp0 OUT
    PRINT @sTmp0

    PRINT '--'

    -- This is a simple PUT that can be sent w/ the PutText method.
    DECLARE @xmlStr nvarchar(4000)
    EXEC sp_OAMethod @sbUrl, 'GetAsString', @sTmp0 OUT
    EXEC sp_OAMethod @xmlBody, 'GetXml', @sTmp1 OUT
    EXEC sp_OAMethod @http, 'PutText', @xmlStr OUT, @sTmp0, @sTmp1, 'utf-8', 'application/xml', 0, 0
    EXEC sp_OAGetProperty @http, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 <> 1
      BEGIN
        EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @sbUrl
        EXEC @hr = sp_OADestroy @authUtil
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @xmlBody
        RETURN
      END

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

    EXEC sp_OAMethod @xml, 'LoadXml', @success OUT, @xmlStr

    -- A successful response should have a 200 response status
    EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
    IF @iTmp0 <> 200
      BEGIN
        EXEC sp_OAMethod @xml, 'GetXml', @sTmp0 OUT
        PRINT @sTmp0

        EXEC sp_OAGetProperty @http, 'LastStatus', @iTmp0 OUT
        PRINT 'Response Status Code: ' + @iTmp0

        PRINT 'Failed.'
        EXEC @hr = sp_OADestroy @sbUrl
        EXEC @hr = sp_OADestroy @authUtil
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @xmlBody
        EXEC @hr = sp_OADestroy @xml
        RETURN
      END

    -- A sample XML response is shown below..
    EXEC sp_OAMethod @xml, 'GetXml', @sTmp0 OUT
    PRINT @sTmp0

    PRINT '--'

    PRINT 'Success!'

    -- ---------------------------------------
    -- Sample XML response
    -- ---------------------------------------

    -- <?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
    -- <inventory xmlns="http://walmart.com/">
    --     <sku>HOPP~904~51041</sku>
    --     <quantity>
    --         <unit>EACH</unit>
    --         <amount>235</amount>
    --     </quantity>
    --     <fulfillmentLagTime>5</fulfillmentLagTime>
    -- </inventory>

    EXEC @hr = sp_OADestroy @sbUrl
    EXEC @hr = sp_OADestroy @authUtil
    EXEC @hr = sp_OADestroy @json
    EXEC @hr = sp_OADestroy @http
    EXEC @hr = sp_OADestroy @xmlBody
    EXEC @hr = sp_OADestroy @xml


END
GO