Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Xojo Plugin) 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 resp = http.PText("POST","http://integration.winwebconnect.com/api/v1/Awb",xml.GetXml(),"utf-8","application/xml",False,False) If (http.LastMethodSuccess <> True) Then System.DebugLog(http.LastErrorText) Return End If Dim xmlResponse As New Chilkat.Xml success = xmlResponse.LoadXml(resp.BodyStr) // See below for an example XML response body. System.DebugLog("Response Body:") System.DebugLog(xmlResponse.GetXml()) System.DebugLog("---") System.DebugLog("Response Header:") System.DebugLog(resp.Header) System.DebugLog("Success.") |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.