Sample code for 30+ languages & platforms
DataFlex

MWS RequestReport (Amazon Marketplace Web Service)

See more Amazon MWS Examples

Creates a report request and submits the request to Amazon MWS.

See Amazon MWS RequestReport for more information.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex
DataFlex 
Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoRest
    Boolean iBTls
    Integer iPort
    Boolean iBAutoReconnect
    String sResponseXml
    Handle hoXml
    String sRequestReportResponse_xmlns
    String sReportRequestId
    String sReportType
    String sStartDate
    String sEndDate
    String sScheduled
    String sSubmittedDate
    String sReportProcessingStatus
    String sRequestId
    String sTemp1
    Integer iTemp1
    Boolean bTemp1

    Move False To iSuccess

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

    Get Create (RefClass(cComChilkatRest)) To hoRest
    If (Not(IsComObjectCreated(hoRest))) Begin
        Send CreateComObject of hoRest
    End

    // Connect to the Amazon MWS REST server.
    // 
    // Make sure to connect to the correct Amazon MWS Endpoint, 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 
    // 
    Move True To iBTls
    Move 443 To iPort
    Move True To iBAutoReconnect
    Get ComConnect Of hoRest "mws.amazonservices.com" iPort iBTls iBAutoReconnect To iSuccess
    If (iSuccess <> True) Begin
        Get ComConnectFailReason Of hoRest To iTemp1
        Showln "ConnectFailReason: " iTemp1
        Get ComLastErrorText Of hoRest To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Set ComHost Of hoRest To "mws.amazonservices.com"

    Get ComAddQueryParam Of hoRest "AWSAccessKeyId" "0PB842EXAMPLE7N4ZTR2" To iSuccess
    Get ComAddQueryParam Of hoRest "Action" "RequestReport" To iSuccess
    Get ComAddQueryParam Of hoRest "EndDate" "2008-06-26T18:12:21" To iSuccess
    Get ComAddQueryParam Of hoRest "MWSAuthToken" "amzn.mws.4ea38b7b-f563-7709-4bae-87aeaEXAMPLE" To iSuccess
    Get ComAddQueryParam Of hoRest "Marketplace" "ATVPDKIKX0DER" To iSuccess
    Get ComAddQueryParam Of hoRest "ReportType" "_GET_MERCHANT_LISTINGS_DATA_" To iSuccess
    Get ComAddQueryParam Of hoRest "SellerId" "A1XEXAMPLE5E6" To iSuccess
    Get ComAddQueryParam Of hoRest "SignatureMethod" "HmacSHA256" To iSuccess
    Get ComAddQueryParam Of hoRest "SignatureVersion" "2" To iSuccess
    Get ComAddQueryParam Of hoRest "StartDate" "2009-01-03T18:12:21" To iSuccess
    Get ComAddQueryParam Of hoRest "Version" "2009-01-01" To iSuccess

    // Add the MWS Signature param.  (Also adds the Timestamp parameter using the curent system date/time.)
    // The AddMwsSignature method adds the Timestamp and Signature query params.
    Get ComAddMwsSignature Of hoRest "POST" "/Reports/2009-01-01" "mws.amazonservices.com" "MWS_SECRET_KEY" To iSuccess

    Get ComFullRequestFormUrlEncoded Of hoRest "POST" "/Reports/2009-01-01" To sResponseXml
    Get ComLastMethodSuccess Of hoRest To bTemp1
    If (bTemp1 <> True) Begin
        Get ComLastErrorText Of hoRest To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get ComResponseStatusCode Of hoRest To iTemp1
    If (iTemp1 <> 200) Begin
        // Examine the request/response to see what happened.
        Get ComResponseStatusCode Of hoRest To iTemp1
        Showln "response status code = " iTemp1
        Get ComResponseStatusText Of hoRest To sTemp1
        Showln "response status text = " sTemp1
        Get ComResponseHeader Of hoRest To sTemp1
        Showln "response header: " sTemp1
        Showln "response body: " sResponseXml
        Showln "---"
        Get ComLastRequestStartLine Of hoRest To sTemp1
        Showln "LastRequestStartLine: " sTemp1
        Get ComLastRequestHeader Of hoRest To sTemp1
        Showln "LastRequestHeader: " sTemp1
    End

    // Examine the XML returned in the response body.
    Showln sResponseXml
    Showln "----"
    Showln "Success."

    // Sample Response

    // Use this online tool to generate parsing code from sample XML: 
    // Generate Parsing Code from XML

    // <?xml version="1.0"?>
    // <RequestReportResponse
    //     xmlns="http://mws.amazonaws.com/doc/2009-01-01/">
    //     <RequestReportResult>
    //         <ReportRequestInfo>
    //             <ReportRequestId>2291326454</ReportRequestId>
    //             <ReportType>_GET_MERCHANT_LISTINGS_DATA_</ReportType>
    //             <StartDate>2009-01-21T02:10:39+00:00</StartDate>
    //             <EndDate>2009-02-13T02:10:39+00:00</EndDate>
    //             <Scheduled>false</Scheduled>
    //             <SubmittedDate>2009-02-20T02:10:39+00:00</SubmittedDate>
    //             <ReportProcessingStatus>_SUBMITTED_</ReportProcessingStatus>
    //         </ReportRequestInfo>
    //     </RequestReportResult>
    //     <ResponseMetadata>
    //         <RequestId>88faca76-b600-46d2-b53c-0c8c4533e43a</RequestId>
    //     </ResponseMetadata>
    // </RequestReportResponse>

    Get Create (RefClass(cComChilkatXml)) To hoXml
    If (Not(IsComObjectCreated(hoXml))) Begin
        Send CreateComObject of hoXml
    End
    Get ComLoadXml Of hoXml sResponseXml To iSuccess

    Get ComGetAttrValue Of hoXml "xmlns" To sRequestReportResponse_xmlns
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|ReportRequestId" To sReportRequestId
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|ReportType" To sReportType
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|StartDate" To sStartDate
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|EndDate" To sEndDate
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|Scheduled" To sScheduled
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|SubmittedDate" To sSubmittedDate
    Get ComGetChildContent Of hoXml "RequestReportResult|ReportRequestInfo|ReportProcessingStatus" To sReportProcessingStatus
    Get ComGetChildContent Of hoXml "ResponseMetadata|RequestId" To sRequestId


End_Procedure