Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(VB.NET UWP/WinRT) WIN Air Freight - Send New Pouch RequestSends a "POST /api/v1/Awb" to send a new pouch request.
' This example assumes the Chilkat HTTP API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim http As New Chilkat.Http ' Set the "Accept" header to tell the web server that we'll accept an XML response. http.Accept = "application/xml" ' Tell Chilkat to cache any received cookies to files in a particular directory http.CookieDir = "c:/qa_data/cookies" http.SaveCookies = True ' Also tell Chilkat to load and send matching cookies from the CookieDir. ' The authToken cookie is first obtained in the login request. Each subsequent ' request sends the authToken cookie and saves the new authToken cookie to the CookieDir. http.SendCookies = True ' Build out XML pouch request... Dim xml As New Chilkat.Xml xml.Tag = "PouchDTO" xml.UpdateChildContent("Mawb|AwbID","") xml.UpdateChildContent("Mawb|AwbNumber","001-12312123") xml.UpdateChildContent("Mawb|AwbStatus","D") xml.UpdateChildContent("Mawb|eAWB","false") xml.UpdateChildContent("Mawb|WithPaper","false") xml.UpdateChildContent("Mawb|Parties|Shipper|WinID","444444") xml.UpdateChildContent("Mawb|Parties|Shipper|AccountNumber","12345") xml.UpdateChildContent("Mawb|Parties|Shipper|Name","AABC SHIPPING & PACKAGING, INC.") xml.UpdateChildContent("Mawb|Parties|Shipper|Phone","111-222-3334") xml.UpdateChildContent("Mawb|Parties|Shipper|Fax","222-111-3334") xml.UpdateChildContent("Mawb|Parties|Shipper|Email","") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|Line1","500 HARBOR DRIVE") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|Line2","SUITE B1211") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|Place","BEAUFORT") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|PostalCode","28516") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|StateProvince","NC") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|Country|Code","US") xml.UpdateChildContent("Mawb|Parties|Shipper|Address|Country|Name","U.S.A.") xml.UpdateChildContent("Mawb|Parties|Consignee|WinID","0") xml.UpdateChildContent("Mawb|Parties|Consignee|AccountNumber","") xml.UpdateChildContent("Mawb|Parties|Consignee|Name","DELTA MANUFACTURING") xml.UpdateChildContent("Mawb|Parties|Consignee|Phone","444-555-3333") xml.UpdateChildContent("Mawb|Parties|Consignee|Fax","") xml.UpdateChildContent("Mawb|Parties|Consignee|Email","") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|Line1","185 RUE LAMANDE") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|Line2","") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|Place","PARIS") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|PostalCode","75017") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|StateProvince","") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|Country|Code","FR") xml.UpdateChildContent("Mawb|Parties|Consignee|Address|Country|Name","FRANCE") xml.UpdateChildContent("Mawb|Parties|Notify|WinID","") xml.UpdateChildContent("Mawb|Parties|Notify|AccountNumber","") xml.UpdateChildContent("Mawb|Parties|Notify|Name","AABC SHIPPING, INC.") xml.UpdateChildContent("Mawb|Parties|Notify|Phone","") xml.UpdateChildContent("Mawb|Parties|Notify|Fax","") xml.UpdateChildContent("Mawb|Parties|Notify|Email","") xml.UpdateChildContent("Mawb|Parties|Notify|Address|Line1","110 FARA WAY") xml.UpdateChildContent("Mawb|Parties|Notify|Address|Line2","") xml.UpdateChildContent("Mawb|Parties|Notify|Address|Place","OZ") xml.UpdateChildContent("Mawb|Parties|Notify|Address|PostalCode","11222") xml.UpdateChildContent("Mawb|Parties|Notify|Address|StateProvince","NY") xml.UpdateChildContent("Mawb|Parties|Notify|Address|Country|Code","US") xml.UpdateChildContent("Mawb|Parties|Notify|Address|Country|Name","U.S.A.") xml.UpdateChildContent("Mawb|Parties|Agent|WinID","") xml.UpdateChildContent("Mawb|Parties|Agent|AccountNumber","FACCT#1234") xml.UpdateChildContent("Mawb|Accounting|Identifier","GEN") xml.UpdateChildContent("Mawb|Accounting|Information","SARFWER") xml.UpdateChildContent("Mawb|Accounting|Identifier","MCO") xml.UpdateChildContent("Mawb|Accounting|Information","WERWERWER") xml.UpdateChildContent("Mawb|ShipmentReference|ReferenceNumber","ZDFASF") xml.UpdateChildContent("Mawb|ShipmentReference|AdditionalInformation","ZDFASF") xml.UpdateChildContent("Mawb|RoutingDetails|FromAirportCode","EWN") xml.UpdateChildContent("Mawb|RoutingDetails|ToAirportCode","LON") xml.UpdateChildContent("Mawb|RoutingDetails|CarrierCode","AA") xml.UpdateChildContent("Mawb|RoutingDetails|FlightNumber","N123") xml.UpdateChildContent("Mawb|RoutingDetails|FlightDate","2016-11-30T00:00:00") xml.UpdateChildContent("Mawb|ChargesDeclaration|CurrencyCode","USD") xml.UpdateChildContent("Mawb|ChargesDeclaration|ChargeCode","PP") xml.UpdateChildContent("Mawb|ChargesDeclaration|WeightOrValuation","P") xml.UpdateChildContent("Mawb|ChargesDeclaration|Other","P") xml.UpdateChildContent("Mawb|ChargesDeclaration|ValuesForCarriage","1300.00") xml.UpdateChildContent("Mawb|ChargesDeclaration|ValuesForCustoms","12000.00") xml.UpdateChildContent("Mawb|ChargesDeclaration|ValuesForInsurance","11000.00") xml.UpdateChildContent("Mawb|Handling|SpecialServiceInformation","Please Notify Consigneetestwwwww") xml.UpdateChildContent("Mawb|Handling|OtherServiceInformation","") xml.UpdateChildContent("Mawb|Handling|SCI","") xml.UpdateChildContent("Mawb|Handling|SpecialHandling|Code","AOG") xml.UpdateChildContent("Mawb|Handling|SpecialHandling|Code","ATT") xml.UpdateChildContent("Mawb|Rates|NumberOfPieces","12") xml.UpdateChildContent("Mawb|Rates|GrossWeight|Value","244.70") xml.UpdateChildContent("Mawb|Rates|GrossWeight|UOM","L") xml.UpdateChildContent("Mawb|Rates|SLAC","12") xml.UpdateChildContent("Mawb|Rates|RateClassCode","N") xml.UpdateChildContent("Mawb|Rates|CommodityItemNumber","") xml.UpdateChildContent("Mawb|Rates|ChargeableWeight","245.0") xml.UpdateChildContent("Mawb|Rates|RateOrCharge","8.00") xml.UpdateChildContent("Mawb|Rates|ChargeAmount","1960.00") xml.UpdateChildContent("Mawb|Rates|NatureAndQuantityOfGoods","CONSOLIDATION PER ATTACHED MANIFEST.") xml.UpdateChildContent("Mawb|Rates|Dims|Pcs","12") xml.UpdateChildContent("Mawb|Rates|Dims|Length","4") xml.UpdateChildContent("Mawb|Rates|Dims|Width","8") xml.UpdateChildContent("Mawb|Rates|Dims|Height","4") xml.UpdateChildContent("Mawb|Rates|Dims|UOM","CMT") xml.UpdateChildContent("Mawb|ChargesSummary|WeightCharge","1960.00") xml.UpdateChildContent("Mawb|OtherCharges|Description","AW") xml.UpdateChildContent("Mawb|OtherCharges|Amount","123.00") xml.UpdateChildContent("Mawb|OtherCharges|ChargeIdentifier","C") xml.UpdateChildContent("Mawb|OtherCharges|PrepaidCollect","C") xml.UpdateChildContent("Mawb|OtherCharges|Description","FC") xml.UpdateChildContent("Mawb|OtherCharges|Amount","55.00") xml.UpdateChildContent("Mawb|OtherCharges|ChargeIdentifier","A") xml.UpdateChildContent("Mawb|OtherCharges|PrepaidCollect","P") xml.UpdateChildContent("Mawb|OtherCharges|Description","FC") xml.UpdateChildContent("Mawb|OtherCharges|Amount","101.00") xml.UpdateChildContent("Mawb|OtherCharges|ChargeIdentifier","C") xml.UpdateChildContent("Mawb|OtherCharges|PrepaidCollect","C") xml.UpdateChildContent("Mawb|EmailNotifications|Name","") xml.UpdateChildContent("Mawb|EmailNotifications|Email","") xml.UpdateChildContent("Mawb|EmailNotifications|Name","") xml.UpdateChildContent("Mawb|EmailNotifications|Email","") xml.UpdateChildContent("Mawb|EmailNotifications|Name","") xml.UpdateChildContent("Mawb|EmailNotifications|Email","") xml.UpdateChildContent("Mawb|EmailNotifications|Name","") xml.UpdateChildContent("Mawb|EmailNotifications|Email","") xml.UpdateChildContent("Mawb|Execution|Date","2015-08-07T00:00:00") xml.UpdateChildContent("Mawb|Execution|Place","OZ NY") xml.UpdateChildContent("Mawb|Execution|ShipperSignature","OAS FREIGHT FORWARDE") xml.UpdateChildContent("Mawb|Execution|CarrierSignature","OAS FREIGHT FORWARDE") xml.UpdateChildContent("Hawbs|AwbNumber","001-12312123") xml.UpdateChildContent("Hawbs|HawbNumber","CGL201107-27") xml.UpdateChildContent("Hawbs|HawbStatus","D") xml.UpdateChildContent("Hawbs|NumberOfPieces","12") xml.UpdateChildContent("Hawbs|GrossWeight|Value","244.70") xml.UpdateChildContent("Hawbs|GrossWeight|UOM","K") xml.UpdateChildContent("Hawbs|Locations|PortOfOrigin|Code","EWN") xml.UpdateChildContent("Hawbs|Locations|PortOfDestination|Code","LON") xml.UpdateChildContent("Hawbs|Commodity","HWB #: CGL20110") xml.UpdateChildContent("Hawbs|SLAC","12") xml.UpdateChildContent("Hawbs|Parties|Shipper|Name","ABC SHIPPNG AGAIN") xml.UpdateChildContent("Hawbs|Parties|Shipper|Phone","111-222-3333") xml.UpdateChildContent("Hawbs|Parties|Shipper|Fax","") xml.UpdateChildContent("Hawbs|Parties|Shipper|Email","") xml.UpdateChildContent("Hawbs|Parties|Shipper|Address|Line1","100 MAIN STREET") xml.UpdateChildContent("Hawbs|Parties|Shipper|Address|Place","OZ") xml.UpdateChildContent("Hawbs|Parties|Shipper|Address|PostalCode","ZIP") xml.UpdateChildContent("Hawbs|Parties|Shipper|Address|StateProvince","NY") xml.UpdateChildContent("Hawbs|Parties|Shipper|Address|Country|Code","US") xml.UpdateChildContent("Hawbs|Parties|Consignee|Name","AABC SHIPPING & PACKAGING, INC.") xml.UpdateChildContent("Hawbs|Parties|Consignee|Phone","111-222-3334") xml.UpdateChildContent("Hawbs|Parties|Consignee|Fax","222-111-3334") xml.UpdateChildContent("Hawbs|Parties|Consignee|Email","") xml.UpdateChildContent("Hawbs|Parties|Consignee|Address|Line1","500 HARBOR DRIVE") xml.UpdateChildContent("Hawbs|Parties|Consignee|Address|Place","BEAUFORT") xml.UpdateChildContent("Hawbs|Parties|Consignee|Address|PostalCode","28516") xml.UpdateChildContent("Hawbs|Parties|Consignee|Address|StateProvince","NC") xml.UpdateChildContent("Hawbs|Parties|Consignee|Address|Country|Code","US") xml.EmitXmlDecl = False Dim resp As Chilkat.HttpResponse = Await http.PTextAsync("POST","http://integration.winwebconnect.com/api/v1/Awb",xml.GetXml(),"utf-8","application/xml",False,False) If (http.LastMethodSuccess <> True) Then Debug.WriteLine(http.LastErrorText) Exit Sub End If Dim xmlResponse As New Chilkat.Xml xmlResponse.LoadXml(resp.BodyStr) ' See below for an example XML response body. Debug.WriteLine("Response Body:") Debug.WriteLine(xmlResponse.GetXml()) Debug.WriteLine("---") Debug.WriteLine("Response Header:") Debug.WriteLine(resp.Header) Debug.WriteLine("Success.") |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.