VB.NET UWP/WinRT MWS Inbound: List Inbound Shipments

Back to Index

Returns a list of inbound shipments based on criteria that you specify.

Documentation: http://docs.developer.amazonservices.com/en_US/fba_inbound/FBAInbound_ListInboundShipments.html

CURL Command

curl -X POST https://mws.amazonaws.com/FulfillmentInboundShipment/2010-10-01 \
  -d "AWSAccessKeyId=AWS_ACCESS_KEY_ID" \
  -d "Action=ListInboundShipments" \
  -d "MWSAuthToken=MWS_AUTH_TOKEN" \
  -d "SignatureVersion=2" \
  -d "Timestamp=CURRENT_DATE_TIME" \
  -d "Version=2010-10-01" \
  -d "Signature=MWS_SIGNATURE" \
  -d "SignatureMethod=HmacSHA256" \
  -d "ShipmentStatusList.member.1=WORKING" \
  -d "SellerId=MWS_SELLER_ID" \
  -d "LastUpdatedAfter=2015-10-02T12:00:54Z"
  -d "LastUpdatedBefore=2015-11-02T12:00:54Z" \
  -d "ShipmentStatusList.member.2=CLOSED" \
  -d "ShipmentIdList.member.1=FBA44JV8R" \
  -d "ShipmentIdList.member.2=FBA4X8YLS" \
  -d "ShipmentIdList.member.3=FBA4X9FML"
See: Online Tool to Generate Chilkat Code from a CURL Command

VB.NET UWP/WinRT Example

Dim rest As New Chilkat.Rest
Dim success As Boolean

'  URL: https://mws.amazonaws.com/FulfillmentInboundShipment/2010-10-01
Dim bTls As Boolean = True
Dim port As Integer = 443
Dim bAutoReconnect As Boolean = True
success = Await rest.ConnectAsync("mws.amazonaws.com",port,bTls,bAutoReconnect)
If (success <> True) Then
    Debug.WriteLine("ConnectFailReason: " & rest.ConnectFailReason)
    Debug.WriteLine(rest.LastErrorText)
    Exit Sub
End If


rest.AddQueryParam("AWSAccessKeyId","AWS_ACCESS_KEY_ID")
rest.AddQueryParam("Action","ListInboundShipments")
rest.AddQueryParam("MWSAuthToken","MWS_AUTH_TOKEN")
rest.AddQueryParam("SignatureVersion","2")
rest.AddQueryParam("Version","2010-10-01")
rest.AddQueryParam("SignatureMethod","HmacSHA256")
rest.AddQueryParam("ShipmentStatusList.member.1","WORKING")
rest.AddQueryParam("SellerId","MWS_SELLER_ID")
rest.AddQueryParam("LastUpdatedAfter","2015-10-02T12:00:54Z")
rest.AddQueryParam("LastUpdatedBefore","2015-11-02T12:00:54Z")
rest.AddQueryParam("ShipmentStatusList.member.2","CLOSED")
rest.AddQueryParam("ShipmentIdList.member.1","FBA44JV8R")
rest.AddQueryParam("ShipmentIdList.member.2","FBA4X8YLS")
rest.AddQueryParam("ShipmentIdList.member.3","FBA4X9FML")



rest.Host = "mws.amazonaws.com"
'  The AddMwsSignature method adds the Timestamp and Signature query params.
rest.AddMwsSignature("POST","/FulfillmentInboundShipment/2010-10-01","mws.amazonaws.com","MWS_SECRET_KEY")

Dim strResponseBody As String = Await rest.FullRequestFormUrlEncodedAsync("POST","/FulfillmentInboundShipment/2010-10-01")
If (rest.LastMethodSuccess <> True) Then
    Debug.WriteLine(rest.LastErrorText)
    Exit Sub
End If


Dim xmlResponse As New Chilkat.Xml
xmlResponse.LoadXml(strResponseBody)

Dim ListInboundShipmentsResponse_xmlns As String
Dim i As Integer
Dim count_i As Integer
Dim tagPath As String
Dim PostalCode As String
Dim Name As String
Dim CountryCode As String
Dim StateOrProvinceCode As String
Dim AddressLine1 As String
Dim City As String
Dim ShipmentId As String
Dim ShipmentName As String
Dim ShipmentStatus As String
Dim LabelPrepType As String
Dim DestinationFulfillmentCenterId As String
Dim BoxContentsSource As String
Dim TotalUnits As Integer
Dim CurrencyCode As String
Dim Value As String

