(DataFlex) HTTPS MWS List Orders (Amazon Marketplace Web Service)

Send an HTTPS MWS ListOrders request to return a list of orders created or updated during a time frame.

Note: This example requires Chilkat v9.5.0.66 or greater.

Important: The Chilkat v9.5.0.75 release accidentally breaks Amazon MWS (not AWS) authentication. If you need MWS with 9.5.0.75, send email to support@chilkatsoft.com for a hotfix, or revert back to v9.5.0.73, or update to a version after 9.5.0.75.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoHttp
    Variant vReq
    Handle hoReq
    Boolean iSuccess
    Variant vResp
    Handle hoResp
    String sTemp1
    Integer iTemp1
    Boolean bTemp1

    // This example assumes the Chilkat HTTP API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // Note: This example requires Chilkat v9.5.0.66 or greater.
    Get Create (RefClass(cComChilkatHttp)) To hoHttp
    If (Not(IsComObjectCreated(hoHttp))) Begin
        Send CreateComObject of hoHttp
    End

    // Make sure to connect to the correct Amazon MWS Endpoing, otherwise
    // you'll get an HTTP 401 response code.
    // 
    // The possible servers are:
    // 
    // North America (NA) 	https://mws.amazonservices.com
    // Europe (EU) 	https://mws-eu.amazonservices.com
    // India (IN) 	https://mws.amazonservices.in
    // China (CN) 	https://mws.amazonservices.com.cn
    // Japan (JP) 	https://mws.amazonservices.jp 
    // 

    // Build the HTTP request.
    Get Create (RefClass(cComChilkatHttpRequest)) To hoReq
    If (Not(IsComObjectCreated(hoReq))) Begin
        Send CreateComObject of hoReq
    End

    // Add query params
    Send ComAddParam To hoReq "Action" "ListOrders"
    Send ComAddParam To hoReq "CreatedAfter" "2016-12-31T23:00:00Z"
    Send ComAddParam To hoReq "MarketplaceId.Id.1" "MWS_MARKETPLACE_ID"
    Send ComAddParam To hoReq "SellerId" "MWS_SELLER_ID"
    Send ComAddParam To hoReq "AWSAccessKeyId" "MWS_ACCESS_KEY_ID"
    Send ComAddParam To hoReq "SignatureVersion" "2"
    Send ComAddParam To hoReq "SignatureMethod" "HmacSHA256"
    Send ComAddParam To hoReq "Version" "2013-09-01"

    // Set the HTTP verb and path.
    Set ComPath Of hoReq To "/Orders/2013-09-01"
    Set ComHttpVerb Of hoReq To "POST"

    // Add the MWS Signature after the verb, path, and all params have been set.
    Get ComAddMwsSignature Of hoReq "mws.amazonservices.com" "MWS_SECRET_ACCESS_KEY_ID" To iSuccess

    Get pvComObject of hoReq to vReq
    Get ComPostUrlEncoded Of hoHttp "https://mws.amazonservices.com/Orders/2013-09-01" vReq To vResp
    If (IsComObject(vResp)) Begin
        Get Create (RefClass(cComChilkatHttpResponse)) To hoResp
        Set pvComObject Of hoResp To vResp
    End
    Get ComLastMethodSuccess Of hoHttp To bTemp1
    If (bTemp1 <> True) Begin
        Get ComLastErrorText Of hoHttp To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get ComStatusCode Of hoResp To iTemp1
    If (iTemp1 <> 200) Begin
        Get ComStatusCode Of hoResp To iTemp1
        Showln "Non-success status code: " iTemp1
        Get ComBodyStr Of hoResp To sTemp1
        Showln sTemp1
        Send Destroy of hoResp
        Procedure_Return
    End

    // Examine the XML returned in the response body.
    Get ComBodyStr Of hoResp To sTemp1
    Showln sTemp1
    Showln "----"
    Showln "Success."
    Send Destroy of hoResp


End_Procedure