PureBasic MWS Orders: Get Service Status

Back to Index

Returns the operational status of the Orders API section.

Documentation: http://docs.developer.amazonservices.com/en_US/orders-2013-09-01/MWS_GetServiceStatus.html

CURL Command

curl -X POST https://mws.amazonservices.com/Orders/2013-09-01 \
  -d "AWSAccessKeyId=AWS_ACCESS_KEY_ID" \
  -d "Action=GetServiceStatus" \
  -d "MWSAuthToken=MWS_AUTH_TOKEN" \
  -d "SellerId=MWS_SELLER_ID" \
  -d "Signature=MWS_SIGNATURE" \
  -d "SignatureVersion=2" \
  -d "SignatureMethod=HmacSHA256" \
  -d "Timestamp=CURRENT_DATE_TIME" \
  -d "Version=2013-09-01"

PureBasic Example

IncludeFile "CkXml.pb"
IncludeFile "CkRest.pb"

Procedure ChilkatExample()

    rest.i = CkRest::ckCreate()
    If rest.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    success.i

    ;  URL: https://mws.amazonservices.com/Orders/2013-09-01
    bTls.i = 1
    port.i = 443
    bAutoReconnect.i = 1
    success = CkRest::ckConnect(rest,"mws.amazonservices.com",port,bTls,bAutoReconnect)
    If success <> 1
        Debug "ConnectFailReason: " + Str(CkRest::ckConnectFailReason(rest))
        Debug CkRest::ckLastErrorText(rest)
        CkRest::ckDispose(rest)
        ProcedureReturn
    EndIf

    CkRest::ckAddQueryParam(rest,"AWSAccessKeyId","AWS_ACCESS_KEY_ID")
    CkRest::ckAddQueryParam(rest,"Action","GetServiceStatus")
    CkRest::ckAddQueryParam(rest,"MWSAuthToken","MWS_AUTH_TOKEN")
    CkRest::ckAddQueryParam(rest,"SellerId","MWS_SELLER_ID")
    CkRest::ckAddQueryParam(rest,"SignatureVersion","2")
    CkRest::ckAddQueryParam(rest,"SignatureMethod","HmacSHA256")
    CkRest::ckAddQueryParam(rest,"Version","2013-09-01")

    CkRest::setCkHost(rest, "mws.amazonservices.com")
    ;  The AddMwsSignature method adds the Timestamp and Signature query params.
    CkRest::ckAddMwsSignature(rest,"POST","/Orders/2013-09-01","mws.amazonservices.com","MWS_SECRET_KEY")

    strResponseBody.s = CkRest::ckFullRequestFormUrlEncoded(rest,"POST","/Orders/2013-09-01")
    If CkRest::ckLastMethodSuccess(rest) <> 1
        Debug CkRest::ckLastErrorText(rest)
        CkRest::ckDispose(rest)
        ProcedureReturn
    EndIf

    xmlResponse.i = CkXml::ckCreate()
    If xmlResponse.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkXml::ckLoadXml(xmlResponse,strResponseBody)

    GetServiceStatusResponse_xmlns.s
    tagPath.s
    Status.s
    Timestamp.s
    RequestId.s

    GetServiceStatusResponse_xmlns = CkXml::ckGetAttrValue(xmlResponse,"xmlns")
    Status = CkXml::ckGetChildContent(xmlResponse,"GetServiceStatusResult|Status")
    Timestamp = CkXml::ckGetChildContent(xmlResponse,"GetServiceStatusResult|Timestamp")
    RequestId = CkXml::ckGetChildContent(xmlResponse,"ResponseMetadata|RequestId")


    CkRest::ckDispose(rest)
    CkXml::ckDispose(xmlResponse)


    ProcedureReturn
EndProcedure

Sample XML Response Body

<?xml version="1.0" encoding="utf-8" ?>
<GetServiceStatusResponse xmlns="https://mws.amazonservices.com/Orders/2013-09-01">
    <GetServiceStatusResult>
        <Status>GREEN</Status>
        <Timestamp>2013-09-05T18%3A12%3A21</Timestamp>
    </GetServiceStatusResult>
    <ResponseMetadata>
        <RequestId>d80c6c7b-f7c7-4fa7-bdd7-854711cb3bcc</RequestId>
    </ResponseMetadata>
</GetServiceStatusResponse>