ListInboundShipmentsResponse_xmlns = xmlResponse.GetAttrValue("xmlns")
i = 0
count_i = xmlResponse.NumChildrenHavingTag("ListInboundShipmentsResult|ShipmentData|member")
While i < count_i
    xmlResponse.I = i
    PostalCode = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipFromAddress|PostalCode")
    Name = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipFromAddress|Name")
    CountryCode = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipFromAddress|CountryCode")
    StateOrProvinceCode = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipFromAddress|StateOrProvinceCode")
    AddressLine1 = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipFromAddress|AddressLine1")
    City = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipFromAddress|City")
    ShipmentId = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipmentId")
    ShipmentName = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipmentName")
    ShipmentStatus = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|ShipmentStatus")
    LabelPrepType = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|LabelPrepType")
    DestinationFulfillmentCenterId = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|DestinationFulfillmentCenterId")
    BoxContentsSource = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|BoxContentsSource")
    TotalUnits = xmlResponse.GetChildIntValue("ListInboundShipmentsResult|ShipmentData|member[i]|EstimatedBoxContentsFee|TotalUnits")
    CurrencyCode = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|EstimatedBoxContentsFee|FeePerUnit|CurrencyCode")
    Value = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|EstimatedBoxContentsFee|FeePerUnit|Value")
    CurrencyCode = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|EstimatedBoxContentsFee|TotalFee|CurrencyCode")
    Value = xmlResponse.GetChildContent("ListInboundShipmentsResult|ShipmentData|member[i]|EstimatedBoxContentsFee|TotalFee|Value")
    i = i + 1
End While

Sample XML Response Body

<?xml version="1.0" encoding="utf-8" ?>
<ListInboundShipmentsResponse xmlns="http://mws.amazonaws.com/FulfillmentInboundShipment/2010-10-01/">
    <ListInboundShipmentsResult>
        <ShipmentData>
            <member>
                <ShipFromAddress>
                    <PostalCode>V5V 1A1</PostalCode>
                    <Name>jsowprni Devo CA20</Name>
                    <CountryCode>CA</CountryCode>
                    <StateOrProvinceCode>BC</StateOrProvinceCode>
                    <AddressLine1>Address Line 1</AddressLine1>
                    <City>Vancouver</City>
                </ShipFromAddress>
                <ShipmentId>FBAN4QNH</ShipmentId>
                <ShipmentName>FBA (8/27/12 1:55 PM)</ShipmentName>
                <ShipmentStatus>WORKING</ShipmentStatus>
                <LabelPrepType>NO_LABEL</LabelPrepType>
                <DestinationFulfillmentCenterId>YYZ1</DestinationFulfillmentCenterId>
            </member>
            <member>
                <ShipFromAddress>
                    <PostalCode>V5V 1A1</PostalCode>
                    <Name>Janani Arvind FBA QA</Name>
                    <CountryCode>CA</CountryCode>
                    <StateOrProvinceCode>BC</StateOrProvinceCode>
                    <AddressLine1>Address 1</AddressLine1>
                    <City>Vancouver</City>
                </ShipFromAddress>
                <ShipmentId>FBA1123</ShipmentId>
                <ShipmentName>Test MWS CA Shipment 1</ShipmentName>
                <ShipmentStatus>WORKING</ShipmentStatus>
                <LabelPrepType>NO_LABEL</LabelPrepType>
                <DestinationFulfillmentCenterId>RIC2</DestinationFulfillmentCenterId>
                <BoxContentsSource>NONE</BoxContentsSource>
                <EstimatedBoxContentsFee>
                    <TotalUnits>10</TotalUnits>
                    <FeePerUnit>
                        <CurrencyCode>USD</CurrencyCode>
                        <Value>0.10</Value>
                    </FeePerUnit>
                    <TotalFee>
                        <CurrencyCode>USD</CurrencyCode>
                        <Value>10.0</Value>
                    </TotalFee>
                </EstimatedBoxContentsFee>
            </member>
        </ShipmentData>
    </ListInboundShipmentsResult>
</ListInboundShipmentsResponse>